#include "framework.h"
#include "Objects/Generic/Traps/dart_emitter.h"
#include "level.h"
#include "lara.h"
#include "effects\effects.h"
#include "items.h"
#include "Sound\sound.h"
#include "item.h"
namespace TEN::Entities::Traps
{
	void DartControl(short itemNumber)
	{
		ITEM_INFO* item = &g_Level.Items[itemNumber];

		if (item->touchBits)
		{
			LaraItem->hitPoints -= 25;
			LaraItem->hitStatus = true;
			Lara.poisoned += 160;
			DoBloodSplat(item->pos.xPos, item->pos.yPos, item->pos.zPos, (GetRandomControl() & 3) + 4, LaraItem->pos.yRot, LaraItem->roomNumber);
			KillItem(itemNumber);
		}
		else
		{
			int oldX = item->pos.xPos;
			int oldZ = item->pos.zPos-1000;

			int speed = item->speed * phd_cos(item->pos.xRot);

			item->pos.xPos += speed * phd_sin(item->pos.yRot);
			item->pos.yPos -= item->speed * phd_sin(item->pos.xRot);
			item->pos.zPos += speed * phd_cos(item->pos.yRot);

			short roomNumber = item->roomNumber;
			FLOOR_INFO* floor = GetFloor(item->pos.xPos, item->pos.yPos, item->pos.zPos, &roomNumber);

			if (item->roomNumber != roomNumber)
				ItemNewRoom(itemNumber, roomNumber);

			int height = GetFloorHeight(floor, item->pos.xPos, item->pos.yPos, item->pos.zPos);
			item->floor = height;

			if (item->pos.yPos >= height)
			{
				for (int i = 0; i < 4; i++)
				{
					TriggerDartSmoke(oldX, item->pos.yPos, oldZ, 0, 0, true);
				}

				KillItem(itemNumber);
			}
		}
	}

	void DartEmitterControl(short itemNumber)
	{
		ITEM_INFO* item = &g_Level.Items[itemNumber];

		if (item->active)
		{
			if (item->timer > 0)
			{
				item->timer--;
				return;
			}
			else
			{
				item->timer = 24;
			}
		}

		short dartItemNumber = CreateItem();

		if (dartItemNumber != NO_ITEM)
		{
			ITEM_INFO* dartItem = &g_Level.Items[dartItemNumber];

			dartItem->objectNumber = ID_DARTS;
			dartItem->roomNumber = item->roomNumber;

			int x = 0;
			int z = 0;

			switch (item->pos.yRot)
			{
			case 0:
				z = WALL_SIZE / 2;
				break;

			case 0x4000:
				x = WALL_SIZE / 2;
				break;

			case -0x8000:
				z = -WALL_SIZE / 2;
				break;

			case -0x4000:
				x = -WALL_SIZE / 2;
				break;
			}

			dartItem->pos.xPos = x + item->pos.xPos;
			dartItem->pos.yPos = item->pos.yPos - WALL_SIZE / 2;
			dartItem->pos.zPos = z + item->pos.zPos;

			InitialiseItem(dartItemNumber);

			dartItem->pos.xRot = 0;
			dartItem->pos.yRot = item->pos.yRot + -ANGLE(180);
			dartItem->speed = 256;

			int xf = 0;
			int zf = 0;

			if (x)
				xf = abs(2 * x) - 1;
			else
				zf = abs(2 * z) - 1;

			for (int i = 0; i < 5; i++)
			{
				int random = -GetRandomControl();

				int xv = 0;
				int zv = 0;

				if (z >= 0)
					zv = zf & random;
				else
					zv = -(zf & random);

				if (x >= 0)
					xv = xf & random;
				else
					xv = -(xf & random);

				TriggerDartSmoke(dartItem->pos.xPos, dartItem->pos.yPos, dartItem->pos.zPos, xv, zv, false);
			}

			AddActiveItem(dartItemNumber);
			dartItem->status = ITEM_ACTIVE;

			SoundEffect(SFX_TR4_DART_SPITT, &dartItem->pos, 0);
		}
	}

	void TriggerDartSmoke(int x, int y, int z, int xv, int zv, bool hit)
	{
		int dx = LaraItem->pos.xPos - x;
		int dz = LaraItem->pos.zPos - z;

		if (dx < -16384 || dx > 16384 || dz < -16384 || dz > 16384)
			return;

		SPARKS* spark = &Sparks[GetFreeSpark()];

		spark->on = true;
		
		spark->sR = 16;
		spark->sG = 8;
		spark->sB = 4;
		
		spark->dR = 64;
		spark->dG = 48;
		spark->dB = 32;

		spark->colFadeSpeed = 8;
		spark->fadeToBlack = 4;

		spark->transType = COLADD;

		spark->life = spark->sLife = (GetRandomControl() & 3) + 32;
	
		spark->x = x + ((GetRandomControl() & 31) - 16);
		spark->y = y + ((GetRandomControl() & 31) - 16);
		spark->z = z + ((GetRandomControl() & 31) - 16);
		
		if (hit)
		{
			spark->xVel = -xv + ((GetRandomControl() & 255) - 128);
			spark->yVel = -(GetRandomControl() & 3) - 4;
			spark->zVel = -zv + ((GetRandomControl() & 255) - 128);
			spark->friction = 3;
		}
		else
		{
			if (xv)
				spark->xVel = -xv;
			else
				spark->xVel = ((GetRandomControl() & 255) - 128);
			spark->yVel = -(GetRandomControl() & 3) - 4;
			if (zv)
				spark->zVel = -zv;
			else
				spark->zVel = ((GetRandomControl() & 255) - 128);
			spark->friction = 3;
		}

		spark->friction = 3;

		if (GetRandomControl() & 1)
		{
			spark->flags = SP_EXPDEF | SP_ROTATE | SP_DEF | SP_SCALE;
			spark->rotAng = GetRandomControl() & 0xFFF;
			if (GetRandomControl() & 1)
				spark->rotAdd = -16 - (GetRandomControl() & 0xF);
			else
				spark->rotAdd = (GetRandomControl() & 0xF) + 16;
		}
		else
		{
			spark->flags = SP_EXPDEF | SP_DEF | SP_SCALE;
		}
	
		spark->scalar = 1;

		int size = (GetRandomControl() & 63) + 72;
		if (hit)
		{
			size >>= 1;
			spark->size = spark->sSize = size >> 2;
			spark->gravity = spark->maxYvel = 0;
		}
		else
		{
			spark->size = spark->sSize = size >> 4;
			spark->gravity = -(GetRandomControl() & 3) - 4;
			spark->maxYvel = -(GetRandomControl() & 3) - 4;
		}

		spark->dSize = size;
	}
}