Function BigRatControl

TombEngine/Objects/TR1/Entity/tr1_big_rat.cpp:105–265

	}

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

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

		short angle = 0;
		short head = 0;

		SetBigRatWater(item);
		bool isOnWater = IsBigRatOnWater(item);

		if (item->HitStatus)
			SoundEffect(SFX_TR1_RAT_CHIRP, &item->Pose);

		if (item->HitPoints <= 0)
		{
			bool doWaterDeath = isOnWater;
			if (item->Animation.ActiveState != BIG_RAT_STATE_LAND_DEATH &&
				item->Animation.ActiveState != BIG_RAT_STATE_WATER_DEATH)
			{
				if (doWaterDeath)
					SetAnimation(item, BIG_RAT_ANIM_WATER_DEATH);
				else
					SetAnimation(item, BIG_RAT_ANIM_LAND_DEATH);
			}
		}
		else
		{
			AI_INFO ai;
			CreatureAIInfo(item, &ai);

			if (ai.ahead)
				head = ai.angle;

			GetCreatureMood(item, &ai, isOnWater);
			CreatureMood(item, &ai, isOnWater);
			creature->MaxTurn = isOnWater ? BIG_RAT_SWIM_TURN_RATE_MAX : BIG_RAT_RUN_TURN_RATE_MAX;
			angle = CreatureTurn(item, creature->MaxTurn);

			switch (item->Animation.ActiveState)
			{
			case BIG_RAT_STATE_IDLE:
				if (item->Animation.RequiredState != NO_VALUE)
					item->Animation.TargetState = item->Animation.RequiredState;
				else if (ai.bite && ai.distance < BIG_RAT_LAND_BITE_ATTACK_RANGE)
					item->Animation.TargetState = BIG_RAT_STATE_LAND_BITE_ATTACK;
				else
					item->Animation.TargetState = BIG_RAT_STATE_RUN_FORWARD;

				break;

			case BIG_RAT_STATE_RUN_FORWARD:
				if (isOnWater)
				{
					SetAnimation(item, BIG_RAT_ANIM_SWIM);