TombEngine/TR5Main/Game/laramisc.cpp

#include "laramisc.h"
#include "..\Global\global.h"
#include "..\Scripting\GameFlowScript.h"
#include "effects.h"
#include "collide.h"
#include "Lara.h"
#include "laraswim.h"
#include "larasurf.h"

extern LaraExtraInfo g_LaraExtra;
extern GameFlow* g_GameFlow;

COLL_INFO coll; 
short SubsuitAir = 0;

/*void GetLaraDeadlyBounds()//4B408(<), 4B86C (F)
{
#if PSX_VERSION || PSXPC_VERSION///@TODO PC subs not there yet.
	short* bounds;
	short tbounds[6];

	bounds = GetBoundsAccurate(LaraItem);
	mPushUnitMatrix();
	mRotYXZ(LaraItem->pos.yRot, LaraItem->pos.xRot, LaraItem->pos.zRot);
	mSetTrans(0, 0, 0);
	mRotBoundingBoxNoPersp(bounds, &tbounds[0]);
	mPopMatrix();

	DeadlyBounds[0] = LaraItem->pos.xPos + tbounds[0];
	DeadlyBounds[1] = LaraItem->pos.xPos + tbounds[1];
	DeadlyBounds[2] = LaraItem->pos.yPos + tbounds[2];
	DeadlyBounds[3] = LaraItem->pos.yPos + tbounds[3];
	DeadlyBounds[4] = LaraItem->pos.zPos + tbounds[4];
	DeadlyBounds[5] = LaraItem->pos.zPos + tbounds[5];
#else
	UNIMPLEMENTED();
#endif
}

void DelAlignLaraToRope(ITEM_INFO* item)//4B3D8, 4B83C
{
	UNIMPLEMENTED();
}*/

void InitialiseLaraAnims(ITEM_INFO* item)//4B340(<), 4B7A4 (F)
{
	if (Rooms[item->roomNumber].flags & ENV_FLAG_WATER)
	{
		Lara.waterStatus = LW_UNDERWATER;
		item->goalAnimState = STATE_LARA_UNDERWATER_STOP;
		item->currentAnimState = STATE_LARA_UNDERWATER_STOP;
		item->fallspeed = 0;
		item->animNumber = ANIMATION_LARA_UNDERWATER_IDLE;
		item->frameNumber = Anims[item->animNumber].frameBase;
	}
	else
	{
		Lara.waterStatus = LW_ABOVE_WATER;
		item->goalAnimState = STATE_LARA_STOP;
		item->currentAnimState = STATE_LARA_STOP;
		item->animNumber = ANIMATION_LARA_STAY_SOLID;
		item->frameNumber = Anims[item->animNumber].frameBase;
	}
}

void InitialiseLaraLoad(short itemNum)//4B308, 4B76C (F)
{
	Lara.itemNumber = itemNum;
	LaraItem = &Items[itemNum];
}

void LaraControl(short itemNumber)//4A838, 4AC9C
{
	ITEM_INFO* item = LaraItem;

	if (Lara.isMoving)
	{
		if (++Lara.moveCount > 90)
		{
			Lara.isMoving = 0;
			Lara.gunStatus = LG_NO_ARMS;
		} 
	} 

	if (!DisableLaraControl)
		Lara.locationPad = -128;

	int oldX = LaraItem->pos.xPos; 
	int oldY = LaraItem->pos.yPos; 
	int oldZ = LaraItem->pos.zPos; 

	if (Lara.gunStatus == LG_HANDS_BUSY && 
		LaraItem->currentAnimState == STATE_LARA_STOP &&
		LaraItem->goalAnimState == STATE_LARA_STOP && 
		LaraItem->animNumber == ANIMATION_LARA_STAY_IDLE &&
		!LaraItem->gravityStatus)
	{
		Lara.gunStatus = LG_NO_ARMS;
	}

	if (item->currentAnimState != STATE_LARA_SPRINT && DashTimer < 120)
		DashTimer++;

	Lara.isDucked = 0;

	bool isWater = Rooms[item->roomNumber].flags & ENV_FLAG_WATER;
	int wd = GetWaterDepth(item->pos.xPos, item->pos.yPos, item->pos.zPos, item->roomNumber);
	int wh = GetWaterHeight(item->pos.xPos, item->pos.yPos, item->pos.zPos, item->roomNumber);

	int hfw = NO_HEIGHT;
	if (wh != NO_HEIGHT)
		hfw = item->pos.yPos - wh;

	Lara.waterSurfaceDist = -hfw;
	WadeSplash(item, wh, wd);
	
	short roomNumber;
	short height = 0;

	switch (Lara.waterStatus)
	{
	case LW_ABOVE_WATER:
		if (hfw != NO_HEIGHT && hfw >= 256)
		{
			if (wd <= 474)
			{
				if (hfw > 256)
				{
					Lara.waterStatus = LW_WADE;
					if (!(item->gravityStatus))
						item->goalAnimState = STATE_LARA_STOP;
				}
			}
			else if (isWater)
			{
				Lara.air = 1800;
				Lara.waterStatus = LW_UNDERWATER;
				item->gravityStatus = false;
				item->pos.yPos += 100;

				UpdateLaraRoom(LaraItem, 0);
				StopSoundEffect(SFX_LARA_FALL);

				if (item->currentAnimState == STATE_LARA_SWANDIVE_BEGIN)
				{
					item->pos.xRot = -ANGLE(45);
					item->goalAnimState = STATE_LARA_UNDERWATER_DIVING;
					AnimateLara(item);
					item->fallspeed *= 2;
				}
				else if (item->currentAnimState == STATE_LARA_SWANDIVE_END)
				{
					item->pos.xRot = -ANGLE(85);
					item->goalAnimState = STATE_LARA_UNDERWATER_DIVING;
					AnimateLara(item);
					item->fallspeed *= 2;
				}
				else
				{
					item->pos.xRot = -ANGLE(45);
					item->animNumber = ANIMATION_LARA_FREE_FALL_TO_UNDERWATER;
					item->frameNumber = Anims[item->animNumber].frameBase;
					item->currentAnimState = STATE_LARA_UNDERWATER_DIVING;
					item->goalAnimState = STATE_LARA_UNDERWATER_FORWARD;
					item->fallspeed = 3 * item->fallspeed / 2;
				}

				Lara.torsoYrot = 0;
				Lara.torsoXrot = 0;
				Lara.headYrot = 0;
				Lara.headXrot = 0;

				Splash(LaraItem);
			}

			Camera.targetElevation = -ANGLE(22);
			if (hfw >= 256)
			{
				if (hfw > 730)
				{
					Lara.waterStatus = LW_SURFACE;
					item->pos.yPos += 1 - hfw;

					switch (item->currentAnimState)
					{
					case STATE_LARA_WALK_BACK:
						item->animNumber = ANIMATION_LARA_ONWATER_IDLE_TO_SWIM_BACK;
						item->frameNumber = Anims[item->animNumber].frameBase;
						item->goalAnimState = STATE_LARA_ONWATER_BACK;
						item->currentAnimState = STATE_LARA_ONWATER_BACK;
						break;

					case STATE_LARA_WALK_RIGHT:
						item->animNumber = ANIMATION_LARA_ONWATER_SWIM_RIGHT;
						item->frameNumber = Anims[item->animNumber].frameBase;
						item->goalAnimState = STATE_LARA_ONWATER_RIGHT;
						item->currentAnimState = STATE_LARA_ONWATER_RIGHT;
						break;

					case STATE_LARA_WALK_LEFT:
						item->animNumber = ANIMATION_LARA_ONWATER_SWIM_LEFT;
						item->frameNumber = Anims[item->animNumber].frameBase;
						item->goalAnimState = STATE_LARA_ONWATER_LEFT;
						item->currentAnimState = STATE_LARA_ONWATER_LEFT;
						break;

					default:
						item->animNumber = ANIMATION_LARA_ONWATER_SWIM_FORWARD;
						item->frameNumber = Anims[item->animNumber].frameBase;
						item->goalAnimState = STATE_LARA_ONWATER_FORWARD;
						item->currentAnimState = STATE_LARA_ONWATER_FORWARD;
						break;
					}

					item->gravityStatus = false;
					item->fallspeed = 0;
					Lara.diveCount = 0;
					LaraItem->pos.zRot = 0;
					LaraItem->pos.xRot = 0;
					Lara.torsoYrot = 0;
					Lara.torsoXrot = 0;
					Lara.headYrot = 0;
					Lara.headXrot = 0;

					UpdateLaraRoom(item, 0);
				}
			}
			else
			{
				Lara.waterStatus = LW_ABOVE_WATER;
				if (item->currentAnimState == STATE_LARA_WADE_FORWARD)
					item->goalAnimState = STATE_LARA_RUN_FORWARD;
			}
		}

		break;

	case LW_UNDERWATER:
		roomNumber = item->roomNumber;
		GetFloor(item->pos.xPos, item->pos.yPos - 256, item->pos.zPos, &roomNumber);

		height = 0;
		if (wd != NO_HEIGHT)
		{
			height = Lara.waterSurfaceDist;
			if (hfw >= 0)
				height = hfw;
		}

		if (height >= 256
			|| wd == NO_HEIGHT
			|| Rooms[roomNumber].flags & ENV_FLAG_WATER
			|| item->animNumber == ANIMATION_LARA_UNDERWATER_TO_ONWATER
			|| item->animNumber == ANIMATION_LARA_FREE_FALL_TO_UNDERWATER_ALTERNATE)
		{
			if (!isWater)
			{
				if (wd == NO_HEIGHT)
				{
					Lara.waterStatus = LW_ABOVE_WATER;
					item->animNumber = ANIMATION_LARA_FREE_FALL_FORWARD;
					item->frameNumber = Anims[item->frameNumber].frameBase;
					item->goalAnimState = STATE_LARA_JUMP_FORWARD;
					item->currentAnimState = STATE_LARA_JUMP_FORWARD;
					item->speed = item->fallspeed / 4;
					item->gravityStatus = true;

					LaraItem->pos.zRot = 0;
					LaraItem->pos.xRot = 0;
					Lara.torsoYrot = 0;
					Lara.torsoXrot = 0;
					Lara.headYrot = 0;
					Lara.headXrot = 0;

					break;
				}

				if (hfw < 0)
					hfw = Lara.waterSurfaceDist;

				if (hfw >= 256)
				{
					Lara.waterStatus = LW_ABOVE_WATER;
					item->animNumber = ANIMATION_LARA_FREE_FALL_FORWARD;
					item->frameNumber = Anims[item->frameNumber].frameBase;
					item->goalAnimState = STATE_LARA_JUMP_FORWARD;
					item->currentAnimState = STATE_LARA_JUMP_FORWARD;
					item->speed = item->fallspeed / 4;
					item->gravityStatus = true;

					LaraItem->pos.zRot = 0;
					LaraItem->pos.xRot = 0;
					Lara.torsoYrot = 0;
					Lara.torsoXrot = 0;
					Lara.headYrot = 0;
					Lara.headXrot = 0;

					break;
				}

				Lara.waterStatus = LW_SURFACE;
				item->pos.yPos = wh;
				item->animNumber = ANIMATION_LARA_UNDERWATER_TO_ONWATER;
				item->frameNumber = Anims[item->animNumber].frameBase;
				item->goalAnimState = STATE_LARA_ONWATER_STOP;
				item->currentAnimState = STATE_LARA_ONWATER_STOP;
				item->fallspeed = 0;
				Lara.diveCount = 11;
				LaraItem->pos.zRot = 0;
				item->pos.xRot = 0;
				Lara.torsoYrot = 0;
				Lara.torsoXrot = 0;
				Lara.headYrot = 0;
				Lara.headXrot = 0;

				UpdateLaraRoom(item, -381);
				SoundEffect(SFX_LARA_BREATH, &LaraItem->pos, 2);
			}
		}
		else
		{
			Lara.waterStatus = LW_SURFACE;
			item->pos.yPos = wh + 1;
			item->animNumber = ANIMATION_LARA_UNDERWATER_TO_ONWATER;
			item->frameNumber = Anims[item->animNumber].frameBase;
			item->goalAnimState = STATE_LARA_ONWATER_STOP;
			item->currentAnimState = STATE_LARA_ONWATER_STOP;
			item->fallspeed = 0;
			Lara.diveCount = 11;
			LaraItem->pos.zRot = 0;
			LaraItem->pos.xRot = 0;
			Lara.torsoYrot = 0;
			Lara.torsoXrot = 0;
			Lara.headYrot = 0;
			Lara.headXrot = 0;

			UpdateLaraRoom(item, 0);
			SoundEffect(SFX_LARA_BREATH, &LaraItem->pos, 2);
		}
		break;

	case LW_SURFACE:
		if (!isWater)
		{
			if (hfw <= 256)
			{
				Lara.waterStatus = LW_ABOVE_WATER;
				item->animNumber = ANIMATION_LARA_FREE_FALL_FORWARD;
				item->frameNumber = Anims[item->frameNumber].frameBase;
				item->goalAnimState = STATE_LARA_JUMP_FORWARD;
				item->currentAnimState = STATE_LARA_JUMP_FORWARD;
				item->speed = item->fallspeed / 4;
				item->gravityStatus = true;
			}
			else
			{
				Lara.waterStatus = LW_WADE;
				item->animNumber = ANIMATION_LARA_STAY_IDLE;
				item->frameNumber = Anims[item->frameNumber].frameBase;
				item->goalAnimState = STATE_LARA_STOP;
				item->currentAnimState = STATE_LARA_WADE_FORWARD;

				AnimateItem(item);
			}

			item->fallspeed = 0;
			LaraItem->pos.zRot = 0;
			LaraItem->pos.xRot = 0;
			Lara.torsoYrot = 0;
			Lara.torsoXrot = 0;
			Lara.headYrot = 0;
			Lara.headXrot = 0;
		}
		break;

	case LW_WADE:
		Camera.targetElevation = -ANGLE(22);
		if (hfw >= 256)
		{
			if (hfw > 730)
			{
				Lara.waterStatus = LW_SURFACE;
				item->pos.yPos += 1 - hfw;

				switch (item->currentAnimState)
				{
				case STATE_LARA_WALK_BACK:
					item->animNumber = ANIMATION_LARA_ONWATER_IDLE_TO_SWIM_BACK;
					item->frameNumber = Anims[item->animNumber].frameBase;
					item->goalAnimState = STATE_LARA_ONWATER_BACK;
					item->currentAnimState = STATE_LARA_ONWATER_BACK;
					break;

				case STATE_LARA_WALK_RIGHT:
					item->animNumber = ANIMATION_LARA_ONWATER_SWIM_RIGHT;
					item->frameNumber = Anims[item->animNumber].frameBase;
					item->goalAnimState = STATE_LARA_ONWATER_RIGHT;
					item->currentAnimState = STATE_LARA_ONWATER_RIGHT;
					break;

				case STATE_LARA_WALK_LEFT:
					item->animNumber = ANIMATION_LARA_ONWATER_SWIM_LEFT;
					item->frameNumber = Anims[item->animNumber].frameBase;
					item->goalAnimState = STATE_LARA_ONWATER_LEFT;
					item->currentAnimState = STATE_LARA_ONWATER_LEFT;
					break;

				default:
					item->animNumber = ANIMATION_LARA_ONWATER_SWIM_FORWARD;
					item->frameNumber = Anims[item->animNumber].frameBase;
					item->goalAnimState = STATE_LARA_ONWATER_FORWARD;
					item->currentAnimState = STATE_LARA_ONWATER_FORWARD;
					break;
				}

				item->gravityStatus = false;
				item->fallspeed = 0;
				Lara.diveCount = 0;
				LaraItem->pos.zRot = 0;
				LaraItem->pos.xRot = 0;
				Lara.torsoYrot = 0;
				Lara.torsoXrot = 0;
				Lara.headYrot = 0;
				Lara.headXrot = 0;

				UpdateLaraRoom(item, 0);
			}
		}
		else
		{
			Lara.waterStatus = LW_ABOVE_WATER;
			if (item->currentAnimState == STATE_LARA_WADE_FORWARD)
				item->goalAnimState = STATE_LARA_RUN_FORWARD;
		}
		break;
	}

	//S_SetReverbType(room[item->roomNumber].ReverbType);

	if (item->hitPoints <= 0)
	{
		item->hitPoints = -1;

		if (Lara.deathCount == 0)
			S_CDStop();

		Lara.deathCount++;
		if ((LaraItem->flags & 0x100))
		{
			Lara.deathCount++;
			return;
		}
	}

	switch (Lara.waterStatus)
	{
	case LW_ABOVE_WATER:
	case LW_WADE:
		if (Lara.gassed)
		{
			if (item->hitPoints >= 0 && --Lara.air < 0)
			{
				Lara.air = -1;
				item->hitPoints -= 5;
				LaraAboveWater(item, &coll);
				break;
			}
		}
		else if (Lara.air < 1800 && item->hitPoints >= 0)
		{
			Lara.air += 10;
			if (Lara.air > 1800)
				Lara.air = 1800;
		}		
		LaraAboveWater(item, &coll);
		break;

	case LW_UNDERWATER:
		if (item->hitPoints >= 0)
		{
			/*if (LaraDrawType == LARA_DIVESUIT)
			{
				if (CheckCutPlayed(40))
				{
					v32 = Lara.Anxiety + 8;
					v33 = v32 + word_51CEE0;
					word_51CEE0 += v32;
					if (word_51CEE0 > 80)
					{
						v34 = (v33 - 1) / 0x50u;
						word_51CEE0 = -80 * v34 + v33;
						do
						{
							--Lara.air;
							--v34;
						} while (v34);
					}
				}
			}
			else
			{*/
			Lara.air--;
			//}
			if (Lara.air < 0)
			{
				if (LaraDrawType == LARA_DIVESUIT && Lara.anxiety < 251)
					Lara.anxiety += 4;
				Lara.air = -1;
				item->hitPoints -= 5;
			}
		}		
		LaraUnderWater(item, &coll);
		break;

	case LW_SURFACE:
		if (item->hitPoints >= 0)
		{
			Lara.air += 10;
			if (Lara.air > 1790)
				Lara.air = 1800;
		}
		LaraSurface(item, &coll);
		break;

	case LW_FLYCHEAT:
		LaraCheat(item, &coll);
		break;
	}

	Savegame.Game.Distance += SQRT_ASM(
		SQUARE(item->pos.xPos - oldX) +
		SQUARE(item->pos.yPos - oldY) +
		SQUARE(item->pos.zPos - oldZ));
}

void LaraCheat(ITEM_INFO* item, COLL_INFO* coll)//4A790(<), 4ABF4(<) (F)
{
	LaraItem->hitPoints = 1000;
	LaraUnderWater(item, coll);
	if (TrInput & IN_WALK)
	{
		if (!(TrInput & IN_LOOK))
		{
			Lara.waterStatus = LW_ABOVE_WATER;
			item->animNumber = ANIMATION_LARA_STAY_SOLID;
			item->frameNumber = Anims[item->animNumber].frameBase;
			item->pos.zRot = 0;
			item->pos.xRot = 0;
			Lara.torsoYrot = 0;
			Lara.torsoXrot = 0;
			Lara.headYrot = 0;
			Lara.headXrot = 0;
			Lara.gunStatus = LG_NO_ARMS;
			LaraInitialiseMeshes();
			Lara.meshEffects = 0;
		}
	}
}

void LaraInitialiseMeshes()//4A684, 4AAE8 (F)
{
	for (int i = 0; i < 15; i++)
	{
		Lara.meshPtrs[i] = Meshes[Objects[ID_LARA].meshIndex + 2 * i] = Meshes[Objects[ID_LARA_SKIN].meshIndex + 2 * i];
	}

	/*if (gfCurrentLevel >= LVL5_GALLOWS_TREE && gfCurrentLevel <= LVL5_OLD_MILL)
	{
		Lara.mesh_ptrs[LM_TORSO] = meshes[Objects[ANIMATING6_MIP].mesh_index + 2 * LM_TORSO];
	}*/

	if (Lara.gunType == WEAPON_HK)
	{
		Lara.backGun = WEAPON_HK;
	}
	else if (!g_LaraExtra.Weapons[WEAPON_SHOTGUN].Present)
	{
		if (g_LaraExtra.Weapons[WEAPON_HK].Present)
		{
			Lara.backGun = WEAPON_HK;
		}
	}
	else
	{
		Lara.backGun = WEAPON_UZI;
	}

	Lara.gunStatus = LG_NO_ARMS;
	Lara.leftArm.frameNumber = 0;
	Lara.rightArm.frameNumber = 0;
	Lara.target = 0;
	Lara.rightArm.lock = 0;
	Lara.leftArm.lock = 0;
}

void InitialiseLara(int restore)
{
	if (Lara.itemNumber == NO_ITEM)
		return;

	short itemNumber = Lara.itemNumber;

	LaraItem->data = &Lara;
	LaraItem->collidable = false;

	if (restore)
	{
		LARA_INFO backup;
		memcpy(&backup, &Lara, sizeof(LARA_INFO));
		memset(&Lara, 0, sizeof(LARA_INFO));
		memcpy(&Lara.pistolsTypeCarried, &backup.pistolsTypeCarried, 59);
	}
	else
	{
		memset(&Lara, 0, sizeof(LARA_INFO));
		g_LaraExtra.ExtraAnim = -1;
		g_LaraExtra.Vehicle = NO_ITEM;
		g_LaraExtra.Weapons[WEAPON_PISTOLS].Present = true;
	}

	Lara.look = TRUE;
	Lara.itemNumber = itemNumber;
	Lara.hitDirection = -1;
	Lara.air = 1800;
	Lara.weaponItem = -1;
	PoisonFlag = 0;
	Lara.dpoisoned = 0;
	Lara.poisoned = 0;
	Lara.waterSurfaceDist = 100;
	Lara.holster = 14;
	Lara.location = -1;
	Lara.highestLocation = -1;
	Lara.ropePtr = -1;
	LaraItem->hitPoints = 1000;

	/*
	TODO: scripting
	for (i = 0; i < gfNumPickups; i++)
	{
		DEL_picked_up_object(convert_invobto_obj(gfPickups[i]));
	}

	gfNumPickups = 0;*/

	Lara.gunStatus = LG_NO_ARMS;

	short gun = WEAPON_NONE;

	if (LaraDrawType != LARA_YOUNG && Objects[ID_PISTOLS_ITEM].loaded)
		gun = WEAPON_PISTOLS;

	//if ((gfLevelFlags & GF_LVOP_TRAIN) && Objects[HK_ITEM].loaded && (Lara.hk_type_carried & WTYPE_PRESENT))
	//	gun = WEAPON_HK;

	Lara.lastGunType = Lara.gunType = Lara.requestGunType = gun;

	LaraInitialiseMeshes();

	Lara.skelebob = 0;

	if (Objects[ID_PISTOLS_ITEM].loaded)
	{
		g_LaraExtra.Weapons[WEAPON_PISTOLS].Present = true;
		g_LaraExtra.Weapons[WEAPON_PISTOLS].Ammo[WEAPON_AMMO1] = -1;
	}

	Lara.binoculars = WTYPE_PRESENT;

	if (!restore)
	{
		if (Objects[ID_FLARE_INV_ITEM].loaded)
			Lara.numFlares = 3;

		Lara.numSmallMedipack = 3;
		Lara.numLargeMedipack = 1;
	}

	InitialiseLaraAnims(LaraItem);

	DashTimer = 120;

	/*for (i = 0; i < gfNumTakeaways; i++)
	{
		NailInvItem(convert_invobto_obj(gfTakeaways[i]));
	}

	gfNumTakeaways = 0;*/

	//weapons[WEAPON_REVOLVER].damage = gfCurrentLevel >= LVL5_BASE ? 15 : 6;

	/*switch (gfCurrentLevel)
	{
	case 6u:
		Lara.pickupitems &= 0xFFF7u;

		Lara.puzzleitems[0] = 10;
		return;
	case 5u:
		Lara.pickupitems = 0;
		Lara.pickupitemscombo = 0;
		Lara.keyitems = 0;
		Lara.keyitemscombo = 0;
		Lara.puzzleitemscombo = 0;

		memset(Lara.puzzleitems, 0, 12);
		return;
	case 7u:
		Lara.pickupitems = 0;

		Lara.puzzleitems[0] = 0;
		return;
	case 0xCu:
		Lara.pickupitems &= 0xFFFEu;

		Lara.puzzleitems[2] = 0;
		Lara.puzzleitems[3] = 0;
		break;
	case 0xEu:
		Lara.pickupitems &= 0xFFFDu;
		break;
	default:
		if (gfCurrentLevel < LVL5_THIRTEENTH_FLOOR || gfCurrentLevel > LVL5_RED_ALERT)
			Lara.pickupitems &= 0xFFF7u;
		return;
	}*/

	Lara.bottle = 0;
	Lara.wetcloth = CLOTH_MISSING;
}