#include <a_samp>
#include <zcmd>
#include <sscanf2>
#include <foreach>

new pBetDice[MAX_PLAYER_NAME];
new pBetAmount[MAX_PLAYER_NAME];
new Highest[MAX_PLAYER_NAME];

#if defined FILTERSCRIPT

public OnFilterScriptInit()
{
	print("\n--------------------------------------");
	print(" Blank Filterscript by your name here");
	print("--------------------------------------\n");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

#else

main()
{
	print("\n----------------------------------");
	print(" Blank Gamemode by your name here");
	print("----------------------------------\n");
}

#endif

public OnGameModeInit()
{
	// Don't use these lines if it's a filterscript
	SetGameModeText("Blank Script");
	AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
	SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
	SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
	SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
	return 1;
}

public OnPlayerConnect(playerid)
{
    pBetDice[playerid] = 0;
    Highest[playerid] = 0;
    pBetAmount[playerid] = 0;
	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
	return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	return 1;
}

public OnVehicleSpawn(vehicleid)
{
	return 1;
}

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

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

public OnPlayerCommandText(playerid,cmdtext[])
{
	return 0;
}

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 OnPlayerRequestSpawn(playerid)
{
	return 1;
}

public OnObjectMoved(objectid)
{
	return 1;
}

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

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

public OnVehicleMod(playerid, vehicleid, componentid)
{
	return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
	return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
	return 1;
}

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

public OnPlayerExitedMenu(playerid)
{
	return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
	return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
	return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
	return 1;
}

public OnPlayerUpdate(playerid)
{
	return 1;
}

public OnPlayerStreamIn(playerid, forplayerid)
{
	return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
	return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
	return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	return 1;
}

public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
	return 1;
}

CMD:money(playerid, params[])
{
	GivePlayerMoney(playerid, 1000000);
	return 1;
}

CMD:diceroll(playerid, params[])
{
	    new szString[128],
			szString2[128],
			szPlayerName[MAX_PLAYER_NAME],
			iMoney,
			iTarget,
			iTargetDice = iTarget;
	    new dice = random(6)+1;
	    GetPlayerName(playerid, szPlayerName, sizeof(szPlayerName));
		format(szString, sizeof(szString), "* %s rolls a dice that lands on %d.",szPlayerName,dice);
		SendClientMessage(playerid, -1, szString);
		SendClientMessage(iTargetDice, -1, szString);
		Highest[playerid] = dice;
		if(Highest[iTargetDice] == 0) return SendClientMessage(iTargetDice, -1, "You need to /diceroll");
		else if(Highest[playerid] == 0) return SendClientMessage(playerid, -1, "You need to /diceroll");
		else if(Highest[playerid] > Highest[iTargetDice])
		{
		    format(szString, sizeof(szString), "You have lost $%i to %s this was taken from you.", pBetAmount[iTargetDice], szPlayerName);
			SendClientMessage(iTargetDice, -1, szString);
			format(szString, sizeof(szString), "You have won $%i from %s you have been given this.",pBetAmount[playerid],iTargetDice);
			SendClientMessage(playerid, -1, szString);
			GivePlayerMoney(iTargetDice, -pBetAmount[iTargetDice]);
			GivePlayerMoney(playerid, pBetAmount[playerid]);
		}
		else if(Highest[iTargetDice] > Highest[playerid])
		{
		    format(szString, sizeof(szString), "You have lost $%i to %s this was taken from you.", pBetAmount[playerid], iTargetDice);
			SendClientMessage(playerid, -1, szString);
			format(szString, sizeof(szString), "You have won $%i from %s you have been given this.",pBetAmount[iTargetDice], szPlayerName);
			SendClientMessage(iTargetDice, -1, szString);
			GivePlayerMoney(iTargetDice, pBetAmount[iTargetDice]);
			GivePlayerMoney(playerid, -pBetAmount[playerid]);
		}
    return 1;
}

CMD:dicebet(playerid, params[])
{
 	new iTarget,
 		iMoney,
 		szPlayerName[MAX_PLAYER_NAME],
 		szPlayerName2[MAX_PLAYER_NAME],
 		szString[256],
		iTargetDice = iTarget;

	GetPlayerName(playerid, szPlayerName, sizeof(szPlayerName));
	GetPlayerName(iTarget, szPlayerName2, sizeof(szPlayerName2));
	if(sscanf(params, "ui", iTarget, iMoney)) return SendClientMessage(playerid, -1, "USAGE: /dicebet [playerid/partofname] [money]");
	if(GetPlayerMoney(playerid) < iMoney || GetPlayerMoney(iTarget) < iMoney) return SendClientMessage(playerid, -1, "Either you or the other person does not have that amount of money.");
	format(szString, sizeof(szString), "%s has offered you to bet $%i (Use /acceptdice to accept)", szPlayerName, iMoney);
	SendClientMessage(iTarget, -1, szString);
	format(szString, sizeof(szString), "You have offered %s to bet $%i", szPlayerName2, iMoney);
	SendClientMessage(playerid, -1, szString);
	pBetDice[iTarget] = 255; pBetAmount[iTarget] = iMoney;
	pBetDice[playerid] = 255; pBetAmount[playerid] = iMoney;
	return 1;
}

CMD:acceptdice(playerid, params[])
{
    new iTarget,
		szPlayerName[MAX_PLAYER_NAME],
		szPlayerName2[MAX_PLAYER_NAME],
		szString[256],
		iMoney = pBetAmount[playerid],
		iMoney2 = pBetAmount[iTarget],
		BidAccepter;

    GetPlayerName(playerid, szPlayerName, sizeof(szPlayerName));
	GetPlayerName(iTarget, szPlayerName2, sizeof(szPlayerName2));
	if(pBetDice[iTarget] == 255 && pBetDice[playerid] == 255)
	{
	    pBetDice[iTarget] = 1;
	    pBetDice[playerid] = 1;
	   	format(szString, sizeof(szString), "You accepted %s's Bet of $%i", szPlayerName, iMoney);
		SendClientMessage(iTarget, -1, szString);
		format(szString, sizeof(szString), "%s has accepted your $%i bet", szPlayerName2, iMoney2);
		SendClientMessage(playerid, -1, szString);
		BidAccepter = playerid;
	}
	return 1;
}