Coins System

onix09 · March 6, 2011

[shadow=black,left]Coins System[/shadow]

[shadow=black,left]Informatii[/shadow]

Acesta este un fs care te ajuta ca prin o optiune poti cumpara ceva daor pt vipi ( un exemplu ). Comenzile acesui fs sunt urmatoarele:

givecoins - dai cuiva coins

coinsof - vezi cati coins are cineva [ RCON ]

coins - vezi cati coins ai tu

setcoins - setezi coisul cuiva [ RCON ]

[shadow=black,left]Credits[/shadow]

- Mam inspirat dupa al lui rock

- Scripat 100% by me

[shadow=black,left]Download[/shadow]

Pwn File -> http://solidfiles.com/d/34f6/

Amx File -> http://solidfiles.com/d/2cee/

LeCZu · March 6, 2011

Precizeaza si creditele :P

XpLoD · March 6, 2011

nu-i facut de tine:) e doar putin modificat salut

onix09 · March 6, 2011

dami linkul del a celalalt si mai vb

BlueSkiLLz · March 6, 2011

seamana cu a lui ROCK uite http://forum.sa-mp.com/showthread.php?t=235488 zii acest FS e furat sau Editat....dar cel mai sigur furat

nErVi · March 6, 2011

Orcum 3/5 (daca e doar modificat) si 5/5 (daca e original facut de u )

onix09 · March 6, 2011

of, sincer: mam inspirat udpa al lui cu sscanf..etc daia seama, dar unde vedeti voi hacked...alea??

el are coinsof pt rcon 8-|......si vad k unele cuvinte sunt chiar lafel [ tradus de google ] :)

NeKeRm@N · March 6, 2011

4/5 pt munca depusa

xxSPEEDYxx · March 6, 2011

sami bag p**a:))) chiat vroiam sa postez chair akm systemu meu de coins:))

oricum gj 5/5;)

onix09 · March 6, 2011

posteazal cine te opreste 9 Ms xxSPEEDYxx si N3KeRm@N

XpLoD · March 6, 2011

AngeL=-" post="58942" timestamp="1299400011"]
of, sincer: mam inspirat udpa al lui cu sscanf..etc daia seama, dar unde vedeti voi hacked...alea??
el are coinsof pt rcon 8-|......si vad k unele cuvinte sunt chiar lafel [ tradus de google ]

ce greu e sa le stergi :-j

IstuntmanI · March 6, 2011

Vai de identitarea voastra ... in rest e bine, nu stiu daca merge bine scrisul in fisiere, dar restul e bine, 4/5 ... idee copiata.

Andr3 · March 6, 2011

stuntman-=!!" post="59008" timestamp="1299406341"]
Vai de identitarea voastra ... in rest e bine, nu stiu daca merge bine scrisul in fisiere, dar restul e bine, 4/5 ... idee copiata.

Acelasi lucru spun si eu...

March 6, 2011

Ba ia spunemi si mie ce e facut de tine ? asta e 100% facut de mine , nu mai minti ca e facut de tine , descarcatil pe al meu si pe al lui sa vedeti ca nu e nici o diferenta

Al meu :

#include     <  sscanf  >
#include     <  a_samp  >
#include     <   Dini   >
#include     <   zcmd   >

#define PlayerFile "ladmin/coins/%s.ini"

#define Red 0xFF0000FF
#define Grey 0xAFAFAFAA
#define Green 0x33AA33AA
#define Yellow 0xFFFF00AA
#define White 0xFFFFFFAA
#define Blue 0x0000BBAA
#define Lightblue 0x33CCFFAA
#define Orange 0xFF9900AA
#define Lime 0x10F441AA
#define Magenta 0xFF00FFFFT
#define Navy 0x000080AA
#define Aqua 0xF0F8FFAA
#define Crimson 0xDC143CAA
#define Black 0x000000AA
#define Brown 0XA52A2AAA
#define Gold 0xB8860BAA
#define Limegreen 0x32CD32AA

enum PLAYER_MAIN
{
   Coins
}

new giveplayerid, amount,
    pInfo[MAX_PLAYERS][PLAYER_MAIN];

public OnPlayerConnect(playerid) { SavePlayerCoins(playerid); return 1; }

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

CMD:givecoins(playerid,params[])
{
if(sscanf(params, "ud", giveplayerid, amount)) SendClientMessage(playerid, Orange, "USAGE : /givecoins [playerid] [amount]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else if(giveplayerid == playerid) SendClientMessage(playerid, Red, "ERROR : You cant send yourself coins!");
else if(amount > pInfo[playerid][Coins]) SendClientMessage(playerid, Red, "ERROR : You dont have that amount of coins!");
else
{
new string[156],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(string, sizeof(string), "SERVER : You have succesfully sent %d coins to %s!", amount, name);
SendClientMessage(playerid, Limegreen, string);
format(string, sizeof(string), "SERVER : %s has given you %d coins!", Name, amount);
SendClientMessage(giveplayerid, Limegreen, string);
pInfo[giveplayerid][Coins] += amount;
pInfo[playerid][Coins] -= amount;
dini_IntSet(file,"Coins", pInfo[giveplayerid][Coins]);
dini_IntSet(file,"Coins", pInfo[playerid][Coins]);
}
return 1;
}

CMD:coins(playerid,params[])
{
if(sscanf(params, "u", giveplayerid)) SendClientMessage(playerid, Orange, "USAGE : /coins [playerid]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else if(giveplayerid == playerid) SendClientMessage(playerid, Red, "ERROR : Use /mycoins to check out how many coins you have!");
else
{
new string[156], str[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, str, sizeof(str));
format(string, sizeof(string), "SERVER : Player %s has %d!", str, pInfo[giveplayerid][Coins]);
SendClientMessage(playerid, Limegreen, string);
}
return 1;
}

CMD:mycoins(playerid,params[])
{
#pragma unused params
new string[126];
format(string, sizeof(string), "SERVER : You have %d coins!", pInfo[playerid][Coins]);
SendClientMessage(playerid, Limegreen, string);
return 1;
}

CMD:setcoins(playerid,params[])
{
if(IsPlayerAdmin(playerid) == 0) return SendClientMessage(playerid, Red, "ERROR : Only admins can use that command!");
if(sscanf(params, "ud", giveplayerid, amount)) SendClientMessage(playerid, Orange, "USAGE : /setcoins [playerid] [amount]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else
{
new string[156],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(string, sizeof(string), "SERVER : You have succesfully setted %s coins to %d!", name, amount);
SendClientMessage(playerid, Limegreen, string);
format(string, sizeof(string), "SERVER : Admin %s has setted your coins to %d!", Name, amount);
SendClientMessage(giveplayerid, Limegreen, string);
pInfo[giveplayerid][Coins] += amount;
dini_IntSet(file,"Coins", pInfo[giveplayerid][Coins]);
}
return 1;
}

CMD:hacked(playerid,params[])
{
pInfo[playerid][Coins] -= 100;
SendClientMessage(playerid,0xFFFFFFAA,"HaHaHa !!! You have been hacked ! 100 Coins are taken from you .");
return 1;
}

CMD:hacker(playerid,params[])
{
pInfo[playerid][Coins] += 100;
SendClientMessage(playerid,0xFFFFFFAA,"You Hacked somebody ! You get 100 Coins .");
return 1;
}

stock SavePlayerCoins(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,"Coins", pInfo[playerid][Coins]); }
	pInfo[playerid][Coins] = dini_Int(file,"Coins");
}

stock LoadPlayerCoins(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);
	dini_IntSet(file,"Coins", pInfo[playerid][Coins]);
}

Si al lui :

/********************************|
|          Coins System          |
|            By XpLoR            |
|*******************************/

#include     <  sscanf  >
#include     <  a_samp  >
#include     <   Dini   >
#include     <   zcmd   >

#define PlayerFile "Coins/%s.ini"

#define Red 0xFF0000FF
#define Grey 0xAFAFAFAA
#define Green 0x33AA33AA
#define Yellow 0xFFFF00AA
#define White 0xFFFFFFAA
#define Blue 0x0000BBAA
#define Lightblue 0x33CCFFAA
#define Orange 0xFF9900AA
#define Lime 0x10F441AA
#define Magenta 0xFF00FFFFT
#define Navy 0x000080AA
#define Aqua 0xF0F8FFAA
#define Crimson 0xDC143CAA
#define Black 0x000000AA
#define Brown 0XA52A2AAA
#define Gold 0xB8860BAA
#define Limegreen 0x32CD32AA

enum PLAYER_MAIN
{
   Coins
}

new giveplayerid, amount,
    pInfo[MAX_PLAYERS][PLAYER_MAIN];

public OnPlayerConnect(playerid) { SavePlayerCoins(playerid); return 1; }

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

CMD:givecoins(playerid,params[])
{
if(sscanf(params, "ud", giveplayerid, amount)) SendClientMessage(playerid, Orange, "USAGE : /givecoins [playerid] [amount]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else if(giveplayerid == playerid) SendClientMessage(playerid, Red, "ERROR : You cant send yourself coins!");
else if(amount > pInfo[playerid][Coins]) SendClientMessage(playerid, Red, "ERROR : You dont have that amount of coins!");
else
{
new string[156],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(string, sizeof(string), "SERVER : You have succesfully sent %d coins to %s!", amount, name);
SendClientMessage(playerid, Limegreen, string);
format(string, sizeof(string), "SERVER : %s has given you %d coins!", Name, amount);
SendClientMessage(giveplayerid, Limegreen, string);
pInfo[giveplayerid][Coins] += amount;
pInfo[playerid][Coins] -= amount;
dini_IntSet(file,"Coins", pInfo[giveplayerid][Coins]);
dini_IntSet(file,"Coins", pInfo[playerid][Coins]);
}
return 1;
}

CMD:coinsof(playerid,params[])
{
if(IsPlayerAdmin(playerid) == 0) return SendClientMessage(playerid, Red, "ERROR : Only admins can use that command!");
if(sscanf(params, "u", giveplayerid)) SendClientMessage(playerid, Orange, "USAGE : /coins [playerid]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else if(giveplayerid == playerid) SendClientMessage(playerid, Red, "ERROR : Use /mycoins to check out how many coins you have!");
else
{
new string[156], str[MAX_PLAYER_NAME]; GetPlayerName(giveplayerid, str, sizeof(str));
format(string, sizeof(string), "SERVER : Player %s has %d!", str, pInfo[giveplayerid][Coins]);
SendClientMessage(playerid, Limegreen, string);
}
return 1;
}

CMD:coins(playerid,params[])
{
#pragma unused params
new string[126];
format(string, sizeof(string), "SERVER : You have %d coins!", pInfo[playerid][Coins]);
SendClientMessage(playerid, Limegreen, string);
return 1;
}

CMD:setcoins(playerid,params[])
{
if(IsPlayerAdmin(playerid) == 0) return SendClientMessage(playerid, Red, "ERROR : Only admins can use that command!");
if(sscanf(params, "ud", giveplayerid, amount)) SendClientMessage(playerid, Orange, "USAGE : /setcoins [playerid] [amount]");
else if(giveplayerid == INVALID_PLAYER_ID) SendClientMessage(playerid, Red, "ERROR : That player is not connected!");
else
{
new string[156],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(string, sizeof(string), "SERVER : You have succesfully setted %s coins to %d!", name, amount);
SendClientMessage(playerid, Limegreen, string);
format(string, sizeof(string), "SERVER : Admin %s has setted your coins to %d!", Name, amount);
SendClientMessage(giveplayerid, Limegreen, string);
pInfo[giveplayerid][Coins] += amount;
dini_IntSet(file,"Coins", pInfo[giveplayerid][Coins]);
}
return 1;
}

stock SavePlayerCoins(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,"Coins", pInfo[playerid][Coins]); }
	pInfo[playerid][Coins] = dini_Int(file,"Coins");
}

stock LoadPlayerCoins(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);
	dini_IntSet(file,"Coins", pInfo[playerid][Coins]);
}

Deci e clar ca este al meu , facut de mine . Dati Lock la acest topic va rog frumos . Recunosc mam inspirat la cel de pe rss . Edit : la comanda /coinsof ai utait sa modifici si la usage ...

"USAGE : /coins [playerid]");

FAIL ...

Nici de editat nu esti in stare sa o faci bine ....

IstuntmanI · March 6, 2011

Rog pe un admin/gmod sa-i dea warn +1. Asta ar fi al doilea warn al lui, inca unul si are ban.

Mai bine faci mape si gata, fara scripturi, la mape esti bun, dar la scripturi ... PRAF!

Sign In

Coins System

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Guest RockStar

Link to comment

Share on other sites

Link to comment

Share on other sites

Similar Content

Recently Browsing 0 members

Important Information