Function LizardControl

TombEngine/Objects/TR3/Entity/Lizard.cpp:88–407

	}

	void LizardControl(short itemNumber)
	{
		if (!CreatureActive(itemNumber))
			return;

		auto& item = g_Level.Items[itemNumber];
		auto& creature = *GetCreatureInfo(&item);

		short headingAngle = 0;
		short tiltAngle = 0;
		auto headOrient = EulerAngles::Identity;

		if (item.HitPoints <= 0)
		{
			// Avoid doing the death animation if summoned.
			if (item.Animation.ActiveState != LIZARD_STATE_DEATH)
				SetAnimation(item, LIZARD_ANIM_DEATH);

			// Explode if summoned.
			if (item.TestFlagField(0, 1) && item.Animation.FrameNumber == 50)
				CreatureDie(itemNumber, true);
		}
		else
		{
			AI_INFO ai;
			CreatureAIInfo(&item, &ai);
			GetCreatureMood(&item, &ai, true);
			CreatureMood(&item, &ai, true);

			if (IsLizardTargetBlocked(item))
				creature.Mood = MoodType::Attack;

			headingAngle = CreatureTurn(&item, creature.MaxTurn);

			// Turn head. Avoid while climbing or falling.
			if (ai.ahead &&
				item.Animation.ActiveState < LIZARD_STATE_DEATH)
			{
				headOrient.x = ai.xAngle;
				headOrient.y = ai.angle;
			}

			bool isPlayerPoisonedOrTargetBlocked = 
				(creature.Enemy != nullptr && GetLaraInfo(creature.Enemy)->Status.Poison < 256) ||
				IsLizardTargetBlocked(item);

			switch (item.Animation.ActiveState)
			{
			case LIZARD_STATE_IDLE:
				creature.MaxTurn = 0;
				creature.Flags = 0;

				if (creature.Mood == MoodType::Escape)
				{
					item.Animation.TargetState = LIZARD_STATE_RUN_FORWARD;
				}
				else if (creature.Mood == MoodType::Bored)
				{