Mathu3usBLS

Untitled

Aug 20th, 2012
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.03 KB | None | 0 0
  1. [pawn]
  2. #define SLOTS 100
  3. #include <a_samp>
  4. #include <bcmd>
  5. #include <DOF2>
  6. #define comprar 18
  7. #define FileUsers "Contas/%s.ini"
  8. #define ComproRadio 23
  9. #define NaoCompro 25
  10. new bool:ComprouRadio[SLOTS] = false;
  11. enum pInfo
  12. {
  13. radios
  14. };
  15. new Informacoes[SLOTS][pInfo];
  16.  
  17. stock ReturnFileUser(playerid)
  18. {
  19. new File[156],Name[MAX_PLAYER_NAME];
  20. GetPlayerName(playerid,Name,sizeof(Name));
  21. format(File,sizeof(File),FileUsers,Name);
  22. return File;
  23. }
  24.  
  25.  
  26. public OnGameModeExit()
  27. {
  28. DOF2_Exit();
  29. return 1;
  30. }
  31. public OnPlayerConnect(playerid)
  32. {
  33. TextDrawShowForPlayer(playerid, Textdraw0);
  34. SendDeathMessage(playerid, INVALID_PLAYER_ID, 200);
  35. new string[40];
  36. new pName[25];
  37. GetPlayerName(playerid, pName, sizeof(pName));
  38. format(string, sizeof(string), "%s Entrou no Servidor!", pName);
  39. SendClientMessageToAll(0xAAAAAAAA, string);
  40. GameTextForPlayer(playerid,"~b~Bem-Vindo",5000,5);
  41. SendClientMessage(playerid, 0xFFFF00AA, ">> Seja Bem Vindo Ao Server<<");
  42. PlayAudioStreamForPlayer(playerid,"https://dl.dropbox.com/u/93019797/1.mp3.mp3");
  43. if(!DOF2_FileExists(ReturnFileUser(playerid))) return SendClientMessage(playerid,0x56FF00FF,"Olá, sua conta não é registrada. Para ter uma conta e salvar seus dados use /registrar.");
  44. else if(DOF2_FileExists(ReturnFileUser(playerid))) return SendClientMessage(playerid,0x56FF00FF,"Olá, sua conta já é registrada. Para carregar seus dados use /logar.");
  45. if(!DOF2_FileExists(ReturnFileUser(playerid))){Informacoes[playerid][radios] = NaoCompro;
  46. }else{CarregarPlayer(playerid);}
  47. return 1;
  48. }
  49. public OnPlayerDisconnect(playerid, reason)
  50. {
  51. new pName[MAX_PLAYER_NAME];
  52. new string[40];
  53. GetPlayerName(playerid, pName, sizeof(pName));
  54. format(string, sizeof(string), "%s Saiu do Servidor! ", pName);
  55. SendClientMessageToAll(0xAAAAAAAA, string);
  56. SendDeathMessage(INVALID_PLAYER_ID, playerid, 201);
  57. if(Conectado[playerid] == true)
  58. {
  59. SalvarPlayer(playerid);
  60. }
  61. Conectado[playerid] = false;
  62. DestroyVehicle(Veiculo[playerid]);
  63. return 1;
  64. }
  65. public OnPlayerCallCommand(playerid,cmdtext[],sucess){
  66. if(!sucess) {
  67. new result[128];
  68. format(result,sizeof(result),"{0FF0FF}[INFO]:O comando %s não existe",cmdtext);
  69. SendClientMessage(playerid,-1,result);
  70. }
  71. return 1;
  72. }
  73. bCMD[comprar]-(playerid, params [])
  74. {
  75. #pragma unused params
  76. ShowPlayerDialog(playerid, comprar, DIALOG_STYLE_LIST,"Loja","Rádio\nMP3\n","Comprar","Fechar");
  77. return 1;
  78. }
  79. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  80. {
  81. if(dialogid == comprar)
  82. {
  83. if(!response) return SendClientMessage(playerid,-1,"Cancelado com sucesso!");
  84. if(listitem == 0) {
  85. if(GetPlayerMoney(playerid) > 250)
  86. {
  87. GivePlayerMoney(playerid, -250);
  88. ComprouRadio[playerid] = true;
  89. SendClientMessage(playerid, -1, "Você comprou um Rádio");
  90. DOF2_CreateFile(ReturnFileUser(playerid));
  91. Informacoes[playerid][radios] = ComproRadio;
  92. }
  93. else
  94. {
  95. SendClientMessage(playerid, -1, "Você nao tem a grana.");}}
  96. return 1;
  97. }
  98. stock SalvarPlayer(playerid)
  99. {
  100. if(DOF2_FileExists(ReturnFileUser(playerid)))
  101. {
  102. DOF2_SetInt(ReturnFileUser(playerid),"Level",GetPlayerScore(playerid));
  103. DOF2_SetInt(ReturnFileUser(playerid),"Dinheiro",GetPlayerMoney(playerid));
  104. DOF2_SetInt(ReturnFileUser(playerid), "Radio", Informacoes[playerid][radios]);
  105. DOF2_SaveFile();
  106. }
  107. }
  108.  
  109. stock CarregarPlayer(playerid)
  110. {
  111. if(DOF2_FileExists(ReturnFileUser(playerid)))
  112. {
  113. SetPlayerScore(playerid, DOF2_GetInt(ReturnFileUser(playerid), "Level"));
  114. SetPlayerMoney(playerid, DOF2_GetInt(ReturnFileUser(playerid), "Dinheiro"));
  115. Informacoes[playerid][radios] = DOF2_GetInt(ReturnFileUser(playerid), "Radio");
  116. }
  117. }
  118.  
  119. stock PlayerName(playerid)
  120. {
  121. new Name[SLOTS];
  122. GetPlayerName(playerid, Name, sizeof(Name));
  123. return Name;
  124. }
  125.  
  126. stock SetPlayerMoney(playerid,ammount)
  127. {
  128. ResetPlayerMoney(playerid);
  129. GivePlayerMoney(playerid,ammount);
  130. return 1;
  131. }[/pawn]
Advertisement
Add Comment
Please, Sign In to add comment