Advertisement
Guest User

Untitled

a guest
Jun 3rd, 2014
726
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.53 KB | None | 0 0
  1. #include a_samp
  2.  
  3. #define Kick(%0) SetTimerEx("Kicka", 100, false, "i", %0)
  4. #define Ban(%0) SetTimerEx("Bana", 100, false, "i", %0)
  5.  
  6. enum
  7. {
  8. DIALOG_ADMIN_COMMAND,
  9. DIALOG_KICK_PLAYER,
  10. DIALOG_BAN_PLAYER,
  11. DIALOG_PM_PLAYER,
  12. DIALOG_MONEY,
  13. DIALOG_WEAPON
  14. }
  15. new idclicked[MAX_PLAYERS];
  16. new bool:Calado[MAX_PLAYERS];
  17.  
  18. public OnFilterScriptInit()
  19. return print("\nSCRIPT iRcon - Created By: _Gamer8 ( Input )\n");
  20.  
  21. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  22. {
  23. new Dialog[500];
  24. if(IsPlayerAdmin(playerid))
  25. {
  26. idclicked[playerid] = clickedplayerid;
  27. strcat(Dialog, "[ > ] Desconectar Jogador.\n");
  28. strcat(Dialog, "[ > ] Banir Jogador.\n");
  29. strcat(Dialog, "[ > ] PM.\n");
  30. strcat(Dialog, "[ > ] Ir até o jogador..\n");
  31. strcat(Dialog, "[ > ] Trazer o jogador até você.\n");
  32. strcat(Dialog, "[ > ] Matar Jogador.\n");
  33. strcat(Dialog, "[ > ] Deixar a vida cheia.\n");
  34. strcat(Dialog, "[ > ] Deixar o colete cheio.\n");
  35. strcat(Dialog, "[ > ] Dar Dinheiro.\n");
  36. strcat(Dialog, "[ > ] Dar Arma.\n");
  37. strcat(Dialog, "[ > ] Calar o jogador.\n");
  38. strcat(Dialog, "[ > ] Descalar o jogador.\n");
  39. strcat(Dialog, "[ > ] Congelar o jogador.\n");
  40. strcat(Dialog, "[ > ] Descongelar o jogador.\n");
  41. ShowPlayerDialog(playerid, DIALOG_ADMIN_COMMAND, DIALOG_STYLE_LIST, "Funções Administrativas:", Dialog, "Selecionar", "Cancelar");
  42. }
  43. return true;
  44. }
  45.  
  46. public OnPlayerText(playerid)
  47. {
  48. if(Calado[playerid] == true) return SendClientMessage(playerid, -1, "Você esta calado e não pode usar o chat");
  49. return false;
  50. }
  51.  
  52. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  53. {
  54. new Float: pos[3];
  55. new string[128];
  56. switch(dialogid)
  57. {
  58. case DIALOG_ADMIN_COMMAND:
  59. {
  60. if(!response) return false;
  61. if(response)
  62. {
  63. switch(listitem)
  64. {
  65. case 0:
  66. return ShowPlayerDialog(playerid, DIALOG_KICK_PLAYER, DIALOG_STYLE_INPUT, "Desconectar Jogador:", "Porque você quer desconectar o jogador?", "Desconetar", "Cancelar");
  67. case 1:
  68. return ShowPlayerDialog(playerid, DIALOG_BAN_PLAYER, DIALOG_STYLE_INPUT, "Banir Jogador:", "Porque você quer banir o jogador?", "Banir", "Cancelar");
  69. case 2:
  70. return ShowPlayerDialog(playerid, DIALOG_PM_PLAYER, DIALOG_STYLE_INPUT, "Mandar Mensagem:", "Digite abaixo o conteúdo da mensagem:", "Enviar", "Cancelar");
  71. case 3:
  72. {
  73. GetPlayerPos(idclicked[playerid], pos[0], pos[1], pos[2]);
  74. SetPlayerPos(playerid, pos[0]+2, pos[1]+2, pos[2]+2);
  75. format(string, sizeof string, "Você foi até o jogador %s.", PegarNome(idclicked[playerid]));
  76. SendClientMessage(playerid, 0xC0C0C0AA, string);
  77. }
  78. case 4:
  79. {
  80. GetPlayerPos(playerid, pos[0], pos[1], pos[2]);
  81. SetPlayerPos(idclicked[playerid], pos[0]+2, pos[1]+2, pos[2]+2);
  82. format(string, sizeof string, "Você trouxe o jogador %s até você.", PegarNome(idclicked[playerid]));
  83. SendClientMessage(playerid, 0xC0C0C0AA, string);
  84. }
  85. case 5:
  86. {
  87. SetPlayerHealth(idclicked[playerid], 0);
  88. format(string, sizeof string, "Você matou o jogador %s.", PegarNome(idclicked[playerid]));
  89. SendClientMessage(playerid, 0xC0C0C0AA, string);
  90. }
  91. case 6:
  92. {
  93. SetPlayerHealth(idclicked[playerid], 100);
  94. format(string, sizeof string, "Você enxeu o HP do jogador %s.", PegarNome(idclicked[playerid]));
  95. SendClientMessage(playerid, 0xC0C0C0AA, string);
  96. }
  97. case 7:
  98. {
  99. SetPlayerArmour(idclicked[playerid], 100);
  100. format(string, sizeof string, "Você enxeu o colete do jogador %s.", PegarNome(idclicked[playerid]));
  101. SendClientMessage(playerid, 0xC0C0C0AA, string);
  102. }
  103. case 8:
  104. return ShowPlayerDialog(playerid, DIALOG_MONEY, DIALOG_STYLE_INPUT, "Dar Dinheiro:", "Digite abaixo a quantia que deseja:", "Dar", "Cancelar");
  105. case 9:
  106. return ShowPlayerDialog(playerid, DIALOG_WEAPON, DIALOG_STYLE_INPUT, "Dar Arma:", "Digite abaixo o id da arma que deseja:", "Equipar", "Cancelar");
  107. case 10:
  108. {
  109. Calado[idclicked[playerid]] = true;
  110. format(string, sizeof string, "Você calou o jogador %s.", PegarNome(idclicked[playerid]));
  111. SendClientMessage(playerid, 0xC0C0C0AA, string);
  112. }
  113. case 11:
  114. {
  115. Calado[idclicked[playerid]] = false;
  116. format(string, sizeof string, "Você descalou o jogador %s.", PegarNome(idclicked[playerid]));
  117. SendClientMessage(playerid, 0xC0C0C0AA, string);
  118. }
  119. case 12:
  120. {
  121. TogglePlayerControllable(idclicked[playerid], false);
  122. format(string, sizeof string, "Você congelou o jogador %s.", PegarNome(idclicked[playerid]));
  123. SendClientMessage(playerid, 0xC0C0C0AA, string);
  124. }
  125. case 13:
  126. {
  127. TogglePlayerControllable(idclicked[playerid], true);
  128. format(string, sizeof string, "Você descongelou o jogador %s.", PegarNome(idclicked[playerid]));
  129. SendClientMessage(playerid, 0xC0C0C0AA, string);
  130. }
  131. }
  132. }
  133. }
  134. case DIALOG_KICK_PLAYER:
  135. {
  136. if(!response) return false;
  137. if(response)
  138. {
  139. format(string, sizeof string, "[ADM:CMD] O Jogador %s foi desconectado pelo administrador %s, motivo: %s.", PegarNome(idclicked[playerid]), PegarNome(playerid), inputtext);
  140. SendClientMessageToAll(0xFF6347AA, string);
  141. Kick(idclicked[playerid]);
  142. }
  143. }
  144. case DIALOG_BAN_PLAYER:
  145. {
  146. if(!response) return false;
  147. if(response)
  148. {
  149. format(string, sizeof string, "[ADM:CMD] O Jogador %s foi banido pelo administrador %s, motivo: %s.", PegarNome(idclicked[playerid]), PegarNome(playerid), inputtext);
  150. SendClientMessageToAll(0xFF6347AA, string);
  151. Ban(idclicked[playerid]);
  152. }
  153. }
  154. case DIALOG_PM_PLAYER:
  155. {
  156. if(!response) return false;
  157. if(response)
  158. {
  159. format(string, sizeof string, "Mensagem: %s. Usuario: %s.", inputtext, PegarNome(playerid));
  160. SendClientMessage(idclicked[playerid], 0xFFFF00AA, string);
  161. }
  162. }
  163. case DIALOG_MONEY:
  164. {
  165. GivePlayerMoney(idclicked[playerid], strlen(inputtext));
  166. format(string, sizeof string, "Você deu $%d para o jogador %s.", inputtext, PegarNome(idclicked[playerid]));
  167. SendClientMessage(playerid, 0xC0C0C0AA, string);
  168. }
  169. case DIALOG_WEAPON:
  170. {
  171. GivePlayerWeapon(idclicked[playerid], strlen(inputtext), 50);
  172. format(string, sizeof string, "Você deu a arma de ID %d para o jogador %s.", inputtext, PegarNome(idclicked[playerid]));
  173. SendClientMessage(playerid, 0xC0C0C0AA, string);
  174. }
  175. }
  176. return true;
  177. }
  178.  
  179. forward Kicka(p); public Kicka(p) {
  180. #undef Kick
  181. Kick(p);
  182. #define Kick(%0) SetTimerEx("Kicka", 100, false, "i", %0)
  183. return 1;
  184. }
  185.  
  186. forward Bana(p); public Bana(p) {
  187. #undef Ban
  188. Ban(p);
  189. #define Ban(%0) SetTimerEx("Bana", 100, false, "i", %0)
  190. return 1;
  191. }
  192.  
  193. stock PegarNome(playerid)
  194. {
  195. new sendername[MAX_PLAYERS];
  196. GetPlayerName(playerid, sendername, sizeof sendername);
  197. return sendername;
  198. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement