#include <a_samp>
#include <utils>

#define FILTERSCRIPT

#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_RED 0xAA3333AA
#define COLOR_LIGHTRED 0xFF6347AA
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1

forward CheckHealth(playerid);
forward PlayerToPoint(Float:radi, playerid, Float:x, Float:y, Float:z);
forward beingrevived(giveplayerid,playerid);
forward reviveddone(giveplayerid,playerid);

new FirstTime[MAX_PLAYERS];
new OnFloor[MAX_PLAYERS];
new revid[MAX_PLAYERS];

#if defined FILTERSCRIPT

public OnFilterScriptInit()
{
	print("\n--------------------------------------");
	print(" Revive System by Darren Reeder / Mowgli");
	print("--------------------------------------\n");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}


#endif

public PlayerToPoint(Float:radi, playerid, Float:x, Float:y, Float:z)
{
   new Float:oldposx, Float:oldposy, Float:oldposz;
   new Float:tempposx, Float:tempposy, Float:tempposz;
   GetPlayerPos(playerid, oldposx, oldposy, oldposz);
   tempposx = (oldposx -x);
   tempposy = (oldposy -y);
   tempposz = (oldposz -z);
   //printf("DEBUG: X:%f Y:%f Z:%f",posx,posy,posz);
   if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))
   {
       return 1;
   }
   return 0;
}

public CheckHealth(playerid)
{
    new Float:health;
    GetPlayerHealth(playerid,health);

	if(health >= 1 && health <= 10)
	{
	    if(FirstTime[playerid] == 0)
	    {
			SendClientMessage(playerid,COLOR_RED,"You are Dieing, you need to be revived or you can /suicide");
		}
		TogglePlayerControllable(playerid,0);
		FirstTime[playerid] = 1;
		OnFloor[playerid] = 1;
		ApplyAnimation(playerid,"CRACK","crckdeth2",4.0,0,0,0,1,1);
	}

	return 1;
}

public OnPlayerConnect(playerid)
{
	SetTimerEx("CheckHealth",100,1,"d",playerid);
	FirstTime[playerid] = 0; OnFloor[playerid] = 0; revid[playerid] = 0;
	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    FirstTime[playerid] = 0; OnFloor[playerid] = 0; revid[playerid] = 0;
	return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	if(OnFloor[playerid] == 1)
	{
	OnFloor[playerid] = 0;
	TogglePlayerControllable(playerid,1);
	}

	return 1;
}

public OnVehicleSpawn(vehicleid)
{
	return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
	return 1;
}

public OnPlayerText(playerid, text[])
{
	return 1;
}

public OnPlayerPrivmsg(playerid, recieverid, text[])
{
	return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
	dcmd(revive,6,cmdtext);
	if (strcmp("/revivehelp", cmdtext, true, 10) == 0)
	{
	    SendClientMessage(playerid,COLOR_LIGHTBLUE,"When someones Health bar has reached to 10 they then have 5 minutes");
        SendClientMessage(playerid,COLOR_LIGHTBLUE,"to either /suicide or be /revive'd by somone. If you are revived, your");
        SendClientMessage(playerid,COLOR_LIGHTBLUE,"health is set back to 50.");
        SendClientMessage(playerid,COLOR_LIGHTBLUE,"**Revive System created by Mowgli**");
		return 1;
	}
 	if (strcmp("/suicide", cmdtext, true, 10) == 0)
	{
	    if(OnFloor[playerid] == 1)
		{
	    	SendClientMessage(playerid,COLOR_LIGHTRED,"You close your eyes and slowly Grab your knife and Stab your heart.");
			SetPlayerHealth(playerid,0);
			FirstTime[playerid] = 0;
			OnFloor[playerid] = 0;
			return 1;
		}
		else if(OnFloor[playerid] == 0)
		{
		    SendClientMessage(playerid,COLOR_LIGHTRED,"You are not Dieing.");
		}
		return 1;
	}
	return 0;
}

dcmd_revive(playerid,params[])
{
	new string[128];
	new giveplayerid;
	new idx,tmpit[256];
	tmpit = strtok(params,idx);
 	giveplayerid = ReturnUser(tmpit);
	if(!strlen(tmpit))
	{
 		SendClientMessage(playerid,COLOR_LIGHTRED,"Usage: /revive [playerid]");
 		return true;
	}
  	new playername[MAX_PLAYER_NAME];
	GetPlayerName(playerid, playername, sizeof(playername));

 	new onfloorname[MAX_PLAYER_NAME];
	GetPlayerName(giveplayerid, onfloorname, sizeof(onfloorname));

	new Float:px, Float:py, Float:pz;
	GetPlayerPos(giveplayerid,px,py,pz);

 	if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid,COLOR_RED, "That player is not connected");
	else if(giveplayerid == playerid) return SendClientMessage(playerid, COLOR_RED, "You cannot revive yourself!");
	else if(!PlayerToPoint(3.0,playerid,px,py,pz)) return SendClientMessage(playerid, COLOR_RED, "You are not close enough!");
	else if(OnFloor[giveplayerid] == 0) return SendClientMessage(playerid,COLOR_RED,"That player does not need reviveing");


	if(PlayerToPoint(3.0,playerid,px,py,pz))
	{
	    if(IsPlayerConnected(giveplayerid))
		{
			format(string, sizeof(string), "you are reviving %s", onfloorname);
			SendClientMessage(playerid, COLOR_LIGHTBLUE, string);

  			format(string, sizeof(string), "you are being revived by %s", playername);
			SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);

			revid[playerid] = giveplayerid;
			SetTimerEx("beingrevived", 10000, 0, "i", playerid);
			return 1;
		}
		SendClientMessage(playerid,COLOR_RED,"INVALID ID");
		return 1;
	}
	SendClientMessage(playerid,COLOR_RED,"You are not close enough");
    return 1;
}

strtok(const string[], &index)
{
	new length = strlen(string);
	while ((index < length) && (string[index] <= ' '))
	{
		index++;
	}

	new offset = index;
	new result[20];
	while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
	{
		result[index - offset] = string[index];
		index++;
	}
	result[index - offset] = EOS;
	return result;
}

public OnPlayerInfoChange(playerid)
{
	return 1;
}

public beingrevived(giveplayerid,playerid)
{
    new giveplayer = revid[playerid];
	new string[128];
  	new onfloorguy[MAX_PLAYER_NAME];
	GetPlayerName(giveplayer, onfloorguy, sizeof(onfloorguy));

 	new reviver[MAX_PLAYER_NAME];
	GetPlayerName(playerid, reviver, sizeof(reviver));

	format(string, sizeof(string), "you have been revived by %s", reviver);
	SendClientMessage(giveplayer, COLOR_LIGHTBLUE, string);

 	format(string, sizeof(string), "you have revived %s", onfloorguy);
	SendClientMessage(playerid, COLOR_LIGHTBLUE, string);

	SetPlayerHealth(giveplayer, 50);
	SetTimerEx("reviveddone", 1000, 0, "i", playerid);
	return 1;
}

public reviveddone(giveplayerid,playerid)
{
    new giveplayer = revid[playerid];
	TogglePlayerControllable(giveplayer,1);
	FirstTime[giveplayer] = 0;
	OnFloor[giveplayer] = 0;
	ClearAnimations(giveplayer);
	revid[playerid] = 0;
	return 1;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
	return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
	return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
	return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
	return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
	return 1;
}

public OnRconCommand(cmd[])
{
	return 1;
}

public OnObjectMoved(objectid)
{
	return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
	return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
	return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
	return 1;
}

public OnPlayerExitedMenu(playerid)
{
	return 1;
}