CMD:moneta(playerid,params[])
{
        new ID,Suma,Simbolis[2];
        if(sscanf(params,"uis[2]",ID,Suma,Simbolis)) return SendClientMessage(playerid,-1,"{00ffff}* Pasiūlyti žaidėjui mesti monetą: /moneta [dalis nicko] [statymo suma] [H arba S]");
        if(GetPlayerMoneyA(playerid) < Suma) return SendClientMessage(playerid, Raudona,"{ff0000}* Tu neturi tiek!");
        if(ID == INVALID_PLAYER_ID) return SendClientMessage(playerid,-1,"{ff0000}* Tokio žaidėjo nėra");
        if(PasiuleMID[playerid] != INVALID_PLAYER_ID)
        {
                if(PasiuleMID[playerid] == ID && PasiuleMS[playerid] == Suma)
                {
                        new Rand = random(2),Zin[128];
                        if(Rand == 0)
                        {
                                if(!strcmp(PasiuleMZ[playerid],"s"))
                                {
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito skaičiūs, {00ff00}laimėjote %i €",PasiuleMS[playerid] / 100 * 80);
                                        SendClientMessage(PasiuleMID[playerid],-1,Zin);
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito skaičiūs, {ff0000}pralaimėjote %i €",PasiuleMS[playerid]);
                                        SendClientMessage(playerid,-1,Zin);
                                        GivePlayerMoney(PasiuleMID[playerid], PasiuleMS[playerid] / 100 * 80);
                                        GivePlayerMoney(playerid, -PasiuleMS[playerid]);
                                        }
                                        else
                                        {
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito skaičiūs, {00ff00}laimėjote %i €",PasiuleMS[playerid] / 100 * 80);
                                        SendClientMessage(playerid,-1,Zin);
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito skaičiūs, {ff0000}pralaimėjote %i €",PasiuleMS[playerid]);
                                        SendClientMessage(PasiuleMID[playerid],-1,Zin);
                                        GivePlayerMoney(PasiuleMID[playerid], -PasiuleMS[playerid]);
                                        GivePlayerMoney(playerid, PasiuleMS[playerid] / 100 * 80);
                                }
                        }
                        if(Rand == 1)
                        {
                                if(!strcmp(PasiuleMZ[playerid],"h"))
                                {
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito herbas, {00ff00}laimėjote %i €",PasiuleMS[playerid] / 100 * 80);
                                        SendClientMessage(PasiuleMID[playerid],-1,Zin);
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito herbas, {ff0000}pralaimėjote %i €",PasiuleMS[playerid]);
                                        SendClientMessage(playerid,-1,Zin);
                                        GivePlayerMoney(PasiuleMID[playerid], PasiuleMS[playerid] / 100 * 80);
                                        GivePlayerMoney(playerid, -PasiuleMS[playerid]);
                                        }
                                        else
                                        {
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito herbas, {00ff00}laimėjote %i €",PasiuleMS[playerid] / 100 * 80);
                                        SendClientMessage(playerid,-1,Zin);
                                        format(Zin,sizeof(Zin),"{00ffff}* Iškrito herbas, {ff0000}pralaimėjote %i €",PasiuleMS[playerid]);
                                        SendClientMessage(PasiuleMID[playerid],-1,Zin);
                                        GivePlayerMoney(PasiuleMID[playerid], -PasiuleMS[playerid]);
                                        GivePlayerMoney(playerid, PasiuleMS[playerid] / 100 * 80);
                                }
                        }

                        return 1;
                }
        }
        PasiuleMID[ID] = playerid;
        PasiuleMS[ID] = Suma;
        strins(PasiuleMZ[playerid],Simbolis,0);
        new Names[MAX_PLAYER_NAME],Zin[128];
        GetPlayerName(playerid,Names,24);
        if(!strcmp(Simbolis,"s")){
                format(Zin,sizeof(Zin),"{00ffff}%s pasiūlė jums mesti monetą, jis sako, kad atvirs skaičius, statymas %i€, gali laimėti %i€.",Names,Suma, Suma / 100 * 80);
                SendClientMessage(ID,-1,Zin);
                format(Zin,sizeof(Zin),"{00ffff}* Jeigu sutinki rašyk {00ff00}/moneta %s %i H", Names, Suma, (Simbolis,"h"));
                SendClientMessage(ID,-1,Zin);
        }
        if(!strcmp(Simbolis,"h")){
                format(Zin,sizeof(Zin),"{00ffff}%s pasiūlė jums mesti monetą, jis sako, kad atvirs herbas, statymas %i, gali laimėti %i",Names,Suma, Suma / 100 * 80);
                SendClientMessage(ID,-1,Zin);
                format(Zin,sizeof(Zin),"{00ffff}* Jeigu sutinki rašyk {00ff00}/moneta %s %i S", Names, Suma, (Simbolis,"s"));
                SendClientMessage(ID,-1,Zin);
        }
        return 1;
}