Function DelAlignLaraToRope

TombEngine/Objects/Generic/Object/rope.cpp:732–833

	}

	void DelAlignLaraToRope(ItemInfo* item)
	{
		ROPE_STRUCT* rope;
		short ropeY;
		Vector3i vec, vec2, vec3, vec4, vec5, pos, pos2, diff, diff2;
		int matrix[12];
		short angle[3];

		vec.x = 4096;
		vec.y = 0;
		vec.z = 0;

		const auto& offset = GetClosestKeyframe(*item).RootOffset;
		ropeY = Lara.Control.Rope.Y - ANGLE(90.0f);
		rope = &Ropes[Lara.Control.Rope.Ptr];

		GetRopePos(rope, ((Lara.Control.Rope.Segment - 1) << 7) + offset.y, &pos.x, &pos.y, &pos.z);
		GetRopePos(rope, ((Lara.Control.Rope.Segment - 1) << 7) + offset.y - 192, &pos2.x, &pos2.y, &pos2.z);

		diff.x = (pos.x - pos2.x) << 16;
		diff.y = (pos.y - pos2.y) << 16;
		diff.z = (pos.z - pos2.z) << 16;
		NormaliseRopeVector(&diff);
		diff.x >>= 2;
		diff.y >>= 2;
		diff.z >>= 2;
		ScaleVector(&diff, DotProduct(&vec, &diff), &vec2);
		vec2.x = vec.x - vec2.x;
		vec2.y = vec.y - vec2.y;
		vec2.z = vec.z - vec2.z;

		vec3.x = vec2.x;
		vec3.y = vec2.y;
		vec3.z = vec2.z;
		vec4.x = vec2.x;
		vec4.y = vec2.y;
		vec4.z = vec2.z;

		diff2.x = diff.x;
		diff2.y = diff.y;
		diff2.z = diff.z;

		ScaleVector(&vec3, 16384 * phd_cos(ropeY), &vec3);
		ScaleVector(&diff2, DotProduct(&diff2, &vec2), &diff2);
		ScaleVector(&diff2, 4096 - 16384 * phd_cos(ropeY), &diff2);

		CrossProduct(&diff, &vec2, &vec4);
		ScaleVector(&vec4, 16384 * phd_sin(ropeY), &vec4);
		diff2.x += vec3.x;
		diff2.y += vec3.y;
		diff2.z += vec3.z;

		vec2.x = (diff2.x + vec4.x) << 16;
		vec2.y = (diff2.y + vec4.y) << 16;
		vec2.z = (diff2.z + vec4.z) << 16;
		NormaliseRopeVector(&vec2);
		vec2.x >>= 2;
		vec2.y >>= 2;