API tools faq
paste
Guest User

T-Registro v1.0

a guest
Mar 24th, 2012
386
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.31 KB | None | 0 0
raw download clone embed print report
  1. /*
  2. Bom galera, venho apresentar minha primeira filterscript de sistema de registro
  3. ela e muito basica, salva pouca coisa mais e muito útil para começar seu gamemode
  4. do 0.
  5. •O QUE ELA SALVA?
  6. -Skin
  7. -Dinheiro
  8. -Quantas vezes ja logou
  9. -Morreu
  10. •COMANDOS:
  11. /comandos - /documentos - /registrar - /logar - /an
  12. •CREDITOS:
  13. -Toni_Santolia(Toda filter script).
  14. */
  15. //===~>INCLUDES
  16. #include a_samp
  17. #include dini
  18. #include zcmd
  19. #include sscanf2
  20. //===~>CORES
  21. #define AMARELO 0xFFFF00AA
  22. #define VERDE 0x00FF40AA
  23. //===~>DEFINES
  24. #define MensagemParaTodos SendClientMessageToAll
  25. //===~>NEWS
  26. enum pInfo { pSkin, pDinheiro, Float: pX, Float: pY, Float: pZ, pMorreu, };
  27. new PlayerInfo[MAX_PLAYERS][pInfo], sendername[MAX_PLAYER_NAME], file[20], tmppass[64];
  28. new texto, Logou[MAX_PLAYERS];
  29. //===PUBLICS
  30. public OnFilterScriptInit()
  31. {
  32. print(" ");
  33. print("|==================================|");
  34. print("|Sistema de Login Registro Iniciado|");
  35. print("| Feito Por: Toni_Santolia |");
  36. print("|==================================|");
  37. print(" ");
  38. return 1;
  39. }
  40.  
  41. public OnFilterScriptExit()
  42. {
  43. print(" ");
  44. print("|==================================|");
  45. print("| Sistema de Login Registro Fexado |");
  46. print("| Feito Por: Toni_Santolia |");
  47. print("|==================================|");
  48. print(" ");
  49. return 1;
  50. }
  51.  
  52. public OnGameModeInit()
  53. {
  54. UsePlayerPedAnims();
  55. return 1;
  56. }
  57.  
  58. public OnPlayerConnect(playerid)
  59. {
  60. GetPlayerName(playerid, sendername, sizeof(sendername));
  61. format(file, sizeof(file), "%s.ini", sendername);
  62. if(dini_Exists(file))
  63. {
  64. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "T-Registro - Logando", "Olá, seja bem vindo novamente ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para logar-se", "Logar", "Esperar");
  65. }
  66. else
  67. {
  68. ShowPlayerDialog(playerid, 2, DIALOG_STYLE_PASSWORD, "T-Registro - Registrando", "Olá, seja bem vindo ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para registrar-se", "Registrar", "Esperar");
  69. }
  70. return 1;
  71. }
  72.  
  73. public OnPlayerDisconnect(playerid)
  74. {
  75. Salvar(playerid,tmppass);
  76. return 1;
  77. }
  78.  
  79. public OnPlayerSpawn(playerid)
  80. {
  81. ResetPlayerMoney(playerid);
  82. GivePlayerMoney(playerid, PlayerInfo[playerid][pDinheiro]);
  83. SetPlayerSkin(playerid, PlayerInfo[playerid][pSkin]);
  84. SetPlayerPos(playerid, PlayerInfo[playerid][pX], PlayerInfo[playerid][pY], PlayerInfo[playerid][pZ]);
  85. return 1;
  86. }
  87.  
  88. public OnPlayerDeath(playerid, killerid, reason)
  89. {
  90. PlayerInfo[playerid][pMorreu] ++;
  91. return 1;
  92. }
  93.  
  94. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  95. {
  96. if(dialogid == 1)
  97. {
  98. if(response == 0)
  99. {
  100. SendClientMessage(playerid, AMARELO, "Ok, Caso queira fazer login use /logar (senha)!");
  101. return 1;
  102. }
  103. if(response >= 1)
  104. {
  105. if(strlen(inputtext) == 0)
  106. {
  107. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "T-Registro - Logando", "Olá, seja bem vindo novamente ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para logar-se", "Logar", "Esperar");
  108. return 1;
  109. }
  110. cmd_logar(playerid,inputtext);
  111. return 1;
  112. }
  113. return 1;
  114. }
  115. if(dialogid == 2)
  116. {
  117. if(response == 0)
  118. {
  119. SendClientMessage(playerid, AMARELO, "Ok, Caso queira fazer o registro use /registrar (senha)!");
  120. return 1;
  121. }
  122. if(response >= 1)
  123. {
  124. if(strlen(inputtext) == 0)
  125. {
  126. ShowPlayerDialog(playerid, 2, DIALOG_STYLE_PASSWORD, "T-Registro - Registrando", "Olá, seja bem vindo ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para registrar-se", "Registrar", "Esperar");
  127. }
  128. cmd_registrar(playerid,inputtext);
  129. return 1;
  130. }
  131. return 1;
  132. }
  133. return 1;
  134. }
  135. //===~>COMANDOS
  136. COMMAND:registrar(playerid, params[])
  137. {
  138. if(sscanf(params, "s", tmppass))
  139. {
  140. SendClientMessage(playerid, AMARELO, "Use: /registrar (Senha)");
  141. return 1;
  142. }
  143. else
  144. {
  145. Registrar(playerid,tmppass);
  146. }
  147. return 1;
  148. }
  149. COMMAND:logar(playerid, params[])
  150. {
  151. if(sscanf(params, "s", tmppass))
  152. {
  153. SendClientMessage(playerid, AMARELO, "Use: /logar (Senha)");
  154. return 1;
  155. }
  156. else
  157. {
  158. Logar(playerid,tmppass);
  159. }
  160. return 1;
  161. }
  162. COMMAND:an(playerid, params[])
  163. {
  164. if(sscanf(params, "s", texto))
  165. {
  166. SendClientMessage(playerid, AMARELO, "Use: /an (texto)");
  167. return 1;
  168. }
  169. else
  170. {
  171. new string[128];
  172. GetPlayerName(playerid, sendername, sizeof(sendername));
  173. format(string, 256, "Player: %s[ID:%d]: %s**", sendername, playerid, texto);
  174. MensagemParaTodos(VERDE, string);
  175. }
  176. return 1;
  177. }
  178. COMMAND:comandos(playerid, params[])
  179. {
  180. ShowPlayerDialog(playerid, 444, DIALOG_STYLE_MSGBOX, "{00FF00}Comandos do T-REGISTRO by: Toni_Santolia", "{ffffff}Use-/documentos\nUse-/an\nUse-/comandos\nUse-/creditos\nUse-/registrar\nUse-/logar\n\n", "ok", "");
  181. return 1;
  182. }
  183. COMMAND:documentos(playerid, params[])
  184. {
  185. DOCUMENTOS(playerid);
  186. return 1;
  187. }
  188. //===~>STOCKS
  189. stock Registrar(playerid,key[])
  190. {
  191. GetPlayerName(playerid, sendername, sizeof(sendername));
  192. format(file, sizeof(file), "%s.ini", sendername);
  193. dini_Create(file);
  194. dini_Set(file, "Senha", key);
  195. dini_IntSet(file, "Skin", 23);
  196. dini_IntSet(file, "Dinheiro", 150000);
  197. dini_FloatSet(file, "pX", -1896.8448);
  198. dini_FloatSet(file, "pY", 485.5161);
  199. dini_FloatSet(file, "pZ", 35.1719);
  200. dini_IntSet(file, "Morreu", 0);
  201. dini_IntSet(file, "Logou", 0);
  202. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "T-Registro - Logando", "Olá, seja bem vindo novamente ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para logar-se", "Logar", "Esperar");
  203. return 1;
  204. }
  205. stock Logar(playerid,key[])
  206. {
  207. GetPlayerName(playerid, sendername, sizeof(sendername));
  208. format(file, sizeof(file), "%s.ini", sendername);
  209. if(!strcmp(key,dini_Get(file,"Senha"),false))
  210. {
  211. PlayerInfo[playerid][pSkin] = dini_Int(file, "Skin");
  212. PlayerInfo[playerid][pDinheiro] = dini_Int(file, "Dinheiro");
  213. PlayerInfo[playerid][pX] = dini_Int(file, "pX");
  214. PlayerInfo[playerid][pY] = dini_Int(file, "pY");
  215. PlayerInfo[playerid][pZ] = dini_Int(file, "pZ");
  216. PlayerInfo[playerid][pMorreu] = dini_Int(file, "Morreu");
  217. Logou[playerid] = dini_Int(file, "Logou");
  218. SendClientMessage(playerid, AMARELO, "Logado Com Sucesso");
  219. Logou[playerid] ++;
  220. SpawnPlayer(playerid);
  221. SetSpawnInfo(playerid, 0,PlayerInfo[playerid][pSkin], PlayerInfo[playerid][pX], PlayerInfo[playerid][pY], PlayerInfo[playerid][pZ],1.0, -1, -1, -1, -1, -1, -1);
  222. }
  223. else
  224. {
  225. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "T-Registro - Logando", "Senha Errada\ndigite sua senha novamente abaixo para logar-se\n\n", "Logar", "Esperar");
  226. }
  227. return 1;
  228. }
  229. stock Salvar(playerid,key[])
  230. {
  231. GetPlayerName(playerid, sendername, sizeof(sendername));
  232. format(file, sizeof(file), "%s.ini", sendername);
  233. dini_Set(file, "Senha", key);
  234. dini_IntSet(file, "Skin", PlayerInfo[playerid][pSkin]);
  235. dini_IntSet(file, "Dinheiro", PlayerInfo[playerid][pDinheiro]);
  236. dini_FloatSet(file, "pX", PlayerInfo[playerid][pX]);
  237. dini_FloatSet(file, "pY", PlayerInfo[playerid][pY]);
  238. dini_FloatSet(file, "pZ", PlayerInfo[playerid][pZ]);
  239. dini_IntSet(file, "Morreu", PlayerInfo[playerid][pMorreu]);
  240. dini_IntSet(file, "Logou", Logou[playerid]);
  241. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD, "T-Registro - Logando", "Olá, seja bem vindo novamente ao T-Registro\nEstá filter script e feita totalmente por toni santolia\ndigite sua senha abaixo para logar-se", "Logar", "Esperar");
  242. return 1;
  243. }
  244. stock DOCUMENTOS(playerid)
  245. {
  246. new string[128];
  247. GetPlayerName(playerid, sendername, sizeof(sendername));
  248. format(string, 256, "** DOCUMENTOS DE %s **", sendername);
  249. SendClientMessage(playerid, 0x80FFFFAA,string);
  250. format(string, 256, "Dinheiro: (%d) Morreu: (%d)", PlayerInfo[playerid][pDinheiro], PlayerInfo[playerid][pMorreu]);
  251. SendClientMessage(playerid, 0x00FFFFAA,string);
  252. format(string, 256, "Logou: (%d) Skin: (%d)", Logou[playerid], PlayerInfo[playerid][pSkin]);
  253. SendClientMessage(playerid, 0x80FFFFAA,string);
  254. return 1;
  255. }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!