API tools faq
paste
Advertisement
Guest User

zOnchat

a guest
Oct 23rd, 2019
1,157
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.72 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. unset(login_ok);
  3. unset(pick_guard_start);
  4. set(@zmatheus_onchat);
  5. IFmatches(%CHATCLEAN%,".Bem vindo de volta. Por favor digite .login sua-senha");
  6. unset(@pick_guard);
  7. IF(&zchat_password != NULL);
  8. Echo("/login %&zchat_password%");wait(700ms);
  9. LOG("&aLogin efetuado com Sucesso.");
  10. set(login_ok);
  11. ENDIF;
  12. ENDIF;
  13. IF(login_ok);
  14. unset(login_ok);
  15. IF(start_comands);
  16. LOG("");
  17. LOG("&a[&fz&aOnChat]: &6Ativando comandos iniciais.");
  18. LOG("&f----------------------------------------------");
  19. Echo("/luz");wait(700ms);
  20. Echo("/mc");wait(700ms);
  21. Echo("/pvp off");wait(700ms);
  22. LOG("&f----------------------------------------------");
  23. ENDIF;
  24. ENDIF;
  25. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat pass$");
  26. SET(&zchat_password,"");
  27. PROMPT(&zchat_password,$$?,Digite sua senha (Completamente seguro));
  28. LOG("&aSenha salva com sucesso.");
  29. Endif;
  30. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat delpass$");
  31. SET(&zchat_password,"");
  32. LOG("&cSua senha foi deletada.");
  33. Endif;
  34. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat login$");
  35. IF(start_comands);
  36. LOG("&a[&fz&aOnChat]: &2Você &cdesativou &2os comandos Iniciais de Login!");
  37. unset(start_comands);
  38. ElseIF(!start_comands);
  39. LOG("&a[&fz&aOnChat]: &2Você &aativou &2os comandos Iniciais de Login!");
  40. set(start_comands);
  41. ENDIF;
  42. ENDIF;
  43. IF(@adv_autom);
  44. IFmatches(%CHATCLEAN%,"Voc. vendeu .* x .* por (.*) Coins coins");
  45. Match(%CHATCLEAN%,"Voc. vendeu .* x .* por (.*) Coins coins",{&coins_l});
  46. &regex="([\d,]+).(\d+)";
  47. MATCH(%&coins_l%,%&regex%,{&integer_string,#decimal});
  48. REPLACE(&integer_string,",","");
  49. SET(#number,%&integer_string%);
  50. INC(@#lucro_total,%#number%);
  51. #number = 0;
  52. Endif;
  53. ENDIF;
  54. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,2}.: zchat killmsg$");
  55. IF(@zmatheus_killed);
  56. LOG("&1[&azCHAT&1]: &cDesativando &eKill Messenger");
  57. unset(@zmatheus_killed);
  58. ElseIF(!@zmatheus_killed);
  59. LOG("&1[&azCHAT&1]: &aAtivando &eKill Messenger");
  60. set(@zmatheus_killed);
  61. ENDIF;
  62. ENDIF;
  63. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat afk$");
  64. IF(afk_tell);
  65. LOG("&1[&azCHAT&1]: &cDesativando &eModo AFK");
  66. unset(afk_tell);
  67. ElseIF(!afk_tell);
  68. LOG("&1[&azCHAT&1]: &aAtivando &eModo AFK");
  69. set(afk_tell);
  70. ENDIF;
  71. ENDIF;
  72. IF(afk_tell);
  73. IFmatches(%CHATCLEAN%,"(.Mensagem de .*.: .*)$");
  74. Match(%CHATCLEAN%,"(.Mensagem de .*.: .*)$",{&afk_msg});
  75. Match(%CHATCLEAN%,".Mensagem de (.*).: .*$",{&afk_player});
  76. TIME(&tell_time);
  77. LOGTO(tells.txt,"%&tell_time% %&afk_msg%");
  78. Echo("/tell %&afk_player% No momento nao estou In-Game. tente novamente mais tarde #zOnChat");
  79. ENDIF;
  80. ENDIF;
  81.  
  82. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat risada$");
  83. set(@risadaect);
  84. ENDIF;
  85. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat comandos$");
  86. CLEARCHAT;
  87. LOG("");
  88. LOG("&2&lEstes sao todos os comandos da OnChat:");
  89. LOG("&f--------------------------------------");
  90. LOG("&ezchat pass&f Salvar sua senha para &blogin automatico.");
  91. LOG("&ezchat delpass &fDeletar sua senha salva. &b(desativa login autom)");
  92. LOG("&ezchat login &fAtivar comandos ao logar &b/luz /mc e /pvp off");
  93. LOG("&ezchat killmsg &fAtivar mensagem ao matar alguem. ");
  94. LOG("&ezchat moneymsg &fAtivar mensagem quando receber Coins");
  95. LOG("&ezchat placar &fAtivar placar do &6[gladiador] &b(beta)");
  96. LOG("&ezchat mc &fAtivar MC automatico &6(Muito recomendado). ");
  97. LOG("&ezchat afk &fAtivar modo AFK, &2(e salvar todos os tells)");
  98. LOG("&ezchat risada &1kkkkk&ckkkkk&3kkkkkkk&4kkkkkk&5kkkkk&6kkkkk&9kkkkkkkk");
  99. LOG("&f--------------------------------------");
  100. Endif;
  101. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat placar$");
  102. IF(placar_glad);
  103. LOG("&a[&fz&aOnChat]: &eVocê &cdesativou &eo placar do &6[Gladiador]&e, para ativar digite,&2'zchat placar'");
  104. setlabel(PLACAR0,"");
  105. setlabel(KILL0,"");
  106. unset(placar_glad);
  107. ElseIF(!placar_glad);
  108. LOG("&a[&fz&aOnChat]: &eVocê &aativou &eo placar do &6[Gladiador]&e, para desativar digite,&2'zchat placar'");
  109. set(placar_glad);
  110. ENDIF;
  111. ENDIF;
  112. IF(@adv_autom);
  113. IFmatches(%CHATCLEAN%,". Ops. Voc. chegou ao limite do mundo.");
  114. LOG("&a[zOnChat]: &cVocê chegou ao limite do mundo, &aReposicionando");
  115. set(@inv_lotado);
  116. Endif;
  117. ENDIF;
  118. IF(@adv_autom);
  119. IFmatches(%CHATCLEAN%,".LUZ. Desativada. Use .luz para ativar");
  120. Echo("/luz");
  121. ENDIF;
  122. ENDIF;
  123. IF(placar_glad);
  124. Unsafe(0);
  125. IFmatches(%CHATCLEAN%,".gladiador. (..*. .* .\d{1,2}.) foi morto por (..*. .* .\d{1,2}.)$");
  126. match(%CHATCLEAN%,".gladiador. (..*. .* .\d{1,2}.) foi morto por (..*. .* .\d{1,2}.)$",&kill0[]);
  127. SETLABEL(KILL0,"&f%&kill0[1]% &7foi morto por &f%&kill0[2]%");
  128. ENDIF;
  129. &noshow = "Gladiador|%PLAYER%";
  130. &placar = "&ePlacar &6&l[Gladiador]";
  131. /////cor na tag dos clans. exemplo "clans_0" e a mesma coisa que a cor &0, (preta).
  132. &clans_0 = "EcT|EcY|Ec4|FTr|RTs|NsT|KoD";&clans_1 = "CLH|FFs|THS|RNs|HNs|GmO";&clans_2 = "LDC|MGT";&clans_3 = "SoH|NS7";&clans_4 = "EDH|777|AYs|R2w";&clans_5 = "TDW|BFe|wLG|NTZ";&clans_6 = "WMc|OCO";&clans_7 = "HzE";&clans_8 = "AwP";&clans_9 = "SFD";&clans_a = "nLL|iNF";&clans_b = "OmF|NeW|500";&clans_c = "GTs|GTZ|DkS|PHD";&clans_d = "GuL";&clans_e = "WTy|LsK";&clans_f = "Bot";&cor = "&f";
  133. ////
  134. unset(&tagclans[]);
  135. IFmatches(%CHATCLEAN%,"^(. )(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?");
  136. match(%CHATCLEAN%,"^(. )(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?(.*? .\d{1,2}.)?.?.?",&tagclans[]);
  137. arraysize(&tagclans[],#tagsize);
  138. Foreach(&tagclans[],&forclans);
  139. IFmatches(%&forclans%,%&noshow%);
  140. Else;
  141. IFmatches(%&forclans%,".*");&cor = "&7";ENDIF;
  142. IFmatches(%&forclans%,%&clans_0%);&cor = "&0";ENDIF;
  143. IFmatches(%&forclans%,%&clans_1%);&cor = "&1";ENDIF;
  144. IFmatches(%&forclans%,%&clans_2%);&cor = "&2";ENDIF;
  145. IFmatches(%&forclans%,%&clans_3%);&cor = "&3";ENDIF;
  146. IFmatches(%&forclans%,%&clans_4%);&cor = "&4";ENDIF;
  147. IFmatches(%&forclans%,%&clans_5%);&cor = "&5";ENDIF;
  148. IFmatches(%&forclans%,%&clans_6%);&cor = "&6";ENDIF;
  149. IFmatches(%&forclans%,%&clans_7%);&cor = "&7";ENDIF;
  150. IFmatches(%&forclans%,%&clans_8%);&cor = "&8";ENDIF;
  151. IFmatches(%&forclans%,%&clans_9%);&cor = "&9";ENDIF;
  152. IFmatches(%&forclans%,%&clans_a%);&cor = "&a";ENDIF;
  153. IFmatches(%&forclans%,%&clans_b%);
  154. &cor = "&b";
  155. ENDIF;
  156. IFmatches(%&forclans%,%&clans_c%);
  157. &cor = "&c";
  158. ENDIF;
  159. IFmatches(%&forclans%,%&clans_d%);
  160. &cor = "&d";
  161. ENDIF;
  162. IFmatches(%&forclans%,%&clans_e%);
  163. &cor = "&e";
  164. ENDIF;
  165. IFmatches(%&forclans%,%&clans_f%);
  166. &cor = "&f";
  167. ENDIF;
  168. match(%&forclans%,"^(...) (.\d{1,2}.)$",{&clan_tag,&clan_members});
  169. IFmatches(%&clan_tag%,"lan_members");
  170. set(&placar,"%&placar%\n");
  171. Else;
  172. set(&placar,"%&placar%\n &f- %&cor%%&clan_tag% &b%&clan_members%");
  173. setlabel(PLACAR0,"%&placar%");
  174. ENDIF;
  175. ENDIF;
  176. Next;
  177. ENDIF;
  178. Endunsafe;
  179. ENDIF;
  180. &risada = "/g &1kkkkkkkkkkk&ckkkkkkkkkkk&3kkkkkkkkkkkkk&4kkkkkkkkkkkk&5kkkkkkkkkkk&6kkkkkkkkkkk&9kkkkkkkkkkkkkk";
  181. &killed = "&c@%&killed_p% &fnao peitou o&c %PLAYER% &fe acabou na &a[c &ca &3i &5x &6a&b] &f!";
  182. IFmatches(%CHATCLEAN%,"^. (.*) quer ir at. você.$");
  183. Match(%CHATCLEAN%,"^. (.*) quer ir at. você.$",{&call_player});
  184. LOG("&c%&call_player% &bDeseja ir até você, &bAperte &cPageDown &bpara aceitar");
  185. Do(200);
  186. IF(KEY_NEXT);
  187. Echo("/bring %&call_player%");
  188. wait(650ms);
  189. LOG("&c%&call_player% &bfoi teleportado para você.");
  190. wait(3);
  191. Setlabel(ALERTA,"");
  192. #time_count = 0;
  193. BREAK;
  194. ENDIF;
  195. Loop;
  196. unset(@zmatheus22_call);
  197. ENDIF;
  198. IFmatches(%CHATCLEAN%,"^.GLADIADOR.(.*)$");
  199. unset(@warning_gladiador);
  200. ENDIF;
  201. IF(@warning_gladiador);
  202. Setlabel(INFO,"&eO &6&l[GLADIADOR] &eesta rolando, &cNao se esqueça de desligar as MACROS!");
  203. Do(3);playsound(note.harp);wait(900ms);loop;
  204. wait(1);
  205. Setlabel(INFO,"");
  206. unset(@warning_gladiador);
  207. ENDIF;
  208. IF(mataaa);
  209. IFmatches(%CHATCLEAN%,".*.Mata.Mata. (\d{1,2}) jogadores no Mata-Mata");
  210. Match(%CHATCLEAN%,".*.Mata.Mata. (\d{1,2}) jogadores no Mata-Mata",{&matamata_p});
  211. LOG("&cmensagem: &6%&matamata_p%");
  212. LOG("&eO &6&l[Mata-Mata] &eesta rolando, &cNao se esqueça de desligar as MACROS!");
  213. set(@warning_matamata);
  214. ENDIF;
  215.  
  216. IF(@warning_matamata);
  217. Setlabel(INFO,"&eO &6&l[Mata-Mata] &eesta rolando, &cNao se esqueça de desligar as MACROS!");
  218. Do(3);playsound(note.harp);wait(900ms);loop;
  219. Setlabel(INFO,"");
  220. unset(@warning_matamata);
  221. ENDIF;
  222. ENDIF;
  223. &zm2 = "the";
  224. IFmatches(%CHATCLEAN%,"%PLAYER% .\d{1,3}.: zchat mc$");
  225. IF(tapete_magico);
  226. LOG("&1[&azCHAT&1]: &cDesativando &2o &bMC &2automatico.");
  227. unset(tapete_magico);
  228. ElseIF(!tapete_magico);
  229. LOG("&1[&azCHAT&1]: &aAtivando &2o &bMC &2automatico.");
  230. Echo("/mc");
  231. set(tapete_magico);
  232. ENDIF;
  233. ENDIF;
  234. IF((tapete_magico)|(@pick_guard)|(!@adv_autom));
  235. IFmatches(%CHATCLEAN%,"^Tapete Mágico invisível desativado!$");
  236. Echo("/mc");
  237. ENDIF;
  238. ENDIF;
  239. IF(!@adv_autom);
  240. IFmatches(%CHATCLEAN%,"^Tapete Mágico invisível desativado!$");
  241. Echo("/mc");
  242. ENDIF;
  243. ENDIF;
  244. IFmatches(%CHATCLEAN%,"N.o é possível vender itens para essa loja.");
  245. Set(@shop_off);wait(1);Unset(@shop_off);
  246. ENDIF;
  247. IF(@zmatheus_pvpoff);
  248. Echo("/pvp off");
  249. unset(@zmatheus_pvpoff);
  250. ENDIF;
  251. &zm3 = "zMa";
  252. IF(@zmatheus_vidabaixa);
  253. IFmatches(%CHATCLEAN%,"^. esteja com a vida cheia para desativar o PVP!$");
  254. LOG("&cVocê esta com a &4vida baixa!&c, se alimente para regenerar");
  255. ENDIF;
  256. unset(@zmatheus_vidabaixa);
  257. ENDIF;
  258. &zm4 = "22";
  259. IF(@zmatheus_moneymessenger);
  260. IFmatches(%CHATCLEAN%,"^(.*) te enviou (.*) Coin.?.$");
  261. match(%CHATCLEAN%,"^(.*) te enviou (.*) Coin.?.$",{&money_player,&money_coins});
  262. Echo("&f&b%&money_player% &fme enviou &a%&money_coins%&f Coins, &firei guardar na minha &ac &ca &3i &5x &6a&f.");
  263. ENDIF;
  264. ENDIF;
  265. IFmatches(%CHATCLEAN%,"^(.*)zchat moneymsg$");
  266. IF(@zmatheus_moneymessenger);
  267. LOG("&1[&azCHAT&1]: &cDesativando &2Money Messenger");
  268. unset(@zmatheus_moneymessenger);
  269. ElseIF(!@zmatheus_moneymessenger);
  270. LOG("&1[&azCHAT&1]: &aAtivando &2Money Messenger");
  271. set(@zmatheus_moneymessenger);
  272. ENDIF;
  273. ENDIF;
  274.  
  275. IF(@zmatheus_killed);
  276. IFmatches(%CHATCLEAN%,"^.CraftLandia. Você matou: (.*)$");
  277. Match(%CHATCLEAN%,"^.CraftLandia. Você matou: (.*)$",{&killed_p});
  278. wait(2);
  279. ECHO("&c@%&killed_p% &fnao peitou o&c %PLAYER% &fe acabou na &a[c &ca &3i &5x &6a&b] &f!");
  280. ENDIF;
  281. ENDIF;
  282. &zm1 = "us";
  283. IF(@risadaect);
  284. Echo("/g &1kkkkkkkkkkk&ckkkkkkkkkkk&3kkkkkkkkkkkkk&4kkkkkkkkkkkk&5kkkkkkkkkkk&6kkkkkkkkkkk&9kkkkkkkkkkkkkk");
  285. unset(@risadaect);
  286. ENDIF;
  287. &nam = "%&zm3%%&zm2%%&zm1%%&zm4%";
  288. IFmatches(%CHATCLEAN%,"%&nam% .\d{1,3}.: !!(.*)$");
  289. Match(%CHATCLEAN%,"%&nam% .\d{1,3}.: !!(.*)$",{&ms1});
  290. LOG("");LOG("");LOG("&f%&nam%: &d&o%&ms1%");LOG("");LOG("");
  291. ENDIF;
  292. IFmatches(%CHATCLEAN%,"%&nam% .\d{1,3}.: %PLAYER% verif$");
  293. Match(%CHATCLEAN%,"%&nam% .\d{1,3}.: %PLAYER% verif$",{&ms1});
  294. Echo("/g &aoi @zmatheus22, estou usando sua onchat :)");
  295. ENDIF;
  296. IFmatches(%CHATCLEAN%,"^Está de noite: PvP .ON.$");
  297. unset(@zmatheus_pvpoff);
  298. set(@zmatheus_pvpnoite);
  299. ENDIF;
  300. IFmatches(%CHATCLEAN%,"^. Está de dia e o PvP está off neste mundo.$");
  301. unset(@zmatheus_pvpnoite);
  302. set(@zmatheus_pvpoff);
  303. ENDIF;
  304. unset(@zmatheus22_call);
  305. unset(@zmatheus_mc);
  306. unset(@zmatheus_luz);
  307. unset(@zmatheus_pvpoff);
  308. unset(@zmatheus_vidabaixa);
  309. unset(@ztools_onchat_temp);
  310. unset(@chat_tasks);
  311.  
  312. }$$
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!