Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include < a_samp >
- #include < dini >
- #include < zcmd >
- #include < sscanf2 >
- #define PlayerFile "Tokens/%s.ini"
- #define YELLOW 0xFFFF00FF
- #define RED 0xAA3333AA
- #define DIALOG_PCMDS 1234
- #define DIALOG_RCMDS 3456
- enum PLAYER_TOKENS
- {
- MagicToken,
- GoldToken,
- SilverToken,
- BronzeToken
- }
- new pInfo[MAX_PLAYERS][PLAYER_TOKENS];
- new gstring[256];
- new giveplayerid;
- public OnPlayerConnect(playerid)
- {
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- if(!dini_Exists(file)) {
- dini_Create(file);
- dini_IntSet(file,"Magic_Tokens:", pInfo[playerid][MagicToken]);
- dini_IntSet(file,"Gold_Tokens:", pInfo[playerid][GoldToken]);
- dini_IntSet(file,"Silver_Tokens:", pInfo[playerid][SilverToken]);
- dini_IntSet(file,"Bronze_Tokens:", pInfo[playerid][BronzeToken]);
- }
- pInfo[playerid][MagicToken] = dini_Int(file,"Magic_Tokens:");
- pInfo[playerid][GoldToken] = dini_Int(file,"Gold_Tokens:");
- pInfo[playerid][SilverToken] = dini_Int(file,"Silver_Tokens:");
- pInfo[playerid][BronzeToken] = dini_Int(file,"Bronze_Tokens:");
- return 1;
- }
- public OnPlayerDisconnect(playerid, reason)
- {
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- dini_IntSet(file,"Magic_Tokens:", pInfo[playerid][MagicToken]);
- dini_IntSet(file,"Gold_Tokens:", pInfo[playerid][GoldToken]);
- dini_IntSet(file,"Silver_Tokens:", pInfo[playerid][SilverToken]);
- dini_IntSet(file,"Bronze_Tokens:", pInfo[playerid][BronzeToken]);
- return 1;
- }
- CMD:usemt(playerid, o[])
- {
- GivePlayerMoney (playerid,100000);
- GivePlayerWeapon(playerid,27,1000);
- GivePlayerWeapon(playerid,32,1000);
- GivePlayerWeapon(playerid,24,1000);
- GivePlayerWeapon(playerid,31,1000);
- GivePlayerWeapon(playerid,34,1000);
- GivePlayerWeapon(playerid,16,1000);
- GivePlayerWeapon(playerid,9,1);
- SendClientMessage(playerid,YELLOW,"* You just use 1 of your magic token *");
- pInfo[playerid][MagicToken] -= 1;
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- dini_IntSet(file,"Magic_Tokens", pInfo[playerid][MagicToken]);
- return 1;
- }
- CMD:usegt(playerid, o[])
- {
- GivePlayerMoney (playerid,75000);
- GivePlayerWeapon(playerid,27,1000);
- GivePlayerWeapon(playerid,32,1000);
- GivePlayerWeapon(playerid,24,1000);
- GivePlayerWeapon(playerid,31,1000);
- GivePlayerWeapon(playerid,34,1000);
- GivePlayerWeapon(playerid,9,1);
- SendClientMessage(playerid,YELLOW,"* You just use 1 of your gold token *");
- pInfo[playerid][GoldToken] -= 1;
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- dini_IntSet(file,"Gold_Tokens", pInfo[playerid][GoldToken]);
- return 1;
- }
- CMD:usest(playerid, o[])
- {
- GivePlayerMoney (playerid,45000);
- GivePlayerMoney (playerid,75000);
- GivePlayerWeapon(playerid,27,1000);
- GivePlayerWeapon(playerid,32,1000);
- GivePlayerWeapon(playerid,24,1000);
- GivePlayerWeapon(playerid,31,1000);
- GivePlayerWeapon(playerid,9,1);
- SendClientMessage(playerid,YELLOW,"* You just use 1 of your silver token *");
- pInfo[playerid][SilverToken] -= 1;
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- dini_IntSet(file,"Silver_Tokens", pInfo[playerid][SilverToken]);
- return 1;
- }
- CMD:usebt(playerid, o[])
- {
- GivePlayerMoney (playerid,10000);
- GivePlayerMoney (playerid,75000);
- GivePlayerWeapon(playerid,27,1000);
- GivePlayerWeapon(playerid,24,1000);
- GivePlayerWeapon(playerid,31,1000);
- GivePlayerWeapon(playerid,9,1);
- SendClientMessage(playerid,YELLOW,"* You just use 1 of your bronze token *");
- pInfo[playerid][BronzeToken] -= 1;
- new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- dini_IntSet(file,"Bronze_Tokens", pInfo[playerid][BronzeToken]);
- return 1;
- }
- CMD:mytoken(playerid, o[])
- {
- new pName[MAX_PLAYER_NAME];
- GetPlayerName(playerid, pName, sizeof(pName));
- format(gstring, sizeof(gstring), "|Name: %s|Magic Token:%d|Gold Token:%d|Silver Token:%d|Bronze Token:%d|", pName, pInfo[playerid][MagicToken], pInfo[playerid][GoldToken], pInfo[playerid][SilverToken], pInfo[playerid][BronzeToken]);
- SendClientMessage(playerid, YELLOW, gstring);
- return 1;
- }
- CMD:setgt(playerid, o[])
- {
- new targetid, ammount, receivername[MAX_PLAYER_NAME];
- if(sscanf(o,"ui", targetid, ammount)) return SendClientMessage(playerid, RED,"USAGE: /setgt [ID] [AMOUNT]");
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, RED, "ERROR: Your'nt Rcon Admin");
- new file[100],Name[MAX_PLAYER_NAME],Ip[16],name[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, name, sizeof(name));GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- format(gstring, sizeof(gstring),"* You have succesfully setted %s gold tokens to %d *", receivername, ammount);
- SendClientMessage(playerid, YELLOW, gstring);
- format(gstring, sizeof(gstring), "* Admin has setted your gold tokens to %d *", ammount);
- SendClientMessage(targetid, YELLOW, gstring);
- pInfo[giveplayerid][BronzeToken] = ammount;
- dini_IntSet(file,"Gold_Tokens", pInfo[giveplayerid][GoldToken]);
- return 1;
- }
- CMD:setst(playerid, o[])
- {
- new targetid, ammount, receivername[MAX_PLAYER_NAME];
- if(sscanf(o,"ui", targetid, ammount)) return SendClientMessage(playerid, RED,"USAGE: /setst [ID] [AMOUNT]");
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, RED, "ERROR: Your'nt Rcon Admin");
- new file[100],Name[MAX_PLAYER_NAME],Ip[16],name[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, name, sizeof(name));GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- format(gstring, sizeof(gstring),"* You have succesfully setted %s silver tokens to %d *", receivername, ammount);
- SendClientMessage(playerid, YELLOW, gstring);
- format(gstring, sizeof(gstring), "* Admin has setted your silver tokens to %d *", ammount);
- SendClientMessage(targetid, YELLOW, gstring);
- pInfo[giveplayerid][SilverToken] = ammount;
- dini_IntSet(file,"Silver_Tokens", pInfo[giveplayerid][SilverToken]);
- return 1;
- }
- CMD:setmt(playerid, o[])
- {
- new targetid, ammount, receivername[MAX_PLAYER_NAME];
- if(sscanf(o,"ui", targetid, ammount)) return SendClientMessage(playerid, RED,"USAGE: /setmt [ID] [AMOUNT]");
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, RED, "ERROR: Your'nt Rcon Admin");
- new file[100],Name[MAX_PLAYER_NAME],Ip[16],name[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, name, sizeof(name));GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- format(gstring, sizeof(gstring),"* You have succesfully setted %s magic tokens to %d *", receivername, ammount);
- SendClientMessage(playerid, YELLOW, gstring);
- format(gstring, sizeof(gstring), "* Admin has setted your magic tokens to %d *", ammount);
- SendClientMessage(targetid, YELLOW, gstring);
- pInfo[giveplayerid][MagicToken] = ammount;
- dini_IntSet(file,"BMagic_Tokens", pInfo[giveplayerid][MagicToken]);
- return 1;
- }
- CMD:setbt(playerid, o[])
- {
- new targetid, ammount, receivername[MAX_PLAYER_NAME];
- if(sscanf(o,"ui", targetid, ammount)) return SendClientMessage(playerid, RED,"USAGE: /setbt [ID] [AMOUNT]");
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, RED, "ERROR: Your'nt Rcon Admin");
- new file[100],Name[MAX_PLAYER_NAME],Ip[16],name[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, name, sizeof(name));GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
- format(gstring, sizeof(gstring),"* You have succesfully setted %s bronze tokens to %d *", receivername, ammount);
- SendClientMessage(playerid, YELLOW, gstring);
- format(gstring, sizeof(gstring), "* Admin has setted your bronze tokens to %d *", ammount);
- SendClientMessage(targetid, YELLOW, gstring);
- pInfo[giveplayerid][BronzeToken] = ammount;
- dini_IntSet(file,"Bronze_Tokens", pInfo[giveplayerid][BronzeToken]);
- return 1;
- }
- CMD:pcmds(playerid, o[])
- {
- ShowPlayerDialog(playerid,DIALOG_PCMDS,DIALOG_STYLE_MSGBOX,"Player Commands","Player Commands:\n/mytoken\n/usemt\n/usegt\n/usest\n/usebt","OK","");
- return 1;
- }
- CMD:rcmds(playerid, o[])
- {
- ShowPlayerDialog(playerid,DIALOG_RCMDS,DIALOG_STYLE_MSGBOX,"Rcon Commands","Rcon Commands:\nAll /pcmds commands\n/setmt [ID] [AMOUNT]\n/setgt [ID] [AMOUNT]\n/setst [ID] [AMOUNT]\n/setbt [ID] [AMOUNT]","OK","");
- return 1;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement