Advertisement
HigorGamer

[FS] Cash

Nov 16th, 2014
720
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.10 KB | None | 0 0
  1. #include <a_samp>
  2. #include <dini>
  3. #include <zcmd>
  4. #include <sscanf2>
  5.  
  6. #define PASTA_CONTAS                                                            "/Contas/%s.ini"
  7. new Cash[MAX_PLAYERS];
  8. new Arquivo[150];
  9. new PlayerText:Textdraw[1][MAX_PLAYERS];
  10.  
  11. public OnFilterScriptInit()
  12. {
  13.     print("\n--------------------------------------");
  14.     print(" Sistema De Cash By: HigorGamer Loaded!");
  15.     print("--------------------------------------\n");
  16.     return 1;
  17. }
  18.  
  19. public OnFilterScriptExit()
  20. {
  21.     return 1;
  22. }
  23.  
  24. public OnPlayerConnect(playerid)
  25. {
  26.     Textdraw[0][playerid] = CreatePlayerTextDraw(playerid, 568.316406, 142.333343, "Cash:~w~100");
  27.     PlayerTextDrawLetterSize(playerid, Textdraw[0][playerid], 0.449999, 1.600000);
  28.     PlayerTextDrawAlignment(playerid, Textdraw[0][playerid], 2);
  29.     PlayerTextDrawColor(playerid, Textdraw[0][playerid], -5963521);
  30.     PlayerTextDrawSetShadow(playerid, Textdraw[0][playerid], 0);
  31.     PlayerTextDrawSetOutline(playerid, Textdraw[0][playerid], 1);
  32.     PlayerTextDrawBackgroundColor(playerid, Textdraw[0][playerid], 51);
  33.     PlayerTextDrawFont(playerid, Textdraw[0][playerid], 3);
  34.     PlayerTextDrawSetProportional(playerid, Textdraw[0][playerid], 1);
  35.     return 0;
  36. }
  37. public OnPlayerDisconnect(playerid, reason)
  38. {
  39.         PlayerTextDrawHide(playerid,Textdraw[0][playerid]);
  40.     return 0;
  41. }
  42.  
  43. public OnPlayerSpawn(playerid)
  44. {
  45.         CarregarCash(playerid);
  46.         PlayerTextDrawShow(playerid,Textdraw[0][playerid]);
  47.     return 1;
  48. }
  49. public OnPlayerUpdate(playerid)
  50. {
  51.     new String[150];
  52.     format(String, sizeof(String), "Cash:~w~%d", InfoCash(playerid));
  53.         PlayerTextDrawSetString( playerid, Textdraw[0][playerid], String);
  54.         CarregarCash(playerid);
  55.         return 0;
  56. }
  57.  
  58. CMD:comprarbazuca(playerid)
  59. {
  60.     if(InfoCash(playerid) > 500)
  61.     {
  62.             GivePlayerWeapon(playerid, 36,999);
  63.             TirarCash(playerid, 500);
  64.         SendClientMessage(playerid, -1 ,"Você comprou uma bazuca e perdeu 500 CASH");
  65.     }else{
  66.         SendClientMessage(playerid,-1 ,"Você não pode comprar a bazuca porque não tem 500 Cash");
  67.     }
  68.     return 1;
  69. }
  70.  
  71. CMD:darcash(playerid,params[])
  72. {
  73.     new valor,id;
  74.         if(sscanf(params, "ui", id, valor))
  75.     {
  76.         SendClientMessage(playerid, -1, "Digite: /DarCash [id] [Valor]");
  77.         return 1;
  78.     }
  79.     AddCash(id,valor);
  80.     return 1;
  81. }
  82.  
  83. CMD:setarcash(playerid,params[])
  84. {
  85.     new valor,id;
  86.         if(sscanf(params, "ui", id, valor))
  87.     {
  88.         SendClientMessage(playerid, -1, "Digite: /SetarCash [id] [Valor]");
  89.         return 1;
  90.     }
  91.     SetarCash(id,valor);
  92.     return 1;
  93. }
  94.  
  95. CMD:tirarcash(playerid,params[])
  96. {
  97.     new valor,id;
  98.         if(sscanf(params, "ui", id, valor))
  99.     {
  100.         SendClientMessage(playerid, -1, "Digite: /TirarCash [id] [Valor]");
  101.         return 1;
  102.     }
  103.     TirarCash(id,valor);
  104.     return 1;
  105. }
  106.  
  107. CMD:cash(playerid,params[])
  108. {
  109.     new String[150];
  110.         format(String, sizeof(String), "Você Tem: %d De Cash", InfoCash(playerid));
  111.         SendClientMessage(playerid,-1,String);
  112.     return 1;
  113. }
  114.  
  115. stock CarregarCash(playerid)
  116. {
  117.         format(Arquivo, sizeof(Arquivo), PASTA_CONTAS, GetPlayerNameEx(playerid));
  118.     Cash[playerid] = dini_Int(Arquivo, "Cash");
  119.     return 1;
  120. }
  121.  
  122. stock SalvarCash(playerid)
  123. {
  124.         format(Arquivo, sizeof(Arquivo), PASTA_CONTAS, GetPlayerNameEx(playerid));
  125.         dini_IntSet(Arquivo,"Cash",Cash[playerid]);
  126.     return 0;
  127. }
  128.  
  129. stock SetarCash(playerid,Valor)
  130. {
  131.     Cash[playerid]=Valor;
  132.         format(Arquivo, sizeof(Arquivo), PASTA_CONTAS, GetPlayerNameEx(playerid));
  133.         dini_IntSet(Arquivo,"Cash",Valor);
  134.     return 1;
  135. }
  136.  
  137. stock AddCash(playerid,Valor)
  138. {
  139.     Cash[playerid]+=Valor;
  140.         format(Arquivo, sizeof(Arquivo), PASTA_CONTAS, GetPlayerNameEx(playerid));
  141.         dini_IntSet(Arquivo,"Cash",Cash[playerid]+=Valor);
  142.     return 1;
  143. }
  144.  
  145. stock TirarCash(playerid,Valor)
  146. {
  147.     Cash[playerid]-=Valor;
  148.         format(Arquivo, sizeof(Arquivo), PASTA_CONTAS, GetPlayerNameEx(playerid));
  149.         dini_IntSet(Arquivo,"Cash",Cash[playerid]-=Valor);
  150.     return 1;
  151. }
  152.  
  153. stock InfoCash(playerid)
  154. {
  155.     new Cash2;
  156.     Cash2 = Cash[playerid];
  157.     return Cash2;
  158. }
  159.  
  160. stock GetPlayerNameEx(playerid)
  161. {
  162.         new pNome[MAX_PLAYER_NAME];
  163.         GetPlayerName(playerid, pNome, 24);
  164.         return pNome;
  165. }
  166. #pragma unused strtok
  167. #pragma unused ret_memcpy
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement