Coin System By S&C AkA Cirs_Carandente

/* FilterScript Creato Interamente da S&C AkA Cirs_Carandente 2011*
 * Vecchie Versioni: 1.0 & 1.1
 * Versione Corrente: 1.2
 * Non rimuovere i Crediti, Grazie! :)
 * Cose Aggiunte nella versione 1.2: Coins Oro, Argento E Bronzo Viusalizzati in TextDraw.
 * Cose aggiunte nella prossima versione (1.3): Alcuni comandi in Dialog.
 * ATTENZIONE: Prima di usare questo FilterScript Assicurarsi di avere la cartella "GoldCoin" nella cartella ScriptFile...
*/

#include <a_samp>
#include <dini>
#include <dcmd>

//====||Colori||====
#define NERO 0x000000AA
#define ROSSO 0xF60000AA
#define VERDE 0x00F600AA
#define BLU 0x0000F6AA
#define GIALLO 0xF6F600AA
#define BIANCO 0xF6F6F6AA
#define BRONZO 0xF65300AA


#define dcmd(%1,%2,%3) if (!strcmp((%3)[1], #%1, true, (%2)) && ((((%3)[(%2) + 1] == '\0') && (dcmd_%1(playerid, ""))) || (((%3)[(%2) + 1] == ' ') && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1

#define CAMBIACOIN Coin*500 //Cambiate il 500 con i soldi che dovrà ricevere al Cambio Es: Se il Player cambia 1 Coin ORO ricevera 500,
//Se volete che riceve 1000 ogni 1Coin mettete 1000al posto del 500 ;) Spero che avete capito...

#define Player "GoldCoin/%s.ini"

enum CoinsSystem
{
	 Oro,
	 Argento,
	 Bronzo,
}
new Coins[MAX_PLAYERS][CoinsSystem];
/*TextDraw Coins*/
new Text:ORO;
new Text:Argentoc;
new Text:Bronzoc;
/*Fine TextDraw Coins*/

new file[256], Nome[24], Nomer[24];

public OnFilterScriptInit()
{
	print("\n--------------------------------------");
	print(" Blank Filterscript by your name here");
	print("--------------------------------------\n");
    ORO = TextDrawCreate(497.000000, 96.000000, "O:");
    TextDrawBackgroundColor(ORO, 255);
    TextDrawFont(ORO, 1);
    TextDrawLetterSize(ORO, 0.509999, 2.200000);
    TextDrawColor(ORO, -65281);
    TextDrawSetOutline(ORO, 0);
    TextDrawSetProportional(ORO, 1);
    TextDrawSetShadow(ORO, 1);
	SetTimer("CheckCoinO", 5000, true);

    Argentoc = TextDrawCreate(497.000000, 113.000000, "A:");
    TextDrawBackgroundColor(Argentoc, 255);
    TextDrawFont(Argentoc, 1);
    TextDrawLetterSize(Argentoc, 0.599999, 2.200000);
    TextDrawColor(Argentoc, BIANCO);
    TextDrawSetOutline(Argentoc, 0);
    TextDrawSetProportional(Argentoc, 1);
    TextDrawSetShadow(Argentoc, 1);
 	SetTimer("CheckCoinA", 5000, true);

    Bronzoc = TextDrawCreate(497.000000, 134.000000, "B:");
    TextDrawBackgroundColor(Bronzoc, 255);
    TextDrawFont(Bronzoc, 1);
    TextDrawLetterSize(Bronzoc, 0.509999, 2.200000);
    TextDrawColor(Bronzoc, BRONZO);
    TextDrawSetOutline(Bronzoc, 0);
    TextDrawSetProportional(Bronzoc, 1);
    TextDrawSetShadow(Bronzoc, 1);
    SetTimer("CheckCoinB", 5000, true);

	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

public OnPlayerConnect(playerid)
{
    GetPlayerName(playerid, Nome,sizeof(Nome));
    format(file,sizeof(file),Player, Nome);
	if(!dini_Exists(file))
	{
	dini_Create(file);
	dini_IntSet(file, "Oro", Coins[playerid][Oro]);
	dini_IntSet(file, "Argento", Coins[playerid][Argento]);
	dini_IntSet(file, "Bronzo", Coins[playerid][Bronzo]);
	}
	Coins[playerid][Oro] = dini_Int(file, "Oro");
	Coins[playerid][Argento] = dini_Int(file, "Argento");
	Coins[playerid][Bronzo] = dini_Int(file, "Bronzo");
	SendClientMessage(playerid, BLU, "Questo Server usa il ''Coins System'' By S&C AkA Cirs_Carandente");
	SendClientMessage(playerid, BLU, "Usa /ccmds per i comandi del Coins System...");
	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    GetPlayerName(playerid,Nome,sizeof(Nome));
    format(file,sizeof(file),Player,Nome);
   	dini_IntSet(file, "Oro", Coins[playerid][Oro]);
	dini_IntSet(file, "Argento", Coins[playerid][Argento]);
	dini_IntSet(file, "Bronzo", Coins[playerid][Bronzo]);
	return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
	dcmd(daicoinso, 9, cmdtext);
	dcmd(daicoinsa, 9, cmdtext);
	dcmd(daicoinsb, 9, cmdtext);
	dcmd(ccmds, 5, cmdtext);
	dcmd(givecoinso, 10, cmdtext);
	dcmd(givecoinsa, 10, cmdtext);
	dcmd(givecoinsb, 10, cmdtext);
	dcmd(checkcoin, 9, cmdtext);
	dcmd(coin, 4, cmdtext);
	dcmd(cambiacoin, 10, cmdtext);
	dcmd(resetcoin, 9, cmdtext);
	return 0;
}

dcmd_ccmds(playerid, params[])
{
#pragma unused params
SendClientMessage(playerid, GIALLO, "Sistema Coins Creato da S&C AkA Cirs_Carandente");
SendClientMessage(playerid, GIALLO, "/daicoinso Per dare i coins Oro alle persone");
SendClientMessage(playerid, GIALLO, "/daicoinsa Per dare i coins Argento alle persone");
SendClientMessage(playerid, GIALLO, "/daicoinsb Per dare i coins Bronzo alle persone");
SendClientMessage(playerid, GIALLO, "/cambiacoin Per Cambiare i Con ORO in Soldi!");
SendClientMessage(playerid, GIALLO, "/coin Per vedere i tuoi coins");
if(IsPlayerAdmin(playerid))
{
SendClientMessage(playerid, GIALLO, "Comandi Admin!:");
SendClientMessage(playerid, GIALLO, "/givecoinso Per givare i coins Oro");
SendClientMessage(playerid, GIALLO, "/givecoinsa Per givare i coins Argento");
SendClientMessage(playerid, GIALLO, "/givecoinsb Per give i coins Bronzo");
SendClientMessage(playerid, GIALLO, "/checkcoin Per vedere i coins di qualche altro player!");
SendClientMessage(playerid, GIALLO, "/resetcoin Per resettare i coin di un player");
}
return 1;
}

dcmd_daicoinso(playerid, params[])
{
new Ricevente, Coin, string[256];
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinso <Playerid> <Coins Oro>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo Player non e connesso");
else if(Ricevente == playerid)return SendClientMessage(playerid, ROSSO, "Non puoi Darti i Coins Da Solo");
else if(Coin > Coins[playerid][Oro])return SendClientMessage(playerid, ROSSO, "Non hai tutti questi GOLD!");
else
{
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
Coins[playerid][Oro] -= Coin;
Coins[Ricevente][Oro] += Coin;
dini_IntSet(file, "Oro", Coins[playerid][Oro]);
format(string,sizeof(string), "%s ti ha dato $d Coins Oro!!", Nome, Coin);
SendClientMessage(Ricevente, VERDE, string);
format(string,sizeof(string), "Hai dato %d Coins Oro a %s ", Coin, Nomer);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}

dcmd_daicoinsa(playerid, params[])
{
new Ricevente, Coin, string[256];
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinso <Playerid> <Coins Oro>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo Player non e connesso");
else if(Ricevente == playerid)return SendClientMessage(playerid, ROSSO, "Non puoi Darti i Coins Da Solo");
else if(Coin > Coins[playerid][Argento])return SendClientMessage(playerid, ROSSO, "Non hai tutti questi GOLD!");
else
{
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
Coins[playerid][Argento] -= Coin;
Coins[Ricevente][Argento] += Coin;
dini_IntSet(file, "Argento", Coins[playerid][Argento]);
format(string,sizeof(string), "%s ti ha dato %d Coins Argento!!", Nome, Coin);
SendClientMessage(Ricevente, VERDE, string);
format(string,sizeof(string), "Hai dato %d Coins Argento a %s ", Coin, Nomer);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}
dcmd_daicoinsb(playerid, params[])
{
new Ricevente, Coin, string[256];
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinso <Playerid> <Coins Oro>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo Player non e connesso");
else if(Ricevente == playerid)return SendClientMessage(playerid, ROSSO, "Non puoi Darti i Coins Da Solo");
else if(Coin > Coins[playerid][Bronzo])return SendClientMessage(playerid, ROSSO, "Non hai tutti questi GOLD!");
else
{
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
Coins[Ricevente][Bronzo] += Coin;
Coins[playerid][Bronzo] -= Coin;
dini_IntSet(file, "Bronzo", Coins[playerid][Bronzo]);
format(string,sizeof(string), "%s ti ha dato $d Coins Bronzo!!", Nome, Coin);
SendClientMessage(Ricevente, VERDE, string);
format(string,sizeof(string), "Hai dato %d Coins Bronzo a %s ", Coin, Nomer);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}

dcmd_givecoinso(playerid, params[])
{
new Ricevente, Coin, string[256];
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinso <Playerid> <Coins Oro>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo player non e connesso");
else if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid, ROSSO, "Non Sei un Admin!!");
else
{
Coins[Ricevente][Oro] += Coin;
dini_IntSet(file, "Oro", Coins[Ricevente][Oro]);
format(string,sizeof(string), "L'Admin %s ti ha dato %d Coins Oro!!", Nome, Coin);
SendClientMessage(Ricevente, VERDE, string);
format(string,sizeof(string), "Hai dato %d Coins Oro a %s ", Coin, Nomer);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}
dcmd_coin(playerid, params[])
{
#pragma unused params
new string[256];
format(string,sizeof(string), "Coins Oro: %d - Coins Argento: %d Coins Bronzo: %d", Coins[playerid][Oro], Coins[playerid][Argento], Coins[playerid][Bronzo]);
SendClientMessage(playerid, GIALLO, string);
return 1;
}

dcmd_checkcoin(playerid, params[])
{
new Ricevente, string[256];
if(sscanf(params, "u", Ricevente)) return SendClientMessage(playerid, ROSSO, "Usa: /checkcoins <Playerid>");
else if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid, ROSSO, "Non Sei un Admin!!");
else
{
format(string,sizeof(string), "Coins Oro: %d - Coins Argento: %d Coins Bronzo: %d", Coins[Ricevente][Oro], Coins[Ricevente][Argento], Coins[Ricevente][Bronzo]);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}


dcmd_givecoinsa(playerid, params[])
{
new Ricevente, Coin, string[256];
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinsa <Playerid> <Coins Argento>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo player non e connesso");
else if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid, ROSSO, "Non Sei un Admin!!");
else
{
    Coins[Ricevente][Argento] += Coin;
    dini_IntSet(file, "Argento", Coins[Ricevente][Argento]);
    format(string,sizeof(string), "L'Admin %s ti ha dato %d Coins Argento!!", Nome, Coin);
    SendClientMessage(Ricevente, VERDE, string);
    format(string,sizeof(string), "Hai dato %d Coins Argento a %s ", Coin, Nomer);
    SendClientMessage(playerid, VERDE, string);
}
return 1;
}

dcmd_givecoinsb(playerid, params[])
{
new Ricevente, Coin, string[256];
GetPlayerName(playerid, Nome,sizeof(Nome));
GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
format(file,sizeof(file),Player, Nome);
if(sscanf(params, "dd", Ricevente, Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /daicoinsb <Playerid> <Coins Bronzo>");
else if(Ricevente == INVALID_PLAYER_ID)return SendClientMessage(playerid, ROSSO, "Questo player non e connesso");
else if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid, ROSSO, "Non Sei un Admin!!");
else
{
Coins[Ricevente][Bronzo] += Coin;
dini_IntSet(file, "Bronzo", Coins[Ricevente][Bronzo]);
format(string,sizeof(string), "L'Admin %s ti ha dato %d Coin Bronzo!!", Nome, Coin);
SendClientMessage(Ricevente, VERDE, string);
format(string,sizeof(string), "Hai dato %d Coins Bronzo a %s ", Coin, Nomer);
SendClientMessage(playerid, VERDE, string);
}
return 1;
}

dcmd_cambiacoin(playerid, params[])
{
new Coin, string[256];
if(sscanf(params, "d", Coin)) return SendClientMessage(playerid, ROSSO, "Usa: /cambiasoldi <Coins Da cambiare in Soldi> (1 Coins = 500$).");
else if(Coins[playerid][Oro] < Coin)return SendClientMessage(playerid, ROSSO, "Non hai tutti questi Coins Da Cambiare in Soldi!!");
else
{
	 Coins[playerid][Oro] -= Coin;
	 GivePlayerMoney(playerid, CAMBIACOIN);
	 format(string,sizeof(string), "Hai Cambiato %d Coins per $%d!", Coin, Coin*500);
     SendClientMessage(playerid, VERDE, string);
}
return 1;
}
dcmd_resetcoin(playerid, params[])
{
     new Ricevente, string[256];
     if(sscanf(params, "d", Ricevente)) return SendClientMessage(playerid, ROSSO, "Usa: /resetcoin <PlayerID> Resetta Coin Player.");
     else
	 {
     GetPlayerName(playerid, Nome,sizeof(Nome));
     GetPlayerName(Ricevente, Nomer,sizeof(Nomer));
	 Coins[Ricevente][Oro] = 0;
	 Coins[Ricevente][Argento] = 0;
	 Coins[Ricevente][Bronzo] = 0;
	 format(string,sizeof(string), "L'Admin %s ti ha resettato tutti i Coins!", Nome);
     SendClientMessage(playerid, VERDE, string);
	 format(string,sizeof(string), "Hai resettato tutti i coins di %s!", Nomer);
     SendClientMessage(playerid, VERDE, string);
     }
     return 1;
}

forward CheckCoinO(playerid);
public CheckCoinO(playerid)
{
        new string[20];
		format(string,sizeof(string),"O:%d",Coins[playerid][Oro]);
		TextDrawSetString(ORO,string);
		TextDrawShowForPlayer(playerid, ORO);
		return 1;
}
forward CheckCoinA(playerid);
public CheckCoinA(playerid)
{
        new string[20];
		format(string,sizeof(string),"A:%d",Coins[playerid][Argento]);
		TextDrawSetString(Argentoc,string);
		TextDrawShowForPlayer(playerid, Argentoc);
		return 1;
}
forward CheckCoinB(playerid);
public CheckCoinB(playerid)
{
        new string[20];
		format(string,sizeof(string),"B:%d",Coins[playerid][Bronzo]);
		TextDrawSetString(Bronzoc,string);
		TextDrawShowForPlayer(playerid, Bronzoc);
		return 1;
}