#include a_samp
#include dini
#include zcmd
#include sscanf

enum info
{
szamla,
kartya
}

new micsoda[100];
new pInfo[MAX_PLAYERS][info];

public OnFilterScriptInit()
{
	micsoda = "pont";
	new fle[MAX_PLAYER_NAME];

	for(new i=0; i < MAX_PLAYERS; i++)
	{
	    GetPlayerName(i, fle, sizeof(fle));
	    if(dini_Exists(fle))
	    {
	        if(dini_Int(fle, "Kartya") == 1)
	        {
	            pInfo[i][kartya] = dini_Int(fle, "Kartya");
	            pInfo[i][szamla] = dini_Int(fle, "Bank");
	        }
		}
	}

	return 1;
}

public OnFilterScriptExit()
{
	for(new i=0; i < MAX_PLAYERS; i++)
	{
	    pInfo[i][kartya] = 0;
	    pInfo[i][szamla] = 0;
	}
	return 1;
}

CMD:betesz(playerid,params[])
{
	new
	    osszeg;

	if(sscanf(params,"i",osszeg)) return SendClientMessage(playerid,0x00FF00,"Használat: /betesz [Összeg]");
	{
	    if(pInfo[playerid][kartya] == 1)
	    {
	    	if(osszeg >= GetPlayerScore(playerid))
	    	{
				SetPlayerScore(playerid, GetPlayerScore(playerid) - osszeg);
				pInfo[playerid][szamla] += osszeg;

				new str[180];
				format(str, sizeof(str),"A számládon jelenleg ennyi %s található: %d", micsoda, pInfo[playerid][szamla]);
				SendClientMessage(playerid, -1, str);
			}
			else SendClientMessage(playerid, -1, "Nincs ennyi pontod.");
		}
		else SendClientMessage(playerid, -1, "Nincs bankkártyád.");
	}
	return 1;
}
CMD:kivesz(playerid,params[])
{
	new
	    osszeg;

	if(sscanf(params,"i",osszeg)) return SendClientMessage(playerid,0x00FF00,"Használat: /kivesz [Összeg]");
	{
	    if(pInfo[playerid][kartya] == 1)
	    {
	    	if(osszeg <= pInfo[playerid][szamla])
	    	{
				SetPlayerScore(playerid, GetPlayerScore(playerid) + osszeg);
				pInfo[playerid][szamla] -= osszeg;

				new str[180];
				format(str, sizeof(str),"A számládon jelenleg ennyi %s található: %d", micsoda, pInfo[playerid][szamla]);
				SendClientMessage(playerid, -1, str);
			}
			else SendClientMessage(playerid, -1, "Nincs ennyi pontod.");
		}
		else SendClientMessage(playerid, -1, "Nincs bankkártyád.");
	}
	return 1;
}
CMD:atutal(playerid,params[])
{
	new
	    ID,
		osszeg,
		str[128],
		strr[128],
		File[MAX_PLAYER_NAME],
		Filee[MAX_PLAYER_NAME];

	if(sscanf(params,"ii",ID,osszeg)) return SendClientMessage(playerid,0x00FF00,"Használat: /atutal [ID] [Összeg]");
	{
	    if(IsPlayerConnected(ID))
	    {
			if(pInfo[playerid][kartya] == 1)
			{
	        	if(pInfo[playerid][szamla] >= osszeg)
	      	  	{
					pInfo[ID][szamla] += osszeg;
					GetPlayerName(ID, File, sizeof(File));
					dini_IntSet(File,"Bank",pInfo[ID][szamla]);

					pInfo[playerid][szamla] -= osszeg;
					GetPlayerName(playerid, Filee, sizeof(Filee));
					dini_IntSet(Filee, "Bank",pInfo[playerid][szamla]);

					format(strr, sizeof(strr), "%s átutalt a számládra %d$-t.",Filee,osszeg);
					format(str, sizeof(str),   "%d$-t utaltál %s számlájára.",File, osszeg);

					SendClientMessage(playerid, -1, str);
					SendClientMessage(ID, -1, strr);
				}
				else SendClientMessage(playerid, -1, "Nincs ennyi pénz a számládon.");
			}
			else SendClientMessage(playerid, -1, "Nincs bankkártyád.");
		}
		else SendClientMessage(playerid, -1, "A játékos nincs a szerveren.");
	}
	return 1;
}
CMD:egyenleg(playerid,params[])
{
	new egyenleg[180];

	format(egyenleg, sizeof(egyenleg),"A számládon jelenleg ennyi %s található: %d.", micsoda, pInfo[playerid][szamla]);
	SendClientMessage(playerid, -1, egyenleg);
	return 1;
}
CMD:kartyavesz(playerid,params[])
{
	if(pInfo[playerid][kartya] == 0)
	{
	    if(GetPlayerScore(playerid) >= 1000)
	    {
	        new name[MAX_PLAYER_NAME];
	        GetPlayerName(playerid, name, sizeof(name));
	        pInfo[playerid][kartya] = 1;
	        dini_IntSet(name, "Kartya",pInfo[playerid][kartya]);
	        SendClientMessage(playerid, -1, "Megvetted a bankkártyát 1000 pontért.");
	    }
	    else SendClientMessage(playerid, -1, "Nincs ennyi pontod.(1000)");
	}
	else SendClientMessage(playerid, -1, "Már van bankkártyád.");
	return 1;
}