API tools faq
paste
Advertisement
Guest User

VipControl

a guest
Jun 28th, 2014
69
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.62 KB | None | 0 0
raw download clone embed print report
  1. //(=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=)
  2. //( Banned Presents )
  3. //( __________ .___ )
  4. //( \______ \_____ ____ ____ ____ __| _/ )
  5. //( | | _/\__ \ / \ / \_/ __ \ / __ | )
  6. //( | | \ / __ \| | \ | \ ___// /_/ | )
  7. //( |______ /(____ /___| /___| /\___ >____ | )
  8. //( \/ \/ \/ \/ \/ \/ )
  9. //( )
  10. //( -- [S] [c] [r] [i] [p] [t] [s] -- )
  11. //( _ _ _ _ _ _ _ _ _ _ _ _ _ _ )
  12. //( / \ / \ / \ / \ / \ / \ / \ / \ / \ / \ / \ / \ / \ / \ )
  13. //( ( e | A | t | h | e | n | a ) ( S | c | r | i | p | t | s ) )
  14. //( \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ \_/ )
  15. //( )
  16. //( Advanced NPCs (c)2005-2007 )
  17. //( http://bnetwork.deltaanime.net )
  18. //(=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=)
  19. //====== eAthena Script ========================================
  20. //= Vip Control
  21. //===== Por ====================================================
  22. //= [Banned]
  23. //===== Versão =================================================
  24. //= 2.0.a
  25. //===== Compativel Com =========================================
  26. //= eAthena SVN
  27. //===== Descrição ==============================================
  28. //= Permite que você administre o sistema vip do seu servidor
  29. //===== Comentários ============================================
  30. //= 1.0 - NPC Criado [Banned]
  31. //= 1.0.a - Fix em algumas linhas [Banned]
  32. //= 2.0.a - Modificado por Panda www.panndabro.com
  33. //==============================================================
  34. prontera,142,180,5 script Vip Control 864,{
  35.  
  36. if (getgroupid () < 99 ){
  37.  
  38. mes "[Vip Control]";
  39.  
  40. mes "Somente os Administradores podem usar meus serviços.";
  41.  
  42. close;
  43.  
  44. }
  45.  
  46. mes "[Vip Control]";
  47.  
  48. mes "Olá senhor "+ strcharinfo(0) +"!";
  49.  
  50. mes "Qual dos meus serviços deseja utilizar?";
  51.  
  52. next;
  53.  
  54. switch (select ("- Adicionar VIPs","- Deletar VIPs","- Listar VIPs","- Modificar VIPs","- Cancelar")){
  55.  
  56.  
  57.  
  58. case 1:
  59.  
  60. mes "[Vip Control]";
  61.  
  62. mes "Não se esqueça de inserir todos os dados necessários!";
  63.  
  64. next;
  65.  
  66. mes "[Vip Control]";
  67.  
  68. mes "Insira o Login da conta:";
  69.  
  70. next;
  71.  
  72. input @Login$;
  73.  
  74. mes "[Vip Control";
  75.  
  76. mes "Vou verificar se a conta existe.";
  77.  
  78. next;
  79.  
  80. query_sql "SELECT `userid` FROM `login` WHERE `userid` = '"+ @Login$ +"'", @logid$;
  81.  
  82. if (!getarraysize(@logid$)){
  83.  
  84. mes "[Vip Control]";
  85.  
  86. mes "Essa Conta não existe em nossa Database.";
  87.  
  88. close;
  89.  
  90. }
  91.  
  92. mes "[Vip Control]";
  93.  
  94. mes "Tudo Ok, agora vou ver se essa conta já é Vip, aguarde um momento.";
  95.  
  96. next;
  97.  
  98. query_sql "SELECT `vip_id` FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'", @checkid$;
  99.  
  100. if (getarraysize(@checkid$)){
  101.  
  102. mes "[Vip Control]";
  103.  
  104. mes "Essa Conta já é uma conta VIP.";
  105.  
  106. close;
  107.  
  108. }
  109.  
  110. mes "[Vip Control]";
  111.  
  112. mes "Ok, pode prosseguir com o VIP.";
  113.  
  114. next;
  115.  
  116. // group_id do Vip
  117.  
  118. mes "[Vip Control]";
  119.  
  120. mes "Insira o group_id do VIP: (Max: 3)";
  121.  
  122. next;
  123.  
  124. input @group_id;
  125.  
  126. if (@group_id <= 0) close;
  127.  
  128. if (@group_id > 3){
  129.  
  130. mes "[Vip Control]";
  131.  
  132. mes "O group_id do VIP não pode ser maior que 3.";
  133.  
  134. close;
  135.  
  136. }
  137.  
  138.  
  139.  
  140. // Dias de Vip
  141.  
  142. mes "[Vip Control]";
  143.  
  144. mes "Insira os Dias de VIP: (Max: 365)";
  145.  
  146. input @Dias;
  147.  
  148. if (@Dias > 365){
  149.  
  150. mes "[Vip Control]";
  151.  
  152. mes "Você não pode dar mais de 1 ano de VIP por conta.";
  153.  
  154. close;
  155.  
  156. }
  157.  
  158.  
  159.  
  160.  
  161.  
  162. // Inserindo VIP na DB
  163.  
  164. query_sql "SELECT `account_id` FROM `login` WHERE `userid` = '"+ @Login$ +"'", @AccID;
  165.  
  166. query_sql "INSERT INTO `viptable` (`vipacc_id`, `vip_id`, `days`) VALUES ('"+ @AccID +"', '"+ @Login$ +"', '"+ @Dias +"')";
  167.  
  168. query_sql "UPDATE `login` SET `group_id` = '"+ @group_id +"' WHERE `userid` = '"+ @Login$ +"'";
  169.  
  170. next;
  171.  
  172. mes "[Vip Control]";
  173.  
  174. mes "Vip inserido com Sucesso!";
  175.  
  176. atcommand "@reloadpcdb";
  177.  
  178. close;
  179.  
  180.  
  181.  
  182. case 2:
  183.  
  184. mes "[Vip Control]";
  185.  
  186. mes "Insira o Login da Conta VIP:";
  187.  
  188. next;
  189.  
  190. input @Login$;
  191.  
  192. query_sql "SELECT `vip_id` FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'", @delid$;
  193.  
  194. if (!getarraysize(@delid$)){
  195.  
  196. mes "[Vip Control]";
  197.  
  198. mes "Esta conta VIP não existe.";
  199.  
  200. close;
  201.  
  202. }
  203.  
  204. query_sql "DELETE FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'";
  205.  
  206. query_sql "UPDATE `login` SET `group_id` = '0' WHERE `userid` = '"+ @Login$ +"'";
  207.  
  208. atcommand "@reloadpcdb";
  209.  
  210. next;
  211.  
  212. mes "[Vip Control]";
  213.  
  214. mes "Vip Deletado com Sucesso!";
  215.  
  216. close;
  217.  
  218.  
  219.  
  220. case 3:
  221.  
  222. query_sql "SELECT COUNT(1) FROM `login` WHERE `sex` != 'S' AND `group_id` <= '3'", @Total;
  223.  
  224. mes "[VIP Control]";
  225.  
  226. mes "Temos um Total de: ^00FF00"+ @Total +"^000000";
  227.  
  228. mes "Que são:";
  229.  
  230. query_sql "SELECT `viptable`.`vipacc_id`, `viptable`.`vip_id`, `viptable`.`days` FROM `viptable` LEFT JOIN `login` ON `viptable`.`vipacc_id` = `login`.`account_id` ORDER BY `days` DESC LIMIT 100", @AccID, @Login$, @Dias;
  231.  
  232. for(set @i, 0; @i < getarraysize(@Login$); set @i, @i + 1){
  233.  
  234. mes @i+1+". "+@Login$[@i]+" - "+@Dias[@i]+" dias restantes.";
  235.  
  236. }
  237.  
  238. close;
  239.  
  240.  
  241.  
  242. case 4:
  243.  
  244. mes "[Vip Control]";
  245.  
  246. mes "Deseja Alterar oque?";
  247.  
  248. next;
  249.  
  250. switch(select ("- Dias do VIP","- group_id do VIP")){
  251.  
  252.  
  253.  
  254. case 1:
  255.  
  256. mes "[Vip Control]";
  257.  
  258. mes "Insira o Login da Conta VIP:";
  259.  
  260. input @Login$;
  261.  
  262. query_sql "SELECT `vip_id` FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'", @alterid$;
  263.  
  264. if (!getarraysize(@alterid$)){
  265.  
  266. mes "[Vip Control]";
  267.  
  268. mes "Esta conta VIP não existe.";
  269.  
  270. close;
  271.  
  272. }
  273.  
  274.  
  275.  
  276. query_sql "SELECT `days` FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'", @Restante;
  277.  
  278. mes "[Vip Control]";
  279.  
  280. mes "Esta conta ainda tem "+ @Restante +" dias de VIP.";
  281.  
  282. mes "Insira o novo número de dias: (Max: 365)";
  283.  
  284. input @Dias;
  285.  
  286. if (@Dias > 365){
  287.  
  288. mes "[Vip Control]";
  289.  
  290. mes "Você não pode dar mais de 1 ano aos VIPs.";
  291.  
  292. close;
  293.  
  294. }
  295.  
  296. query_sql "UPDATE `viptable` SET `days` = '"+ @Dias +"' WHERE `vip_id` = '"+ @Login$ +"'";
  297.  
  298. mes "[Vip Control]";
  299.  
  300. mes "Dias Alterados com sucesso!";
  301.  
  302. next;
  303.  
  304. mes "[Vip Control]";
  305.  
  306. mes "O novo número de dias desta conta VIP é: "+ @Dias +".";
  307.  
  308. close;
  309.  
  310.  
  311.  
  312. case 2:
  313.  
  314. mes "[Vip Control]";
  315.  
  316. mes "Insira o Login da Conta:";
  317.  
  318. input @Login$;
  319.  
  320. query_sql "SELECT `vip_id` FROM `viptable` WHERE `vip_id` = '"+ @Login$ +"'", @group_idid$;
  321.  
  322. if (!getarraysize(@group_idid$)){
  323.  
  324. mes "[Vip Control]";
  325.  
  326. mes "Esta conta VIP não existe.";
  327.  
  328. close;
  329.  
  330. }
  331.  
  332. mes "[Vip Control]";
  333.  
  334. mes "Insira o NOVO group_id da conta:";
  335.  
  336. input @group_id;
  337.  
  338. if (@group_id > 3){
  339.  
  340. mes "[Vip Control]";
  341.  
  342. mes "O group_id do VIP não pode ser maior que 3!";
  343.  
  344. close;
  345.  
  346. }
  347.  
  348. query_sql "UPDATE `login` SET `group_id` = '"+ @group_id +"' WHERE `userid` = '"+ @Login$ +"'";
  349.  
  350. mes "[Vip Control]";
  351.  
  352. mes "group_id do VIP alterado com sucesso.";
  353.  
  354. next;
  355.  
  356. mes "[Vip Control]";
  357.  
  358. mes "O novo group_id da conta vip é: "+ @group_id +".";
  359.  
  360. atcommand "@reloadpcdb";
  361.  
  362. close;
  363.  
  364. default:
  365.  
  366. mes "[Vip Control]";
  367.  
  368. mes "^FF0000- ERRO -^000000";
  369.  
  370. mes "Contacte o Administrador para solução, e tire uma SS deste menu.";
  371.  
  372. close;
  373.  
  374. }
  375.  
  376.  
  377.  
  378.  
  379.  
  380. case 5:
  381.  
  382. mes "[Vip Control]";
  383.  
  384. mes "Volte quando quiser!";
  385.  
  386. close;
  387.  
  388.  
  389.  
  390. default:
  391.  
  392. mes "[Vip Control]";
  393.  
  394. mes "^FF0000- ERRO -^000000";
  395.  
  396. mes "Contacte o Administrador para solução, e tire uma SS deste menu.";
  397.  
  398. close;
  399.  
  400. }
  401.  
  402. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!