API tools faq
paste
Guest User

Untitled

a guest
Mar 28th, 2024
65
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 319.83 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3. // Versao/Upgrade: 0.7
  4. // Verifique a versao mais atualizada neste link: https://enrt.eu/KWhSG
  5.  
  6. /////////////////////////////////
  7. // Delay Ajustável //
  8. // //
  9. // Mínimo: 1 //
  10. // Máximo: 350 //
  11. // //
  12. SET(#delay_pescar,"150");
  13. SET(#delay_dropar,"75");
  14. // //
  15. // (altere apenas o número) //
  16. /////////////////////////////////
  17.  
  18. IF((!fix_unbug)||(KEY_DELETE)||(KEY_DECIMAL));
  19. TOGGLE(sleep_macro);
  20. SET(fix_unbug);
  21. GUI(INVENTORY);
  22. WAIT(6T);
  23. DO;
  24. UNTIL(%FPS%>5);
  25. UNSET(fix_unbug);
  26. GUI();
  27. IF(sleep_macro);
  28. LOG("&9&l[&f&oM&facro&9&l] &aSleep_Pesca &f&l[&2ON&f&l]");
  29. ACHIEVEMENTGET("[ON] Pesca Upgrade 0.7","346");
  30. SET(@afk_onchat);
  31. SET(@&afk_onchat_bn,"");
  32. UNSET(pesqueiro_invadido);
  33. WAIT(10T);
  34. ELSE;
  35. LOG("&9&l[&f&oM&facro&9&l] &cSleep_Pesca &f&l[&4OFF&f&l]");
  36. UNSET(@afk_onchat);
  37. IF(config_backup_ds);
  38. SET(&backup_config,"%&healt_down%");
  39. IF(armazenar_itens);
  40. LOG("");
  41. LOG("&9&l[&f&oM&facro&9&l] &aTrap de baús:");
  42. IF(%#chest_total_inc%<80);
  43. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &a%#chest_total_inc%&fº");
  44. ELSEIF(%#chest_total_inc%=80);
  45. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &4%#chest_total_inc%&cº &f&o(último baú)");
  46. LOG("&cAdquira a macro Sleep_Pesca 0.8 e tenha um armazenamento organizado e infinito, vendas na Warp VIP com homes, 80 baús para linhas e varas, verificação em tempo real do inventário e varias outras novidades. Se interessou? Me chame no Discord: SLEEP#8834");
  47. ELSE;
  48. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &480&cº &f&o(não é mais possível armazenar)");
  49. LOG("&cAdquira a macro Sleep_Pesca 0.8 e tenha um armazenamento organizado e infinito, vendas na Warp VIP com homes, 80 baús para linhas e varas, verificação em tempo real do inventário e varias outras novidades. Se interessou? Me chame no Discord: SLEEP#8834");
  50. ENDIF;
  51. SET(#total_itens_arm,"");
  52. INC(#total_itens_arm,%#livros_tesouro%);
  53. INC(#total_itens_arm,%#armadura_inc%);
  54. INC(#total_itens_arm,%#espada_inc%);
  55. INC(#total_itens_arm,%#ferramenta_inc%);
  56. INC(#total_itens_arm,%#diamante_inc%);
  57. INC(#total_itens_arm,%#ouro_inc%);
  58. INC(#total_itens_arm,%#ferro_inc%);
  59. INC(#total_itens_arm,%#lagrima_inc%);
  60. INC(#total_itens_arm,%#blaze_inc%);
  61. INC(#total_itens_arm,%#peixe_inc%);
  62. INC(#total_itens_arm,%#disco_inc%);
  63. INC(#total_itens_arm,%#lapis_inc%);
  64. IF(%#total_itens_arm%>=1);
  65. LOG("");
  66. IF(%#total_itens_arm%=1);
  67. LOG("&9&l[&f&oM&facro&9&l] &aItem armazenado:");
  68. ELSEIF(%#total_itens_arm%>1);
  69. LOG("&9&l[&f&oM&facro&9&l] &aItens armazenados:");
  70. ENDIF;
  71. IF(%#livros_tesouro%=1);
  72. LOG("&9&l[&f&oM&facro&9&l] &f&oTesouro: &a1");
  73. ELSEIF(%#livros_tesouro%>1);
  74. LOG("&9&l[&f&oM&facro&9&l] &f&oTesouros: &a%#livros_tesouro%");
  75. ENDIF;
  76. IF(%#armadura_inc%=1);
  77. LOG("&9&l[&f&oM&facro&9&l] &f&oParte de armadura: &a1");
  78. ELSEIF(%#armadura_inc%>1);
  79. LOG("&9&l[&f&oM&facro&9&l] &f&oPartes de armaduras: &a%#armadura_inc%");
  80. ENDIF;
  81. IF(%#espada_inc%=1);
  82. LOG("&9&l[&f&oM&facro&9&l] &f&oEspada: &a1");
  83. ELSEIF(%#espada_inc%>1);
  84. LOG("&9&l[&f&oM&facro&9&l] &f&oEspadas: &a%#espada_inc%");
  85. ENDIF;
  86. IF(%#ferramenta_inc%=1);
  87. LOG("&9&l[&f&oM&facro&9&l] &f&oFerramenta: &a1");
  88. ELSEIF(%#ferramenta_inc%>1);
  89. LOG("&9&l[&f&oM&facro&9&l] &f&oFerramentas: &a%#ferramenta_inc%");
  90. ENDIF;
  91. IF(%#diamante_inc%=1);
  92. LOG("&9&l[&f&oM&facro&9&l] &f&oDiamante: &a1");
  93. ELSEIF(%#diamante_inc%>1);
  94. LOG("&9&l[&f&oM&facro&9&l] &f&oDiamantes: &a%#diamante_inc%");
  95. ENDIF;
  96. IF(%#ouro_inc%=1);
  97. LOG("&9&l[&f&oM&facro&9&l] &f&oOuro: &a1");
  98. ELSEIF(%#ouro_inc%>1);
  99. LOG("&9&l[&f&oM&facro&9&l] &f&oOuros: &a%#ouro_inc%");
  100. ENDIF;
  101. IF(%#ferro_inc%=1);
  102. LOG("&9&l[&f&oM&facro&9&l] &f&oFerro: &a1");
  103. ELSEIF(%#ferro_inc%>1);
  104. LOG("&9&l[&f&oM&facro&9&l] &f&oFerros: &a%#ferro_inc%");
  105. ENDIF;
  106. IF(%#lagrima_inc%=1);
  107. LOG("&9&l[&f&oM&facro&9&l] &f&oLágrima de Ghast: &a1");
  108. ELSEIF(%#lagrima_inc%>1);
  109. LOG("&9&l[&f&oM&facro&9&l] &f&oLágrimas de Ghast: &a%#lagrima_inc%");
  110. ENDIF;
  111. IF(%#blaze_inc%=1);
  112. LOG("&9&l[&f&oM&facro&9&l] &f&oVara incandescente: &a1");
  113. ELSEIF(%#blaze_inc%>1);
  114. LOG("&9&l[&f&oM&facro&9&l] &f&oVaras incandescentes: &a%#blaze_inc%");
  115. ENDIF;
  116. IF(%#peixe_inc%=1);
  117. LOG("&9&l[&f&oM&facro&9&l] &f&oPeixe: &a1");
  118. ELSEIF(%#peixe_inc%>1);
  119. LOG("&9&l[&f&oM&facro&9&l] &f&oPeixes: &a%#peixe_inc%");
  120. ENDIF;
  121. IF(%#disco_inc%=1);
  122. LOG("&9&l[&f&oM&facro&9&l] &f&oDisco: &a1");
  123. ELSEIF(%#disco_inc%>1);
  124. LOG("&9&l[&f&oM&facro&9&l] &f&oDiscos: &a%#disco_inc%");
  125. ENDIF;
  126. IF(%#lapis_inc%>=1);
  127. LOG("&9&l[&f&oM&facro&9&l] &f&oLápis-Lazúli: &a%#lapis_inc%");
  128. ENDIF;
  129. ENDIF;
  130. LOG("");
  131. ENDIF;
  132. IF(vender_disco);
  133. IF(!armazenar_itens);
  134. LOG("");
  135. ENDIF;
  136. LOG("&9&l[&f&oM&facro&9&l] &aVenda de discos:");
  137. IF(%#discos_vendidos%>=1);
  138. IF(%#vender_disco%=1);
  139. #lucro_discos = %#discos_vendidos% * 110;
  140. ELSE;
  141. #lucro_discos = %#discos_vendidos% * 100;
  142. ENDIF;
  143. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &a%#discos_vendidos% &7- &f&oLucro total: &a%#lucro_discos% &f&ocoins");
  144. ELSE;
  145. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &cNenhum &7- &f&oLucro total: &cSem lucro");
  146. ENDIF;
  147. LOG("");
  148. ENDIF;
  149. IF(vender_peixe);
  150. IF((!armazenar_itens)&&(!vender_disco));
  151. LOG("");
  152. ENDIF;
  153. LOG("&9&l[&f&oM&facro&9&l] &aVenda de peixes:");
  154. IF(%#peixes_vendidos%>=1);
  155. IF(%#vender_peixe%=1);
  156. #lucro_peixes = %#peixes_vendidos% * 704;
  157. ELSE;
  158. #lucro_peixes = %#peixes_vendidos% * 576;
  159. ENDIF;
  160. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos (em packs): &a%#peixes_vendidos% &7- &f&oLucro total: &a%#lucro_peixes% &f&ocoins");
  161. ELSE;
  162. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &cNenhum &7- &f&oLucro total: &cSem lucro");
  163. ENDIF;
  164. LOG("");
  165. ENDIF;
  166. IF((armazenar_itens)&&(%#chest_total_inc%<80));
  167. RANDOM(#anuncio,100,0);
  168. IF(%#anuncio%<=15);
  169. LOG("&cAdquira a macro Sleep_Pesca 0.8 e tenha um armazenamento organizado e infinito, vendas na Warp VIP com homes, 80 baús para linhas e varas, verificação em tempo real do inventário e varias outras novidades. Se interessou? Me chame no Discord: SLEEP#8834");
  170. LOG("");
  171. ENDIF;
  172. ENDIF;
  173. IF(pesqueiro_invadido);
  174. LOG("&9&l[&f&oM&facro&9&l] &cVocê ficou com a vida baixa e o alarme de invasão foi acionado.");
  175. LOG("&9&l[&f&oM&facro&9&l] &cPrints foram salvas, verifique na pasta screenshots do seu ModPack.");
  176. LOG("");
  177. ENDIF;
  178. IF(sleep_send);
  179. UNSET(sleep_send);
  180. ENDIF;
  181. ENDIF;
  182. GUI(INVENTORY);
  183. GUI();
  184. ACHIEVEMENTGET("[OFF] Pesca Upgrade 0.7","346");
  185. STOP;
  186. ENDIF;
  187. IF(config_backup_ds);
  188. SET(#send_log,"299");
  189. DO;
  190. INC(#send_log,1);
  191. IF(%#send_log%=300);
  192. SET(#send_log,"");
  193. CLEARCHAT;
  194. LOG("&9&l[&f&oM&facro&9&l] &aIniciar com as últimas configurações?");
  195. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  196. IF((armazenar_itens)&&(vender_disco)||(vender_peixe));
  197. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, recomeçar pelo 1º baú e resetar lucro");
  198. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  199. SET(sleep_alt);
  200. ELSEIF((armazenar_itens)&&(!vender_disco)&&(!vender_peixe));
  201. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, recomeçar pelo 1º baú");
  202. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  203. SET(sleep_alt);
  204. ELSEIF((!armazenar_itens)&&(vender_disco)||(vender_peixe));
  205. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, resetar lucro");
  206. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  207. SET(sleep_alt);
  208. ELSE;
  209. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  210. UNSET(sleep_alt);
  211. ENDIF;
  212. LOG("");
  213. ENDIF;
  214. IF(KEY_1);
  215. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  216. UNSET(config_register);
  217. DO;WHILE(KEY_1);
  218. BREAK;
  219. ELSEIF(KEY_2);
  220. IF((armazenar_itens)&&(vender_disco)||(vender_peixe));
  221. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, recomeçar pelo 1º baú e resetar lucro");
  222. SET(#chest_inc,"1");
  223. SET(#chest_dir_inc,"1");
  224. SET(#chest_total_inc,"1");
  225. SET(#discos_vendidos,"");
  226. SET(#peixes_vendidos,"");
  227. SET(#pack_linha_min,"%#pack_linha_min_backup%");
  228. SET(#time_verificar,"%#time_verificar_backup%");
  229. SET(#livros_tesouro,"");
  230. SET(#armadura_inc,"");
  231. SET(#espada_inc,"");
  232. SET(#ferramenta_inc,"");
  233. SET(#diamante_inc,"");
  234. SET(#ouro_inc,"");
  235. SET(#ferro_inc,"");
  236. SET(#lagrima_inc,"");
  237. SET(#blaze_inc,"");
  238. SET(#peixe_inc,"");
  239. SET(#disco_inc,"");
  240. SET(#lapis_inc,"");
  241. SET(#sleep_msg_send,"");
  242. SET(#hora_save,"5454");
  243. UNSET(config_register);
  244. ELSEIF((armazenar_itens)&&(!vender_disco)&&(!vender_peixe));
  245. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, recomeçar pelo 1º baú");
  246. SET(#livros_tesouro,"");
  247. SET(#armadura_inc,"");
  248. SET(#espada_inc,"");
  249. SET(#ferramenta_inc,"");
  250. SET(#diamante_inc,"");
  251. SET(#ouro_inc,"");
  252. SET(#ferro_inc,"");
  253. SET(#lagrima_inc,"");
  254. SET(#blaze_inc,"");
  255. SET(#peixe_inc,"");
  256. SET(#disco_inc,"");
  257. SET(#lapis_inc,"");
  258. SET(#chest_inc,"1");
  259. SET(#chest_dir_inc,"1");
  260. SET(#chest_total_inc,"1");
  261. SET(#pack_linha_min,"%#pack_linha_min_backup%");
  262. SET(#time_verificar,"%#time_verificar_backup%");
  263. SET(#sleep_msg_send,"");
  264. SET(#hora_save,"5454");
  265. UNSET(config_register);
  266. ELSEIF((!armazenar_itens)&&(vender_disco)||(vender_peixe));
  267. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, resetar lucro");
  268. SET(#pack_linha_min,"%#pack_linha_min_backup%");
  269. SET(#time_verificar,"%#time_verificar_backup%");
  270. SET(#discos_vendidos,"");
  271. SET(#peixes_vendidos,"");
  272. SET(#sleep_msg_send,"");
  273. SET(#hora_save,"5454");
  274. UNSET(config_register);
  275. ELSE;
  276. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  277. WAIT(12T);
  278. SET(config_register);
  279. ENDIF;
  280. DO;WHILE(KEY_2);
  281. BREAK;
  282. ELSEIF((KEY_3)&&(sleep_alt));
  283. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  284. SET(config_register);
  285. DO;WHILE(KEY_3);
  286. BREAK;
  287. ENDIF;
  288. LOOP;
  289. ELSE;
  290. SET(config_register);
  291. ENDIF;
  292. IF(config_register);
  293. LOG("&9&l[&f&oM&facro&9&l] &aVerificando SleepOnChat e se você é VIP...");
  294. SET(config_register);
  295. SET(#chest_inc,"1");
  296. SET(#chest_dir_inc,"1");
  297. SET(#chest_total_inc,"1");
  298. SET(&enchant_yes_arm,"TUDO");
  299. SET(&enchant_yes_esp,"TUDO");
  300. SET(&enchant_yes_fer,"TUDO");
  301. SET(&itens_armazem,"");
  302. SET(#itens_armazem,"");
  303. SET(#time_verificar,"1000000");
  304. SET(#sleep_msg_send,"");
  305. SET(#hora_save,"5454");
  306. SET(#discos_vendidos,"");
  307. SET(#peixes_vendidos,"");
  308. SET(#livros_tesouro,"");
  309. SET(#livros_tesouro,"");
  310. SET(#armadura_inc,"");
  311. SET(#espada_inc,"");
  312. SET(#ferramenta_inc,"");
  313. SET(#diamante_inc,"");
  314. SET(#ouro_inc,"");
  315. SET(#ferro_inc,"");
  316. SET(&ids_kit_vip,"^2256$|^2257$|^2258$|^129$|^8$|^153$|^155$|^375$|^383$|^384$|^264$|^322$|^122$|^372$|^276$|^400$|");
  317. SET(&item_id,"<diamante>g9&aati<ouro>v<ferro>ando9a9<ouro>ma<ferro>cro:<ouro>9");
  318. SET(#lagrima_inc,"");
  319. SET(#blaze_inc,"");
  320. SET(#peixe_inc,"");
  321. SET(#disco_inc,"");
  322. SET(#lapis_inc,"");
  323. SET(#verificar_vip,"");
  324. UNSET(config_backup_ds);
  325. UNSET(vender_disco);
  326. UNSET(vender_peixe);
  327. UNSET(armazenar_itens);
  328. UNSET(arm_thorns_trash);
  329. UNSET(arm_unbreaking_up);
  330. UNSET(arm_unbreaking_up_all);
  331. UNSET(arm_unbreaking_up_qall);
  332. UNSET(esp_fire_1_up);
  333. UNSET(esp_fire_2_up);
  334. UNSET(esp_knockback_trash);
  335. UNSET(esp_looting_up);
  336. UNSET(fer_unbreaking_up);
  337. UNSET(sleeponchat);
  338. UNSET(kitnbvip);
  339. UNSET(apenas_diamante);
  340. UNSET(fer_durability_down);
  341. UNSET(nao_armazenar);
  342. DO(2);
  343. UNSET(@sleepteleport);
  344. WAIT(2T);
  345. SET(#sleep_inc,"");
  346. }$$/home sleeppesca$${
  347. DO;
  348. INC(#verificar_vip,1);
  349. INC(#sleep_inc,1);
  350. UNTIL((@sleepteleport)||(%#sleep_inc%>=250));
  351. IF(@sleepteleport);
  352. SET(sleeponchat);
  353. ENDIF;
  354. WAIT(5T);
  355. LOOP;
  356. IF(!sleeponchat);
  357. CLEARCHAT;
  358. LOG("&9&l[&f&oM&facro&9&l] &cVocê não instalou ou instalou errado a macro SleepOnChat.");
  359. LOG("&9&l[&f&oM&facro&9&l] &cPara instalar acesse este link:");
  360. LOG("&9&l[&f&oM&facro&9&l] &ahttps://enrt.eu/gzm4w");
  361. LOG("&9&l[&f&oM&facro&9&l] &cSe você não marcar a home sleeppesca, este erro também acontece.");
  362. LOG("");
  363. WAIT(10T);
  364. LOG("&9&l[&f&oM&facro&9&l] &cSleep_Pesca &f&l[&4OFF&f&l]");
  365. ACHIEVEMENTGET("[OFF] Pesca Upgrade 0.7","346");
  366. UNSET(@afk_onchat);
  367. TOGGLE(sleep_macro);
  368. STOP;
  369. ENDIF;
  370. SET(#send_log,"299");
  371. SET(&md,"s8l8e8e8p8_8p8e8s8c8a9(8u8p8g8.908.878)8");
  372. DO;
  373. INC(#send_log,1);
  374. IF(%#send_log%=300);
  375. SET(#send_log,"");
  376. CLEARCHAT;
  377. LOG("&9&l[&f&oM&facro&9&l] &aReparar a vara com qual durabilidade?");
  378. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &f10");
  379. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &f17 (recomendado)");
  380. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &f25");
  381. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fEu escolho");
  382. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &c&oNão tenho nível de reparação suficiênte.");
  383. LOG("");
  384. ENDIF;
  385. IF(KEY_1);
  386. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &f10");
  387. SET(#dur_vara_reparar,"10");
  388. DO;WHILE(KEY_1);
  389. BREAK;
  390. ELSEIF(KEY_2);
  391. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &f17 (recomendado)");
  392. SET(#dur_vara_reparar,"17");
  393. DO;WHILE(KEY_2);
  394. BREAK;
  395. ELSEIF(KEY_3);
  396. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &f25");
  397. SET(#dur_vara_reparar,"25");
  398. DO;WHILE(KEY_3);
  399. BREAK;
  400. ELSEIF(KEY_4);
  401. LOG("");
  402. LOG("&9&l[&f&oM&facro&9&l] &aEscreva um número entre &25 &aa &245&a.");
  403. LOG("");
  404. DO;WHILE(KEY_4);
  405. PROMPT(#dur_vara_reparar,$$?,"Escreva um número entre 5 a 45.");
  406. IF((%#dur_vara_reparar%<5)||(%#dur_vara_reparar%>45));
  407. LOG("&9&l[&f&oM&facro&9&l] &cNúmero inválido, alterado automaticamente para &217&c.");
  408. SET(#dur_vara_reparar,"17");
  409. ELSE;
  410. LOG("&9&l[&f&oM&facro&9&l] &aReparar a vara com &2%#dur_vara_reparar% &ade durabilidade.");
  411. ENDIF;
  412. WAIT(10T);
  413. BREAK;
  414. ELSEIF(KEY_5);
  415. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &c&oNão tenho nível de reparação suficiênte.");
  416. SET(#dur_vara_reparar,"-1");
  417. DO;WHILE(KEY_3);
  418. BREAK;
  419. ENDIF;
  420. LOOP;
  421. WAIT(12T);
  422. SET(#send_log,"299");
  423. SET(&tfarc_1,"v8e8n8d8a9d8e9d8i8s8c8o8s98i8n8i8c8i8a8d8a8. %&md%");
  424. SET(&tfarc_2,"v8e8n8d8a9d8e9d8i8s8c8o8s9c8o8n8c8l8u8í8d8a. %&md%");
  425. SET(&tfarc_3,"v8e8n8d8a9d8e9p8e8i8x8e8s898i8ni8c8i8a8d8a8. %&md%");
  426. SET(warp_vip_nova);
  427. SET(&server_atual,"Legacy");
  428. SET(&tfarc_4,"v8e8n8d8a9d8e9p8e8ix8e8s98c8o8n8c8l8uí8d8a8. %&md%");
  429. SET(&tfarc_5,"c8o8m8p8r8a9d8e9l8i8n8h8a8s898i8ni8c8i8a8d8a8. %&md%");
  430. SET(&tfarc_6,"c8o8m8p8r8a9d8e9l8i8n8h8a8s9c8o8n8c8l8uí8d8a8. %&md%");
  431. DO;
  432. INC(#send_log,1);
  433. IF(%#send_log%=300);
  434. SET(#send_log,"");
  435. CLEARCHAT;
  436. LOG("&9&l[&f&oM&facro&9&l] &aDeseja vender os discos?");
  437. IF(%#verificar_vip%<=80);
  438. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp vip (servidor atual: &e&l%&server_atual%&f)");
  439. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, /warp loja (/home sleepdiscos)");
  440. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  441. ELSE;
  442. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp loja (/home sleepdiscos)");
  443. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  444. ENDIF;
  445. LOG("");
  446. ENDIF;
  447. IF(KEY_1);
  448. SET(vender_disco);
  449. IF(%#verificar_vip%<=80);
  450. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp vip (servidor atual: &e&l%&server_atual%&f)");
  451. REPLACE(&ids_kit_vip,"^2256$|","");
  452. REPLACE(&ids_kit_vip,"^2257$|","");
  453. REPLACE(&ids_kit_vip,"^2258$|","");
  454. SET(#vender_disco,"1");
  455. ELSE;
  456. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp loja (/home sleepdiscos)");
  457. SET(#vender_disco,"2");
  458. ENDIF;
  459. DO;WHILE(KEY_1);
  460. BREAK;
  461. ELSEIF(KEY_2);
  462. IF(%#verificar_vip%<=80);
  463. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, /warp loja (/home sleepdiscos)");
  464. REPLACE(&ids_kit_vip,"^2256$|","");
  465. REPLACE(&ids_kit_vip,"^2257$|","");
  466. REPLACE(&ids_kit_vip,"^2258$|","");
  467. SET(vender_disco);
  468. SET(#vender_disco,"2");
  469. ELSE;
  470. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  471. UNSET(vender_disco);
  472. ENDIF;
  473. DO;WHILE(KEY_2);
  474. BREAK;
  475. ELSEIF((KEY_3)&&(%#verificar_vip%<=80));
  476. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  477. UNSET(vender_disco);
  478. DO;WHILE(KEY_3);
  479. BREAK;
  480. ENDIF;
  481. LOOP;
  482. WAIT(12T);
  483. SET(#send_log,"299");
  484. DO;
  485. INC(#send_log,1);
  486. IF(%#send_log%=300);
  487. SET(#send_log,"");
  488. CLEARCHAT;
  489. LOG("&9&l[&f&oM&facro&9&l] &aDeseja vender os peixes?");
  490. IF(%#verificar_vip%<=80);
  491. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp vip (servidor atual: &e&l%&server_atual%&f)");
  492. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, /warp loja (/home sleeppeixe)");
  493. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  494. ELSE;
  495. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp loja (/home sleeppeixe)");
  496. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  497. ENDIF;
  498. LOG("");
  499. ENDIF;
  500. IF(KEY_1);
  501. SET(vender_peixe);
  502. IF(%#verificar_vip%<=80);
  503. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp vip (servidor atual: &e&l%&server_atual%&f)");
  504. SET(#vender_peixe,"1");
  505. ELSE;
  506. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim, /warp loja (/home sleeppeixe)");
  507. SET(#vender_peixe,"2");
  508. ENDIF;
  509. DO;WHILE(KEY_1);
  510. BREAK;
  511. ELSEIF(KEY_2);
  512. IF(%#verificar_vip%<=80);
  513. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fSim, /warp loja (/home sleeppeixe)");
  514. SET(vender_peixe);
  515. SET(#vender_peixe,"2");
  516. ELSE;
  517. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  518. UNSET(vender_peixe);
  519. ENDIF;
  520. DO;WHILE(KEY_2);
  521. BREAK;
  522. ELSEIF((KEY_3)&&(%#verificar_vip%<=80));
  523. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &cNão");
  524. UNSET(vender_peixe);
  525. DO;WHILE(KEY_3);
  526. BREAK;
  527. ENDIF;
  528. LOOP;
  529. WAIT(12T);
  530. SET(#send_log,"299");
  531. DO;
  532. INC(#send_log,1);
  533. IF(%#send_log%=300);
  534. SET(#send_log,"");
  535. CLEARCHAT;
  536. LOG("&9&l[&f&oM&facro&9&l] &aDeseja armazenar os itens?");
  537. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  538. IF((vender_disco)&&(vender_peixe));
  539. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar, vender discos e peixes");
  540. ELSEIF((vender_disco)&&(!vender_peixe));
  541. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar e vender discos");
  542. ELSEIF((!vender_disco)&&(vender_peixe));
  543. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar e vender peixes");
  544. ELSE;
  545. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar");
  546. ENDIF;
  547. LOG("");
  548. ENDIF;
  549. IF(KEY_1);
  550. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  551. SET(armazenar_itens);
  552. DO;WHILE(KEY_1);
  553. BREAK;
  554. ELSEIF(KEY_2);
  555. IF((vender_disco)&&(vender_peixe));
  556. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar, vender discos e peixes");
  557. ELSEIF((vender_disco)&&(!vender_peixe));
  558. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar e vender discos");
  559. ELSEIF((!vender_disco)&&(vender_peixe));
  560. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar e vender peixes");
  561. ELSE;
  562. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão, apenas upar");
  563. ENDIF;
  564. UNSET(armazenar_itens);
  565. SET(#time_verificar,"1000000");
  566. DO;WHILE(KEY_2);
  567. BREAK;
  568. ENDIF;
  569. LOOP;
  570. WAIT(12T);
  571. SET(&item_id,"%&item_id%<ouro>&fsle<ferro>ep_pes<ferro>ca9&a(u<diamante>pg<diamante>");
  572. SET(&item_id,"%&item_id%<diamante>.9&f0.7&a<ouro>)<ferro>");
  573. REPLACE(&item_id,"9"," ");
  574. REPLACE(&item_id,"<diamante>","");
  575. IF((armazenar_itens)||(vender_disco)||(vender_peixe));
  576. SET(#send_log,"299");
  577. DO;
  578. INC(#send_log,1);
  579. IF(%#send_log%=300);
  580. SET(#send_log,"");
  581. CLEARCHAT;
  582. LOG("&9&l[&f&oM&facro&9&l] &aQuanto tempo para verificar o inventário?");
  583. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &f10 segundos");
  584. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &f15 segundos (recomendado)");
  585. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &f30 segundos");
  586. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fEu escolho");
  587. LOG("");
  588. ENDIF;
  589. IF(KEY_1);
  590. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &f10 segundos");
  591. SET(#time_verificar,"10");
  592. DO;WHILE(KEY_1);
  593. BREAK;
  594. ELSEIF(KEY_2);
  595. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &f15 segundos (recomendado)");
  596. SET(#time_verificar,"15");
  597. DO;WHILE(KEY_2);
  598. BREAK;
  599. ELSEIF(KEY_3);
  600. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &f30 segundos");
  601. SET(#time_verificar,"30");
  602. DO;WHILE(KEY_3);
  603. BREAK;
  604. ELSEIF(KEY_4);
  605. LOG("");
  606. LOG("&9&l[&f&oM&facro&9&l] &aEscreva um número entre &25 &aa &2180&a.");
  607. LOG("");
  608. DO;WHILE(KEY_4);
  609. PROMPT(#time_verificar,$$?,"Escreva um número entre 5 a 180.");
  610. IF((%#time_verificar%<5)||(%#time_verificar%>180));
  611. LOG("&9&l[&f&oM&facro&9&l] &cNúmero inválido, alterado automaticamente para &215&c.");
  612. SET(#time_verificar,"15");
  613. ELSE;
  614. LOG("&9&l[&f&oM&facro&9&l] &aVerificar o inventário a cada &2%#time_verificar% &asegundos.");
  615. ENDIF;
  616. BREAK;
  617. ENDIF;
  618. LOOP;
  619. WAIT(12T);
  620. IF(armazenar_itens);
  621. UNSET(arm_peixe);
  622. SET(&cor_peixe,"8");
  623. UNSET(arm_diamante);
  624. SET(&cor_diamante,"8");
  625. UNSET(arm_ferro);
  626. SET(&cor_ferro,"8");
  627. UNSET(arm_ouro);
  628. SET(&cor_ouro,"8");
  629. UNSET(arm_blaze);
  630. SET(&cor_blaze,"8");
  631. UNSET(arm_lagrima);
  632. SET(&cor_lagrima,"8");
  633. UNSET(arm_disco);
  634. SET(&cor_disco,"8");
  635. UNSET(arm_lapis);
  636. SET(&cor_lapis,"8");
  637. SET(#send_log,"299");
  638. UNSET(k1);
  639. UNSET(k2);
  640. UNSET(k3);
  641. UNSET(k4);
  642. UNSET(k5);
  643. UNSET(k6);
  644. UNSET(k7);
  645. UNSET(k8);
  646. DO;
  647. INC(#send_log,1);
  648. IF(%#send_log%=300);
  649. SET(#send_log,"");
  650. CLEARCHAT;
  651. LOG("&9&l[&f&oM&facro&9&l] &aMarque o(s) item(ns) para armazenar (pressione os números):");
  652. IF(vender_peixe);
  653. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &%&cor_diamante%Minério de Diamante");
  654. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &%&cor_ouro%Minério de Ouro");
  655. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &%&cor_ferro%Minério de Ferro");
  656. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &%&cor_blaze%Vara Incandescente");
  657. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &%&cor_lagrima%Lágrima de Ghast");
  658. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &%&cor_lapis%Lápis Lazuli");
  659. IF(!vender_disco);
  660. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &%&cor_disco%Disco de Música");
  661. ENDIF;
  662. ELSE;
  663. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &%&cor_peixe%Peixe");
  664. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &%&cor_diamante%Minério de Diamante");
  665. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &%&cor_ouro%Minério de Ouro");
  666. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &%&cor_ferro%Minério de Ferro");
  667. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &%&cor_blaze%Vara Incandescente");
  668. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &%&cor_lagrima%Lágrima de Ghast");
  669. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &%&cor_lapis%Lápis Lazuli");
  670. IF(!vender_disco);
  671. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &%&cor_disco%Disco de Música");
  672. ENDIF;
  673. ENDIF;
  674. LOG("&9&l[&f&oM&facro&9&l] &aNão marque nenhum para descartar todos os itens acima.");
  675. LOG("&9&l[&f&oM&facro&9&l] &aPressione &2ENTER &apara confirmar.");
  676. LOG("");
  677. ENDIF;
  678. IF(k1);
  679. TOGGLE(arm_peixe);
  680. SET(#send_log,"299");
  681. IF(arm_peixe);
  682. SET(&cor_peixe,"e&l");
  683. INC(#itens_armazem,1);
  684. SET(&itens_armazem,"%&itens_armazem%^349$|");
  685. ELSE;
  686. SET(&cor_peixe,"8");
  687. DEC(#itens_armazem,1);
  688. REPLACE(&itens_armazem,"^349$|","");
  689. ENDIF;
  690. UNSET(k1);
  691. ELSEIF(k2);
  692. TOGGLE(arm_diamante);
  693. SET(#send_log,"299");
  694. IF(arm_diamante);
  695. SET(&cor_diamante,"e&l");
  696. INC(#itens_armazem,1);
  697. SET(&itens_armazem,"%&itens_armazem%^264$|");
  698. ELSE;
  699. SET(&cor_diamante,"8");
  700. DEC(#itens_armazem,1);
  701. REPLACE(&itens_armazem,"^264$|","");
  702. ENDIF;
  703. UNSET(k2);
  704. ELSEIF(k3);
  705. TOGGLE(arm_ouro);
  706. SET(#send_log,"299");
  707. IF(arm_ouro);
  708. SET(&cor_ouro,"e&l");
  709. INC(#itens_armazem,1);
  710. SET(&itens_armazem,"%&itens_armazem%^266$|");
  711. ELSE;
  712. SET(&cor_ouro,"8");
  713. DEC(#itens_armazem,1);
  714. REPLACE(&itens_armazem,"^266$|","");
  715. ENDIF;
  716. UNSET(k3);
  717. ELSEIF(k4);
  718. TOGGLE(arm_ferro);
  719. SET(#send_log,"299");
  720. IF(arm_ferro);
  721. SET(&cor_ferro,"e&l");
  722. INC(#itens_armazem,1);
  723. SET(&itens_armazem,"%&itens_armazem%^265$|");
  724. ELSE;
  725. SET(&cor_ferro,"8");
  726. DEC(#itens_armazem,1);
  727. REPLACE(&itens_armazem,"^265$|","");
  728. ENDIF;
  729. UNSET(k4);
  730. ELSEIF(k5);
  731. TOGGLE(arm_blaze);
  732. SET(#send_log,"299");
  733. IF(arm_blaze);
  734. SET(&cor_blaze,"e&l");
  735. INC(#itens_armazem,1);
  736. SET(&itens_armazem,"%&itens_armazem%^369$|");
  737. ELSE;
  738. SET(&cor_blaze,"8");
  739. DEC(#itens_armazem,1);
  740. REPLACE(&itens_armazem,"^369$|","");
  741. ENDIF;
  742. UNSET(k5);
  743. ELSEIF(k6);
  744. TOGGLE(arm_lagrima);
  745. SET(#send_log,"299");
  746. IF(arm_lagrima);
  747. SET(&cor_lagrima,"e&l");
  748. INC(#itens_armazem,1);
  749. SET(&itens_armazem,"%&itens_armazem%^370$|");
  750. ELSE;
  751. SET(&cor_lagrima,"8");
  752. DEC(#itens_armazem,1);
  753. REPLACE(&itens_armazem,"^370$|","");
  754. ENDIF;
  755. UNSET(k6);
  756. ELSEIF(k7);
  757. TOGGLE(arm_lapis);
  758. SET(#send_log,"299");
  759. IF(arm_lapis);
  760. SET(&cor_lapis,"e&l");
  761. INC(#itens_armazem,1);
  762. SET(&itens_armazem,"%&itens_armazem%^351$|");
  763. ELSE;
  764. SET(&cor_lapis,"8");
  765. DEC(#itens_armazem,1);
  766. REPLACE(&itens_armazem,"^351$|","");
  767. ENDIF;
  768. UNSET(k7);
  769. ELSEIF((k8)&&(!vender_disco));
  770. TOGGLE(arm_disco);
  771. SET(#send_log,"299");
  772. IF(arm_disco);
  773. SET(&cor_disco,"e&l");
  774. INC(#itens_armazem,1);
  775. SET(&itens_armazem,"%&itens_armazem%^2256$|^2257$|^2258$|^2259$|^2260$|^2261$|^2262$|^2263$|^2264$|^2265$|^2266$|^2267$|");
  776. ELSE;
  777. SET(&cor_disco,"8");
  778. DEC(#itens_armazem,1);
  779. REPLACE(&itens_armazem,"^2256$|^2257$|^2258$|^2259$|^2260$|^2261$|^2262$|^2263$|^2264$|^2265$|^2266$|^2267$|","");
  780. ENDIF;
  781. UNSET(k8);
  782. ENDIF;
  783. IF(KEY_1);
  784. IF(vender_peixe);
  785. SET(k2);
  786. ELSE;
  787. SET(k1);
  788. ENDIF;
  789. DO;WHILE(KEY_1);
  790. ELSEIF(KEY_2);
  791. IF(vender_peixe);
  792. SET(k3);
  793. ELSE;
  794. SET(k2);
  795. ENDIF;
  796. DO;WHILE(KEY_2);
  797. ELSEIF(KEY_3);
  798. IF(vender_peixe);
  799. SET(k4);
  800. ELSE;
  801. SET(k3);
  802. ENDIF;
  803. DO;WHILE(KEY_3);
  804. ELSEIF(KEY_4);
  805. IF(vender_peixe);
  806. SET(k5);
  807. ELSE;
  808. SET(k4);
  809. ENDIF;
  810. DO;WHILE(KEY_4);
  811. ELSEIF(KEY_5);
  812. IF(vender_peixe);
  813. SET(k6);
  814. ELSE;
  815. SET(k5);
  816. ENDIF;
  817. DO;WHILE(KEY_5);
  818. ELSEIF(KEY_6);
  819. IF(vender_peixe);
  820. SET(k7);
  821. ELSE;
  822. SET(k6);
  823. ENDIF;
  824. DO;WHILE(KEY_6);
  825. ELSEIF(KEY_7);
  826. IF(vender_peixe);
  827. SET(k8);
  828. ELSE;
  829. SET(k7);
  830. ENDIF;
  831. DO;WHILE(KEY_7);
  832. ELSEIF((KEY_8)&&(!vender_peixe)&&(!vender_disco));
  833. SET(k8);
  834. DO;WHILE(KEY_8);
  835. ENDIF;
  836. UNTIL(KEY_RETURN);
  837. LOG("&9&l[&f&oM&facro&9&l] &aInformações salvas, confirmação concluída.");
  838. IF(!arm_diamante);
  839. REPLACE(&ids_kit_vip,"^264$|","");
  840. ENDIF;
  841. IF((!vender_disco)&&(!arm_disco));
  842. REPLACE(&ids_kit_vip,"^2256$|","");
  843. REPLACE(&ids_kit_vip,"^2257$|","");
  844. REPLACE(&ids_kit_vip,"^2258$|","");
  845. ENDIF;
  846. DO;WHILE(KEY_RETURN);
  847. WAIT(12T);
  848. UNSET(arm_item_diamante);
  849. SET(&cor_item_diamante,"8");
  850. UNSET(arm_item_ferro);
  851. SET(&cor_item_ferro,"8");
  852. UNSET(arm_item_ouro);
  853. SET(&cor_item_ouro,"8");
  854. UNSET(arm_item_couro);
  855. SET(&cor_item_couro,"8");
  856. UNSET(arm_item_pedra);
  857. SET(&cor_item_pedra,"8");
  858. UNSET(arm_item_madeira);
  859. SET(&cor_item_madeira,"8");
  860. SET(#send_log,"299");
  861. DO;
  862. INC(#send_log,1);
  863. IF(%#send_log%=300);
  864. SET(#send_log,"");
  865. CLEARCHAT;
  866. LOG("&9&l[&f&oM&facro&9&l] &aMarque o(s) material(is) do(s) item(ns) para armazenar (pressione os números):");
  867. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &%&cor_item_diamante%Armazenar itens de Diamante");
  868. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &%&cor_item_ouro%Armazenar itens de Ouro");
  869. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &%&cor_item_ferro%Armazenar itens de Ferro");
  870. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &%&cor_item_couro%Armazenar itens de Couro");
  871. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &%&cor_item_pedra%Armazenar itens de Pedra");
  872. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &%&cor_item_madeira%Armazenar itens de Madeira");
  873. LOG("&9&l[&f&oM&facro&9&l] &aNão marque nenhum para descartar &a&oEspadas&a, &a&oFerramentas&a e &a&oArmaduras&a.");
  874. LOG("&9&l[&f&oM&facro&9&l] &aPressione &2ENTER &apara confirmar.");
  875. LOG("");
  876. ENDIF;
  877. IF(KEY_1);
  878. TOGGLE(arm_item_diamante);
  879. SET(#send_log,"299");
  880. IF(arm_item_diamante);
  881. SET(&cor_item_diamante,"e&l");
  882. SET(&itens_armazem,"%&itens_armazem%^310$|^311$|^312$|^313$|^276$|^278$|^293$|");
  883. ELSE;
  884. SET(&cor_item_diamante,"8");
  885. REPLACE(&itens_armazem,"^310$|^311$|^312$|^313$|^276$|^278$|^293$|","");
  886. ENDIF;
  887. DO;WHILE(KEY_1);
  888. ELSEIF(KEY_2);
  889. TOGGLE(arm_item_ouro);
  890. SET(#send_log,"299");
  891. IF(arm_item_ouro);
  892. SET(&cor_item_ouro,"e&l");
  893. SET(&itens_armazem,"%&itens_armazem%^314$|^315$|^316$|^317$|^283$|^285$|^284$|^286$|^294$|");
  894. ELSE;
  895. SET(&cor_item_ouro,"8");
  896. REPLACE(&itens_armazem,"^314$|^315$|^316$|^317$|^283$|^285$|^284$|^286$|^294$|","");
  897. ENDIF;
  898. DO;WHILE(KEY_2);
  899. ELSEIF(KEY_3);
  900. TOGGLE(arm_item_ferro);
  901. SET(#send_log,"299");
  902. IF(arm_item_ferro);
  903. SET(&cor_item_ferro,"e&l");
  904. SET(&itens_armazem,"%&itens_armazem%^306$|^307$|^308$|^309$|^267$|^257$|^256$|^258$|^292$|");
  905. ELSE;
  906. SET(&cor_item_ferro,"8");
  907. REPLACE(&itens_armazem,"^306$|^307$|^308$|^309$|^267$|^257$|^256$|^258$|^292$|","");
  908. ENDIF;
  909. DO;WHILE(KEY_3);
  910. ELSEIF(KEY_4);
  911. TOGGLE(arm_item_couro);
  912. SET(#send_log,"299");
  913. IF(arm_item_couro);
  914. SET(&cor_item_couro,"e&l");
  915. SET(&itens_armazem,"%&itens_armazem%^298$|^299$|^300$|^301$|");
  916. ELSE;
  917. SET(&cor_item_couro,"8");
  918. REPLACE(&itens_armazem,"^298$|^299$|^300$|^301$|","");
  919. ENDIF;
  920. DO;WHILE(KEY_4);
  921. ELSEIF(KEY_5);
  922. TOGGLE(arm_item_pedra);
  923. SET(#send_log,"299");
  924. IF(arm_item_pedra);
  925. SET(&cor_item_pedra,"e&l");
  926. SET(&itens_armazem,"%&itens_armazem%^272$|^274$|^273$|^275$|^291$|");
  927. ELSE;
  928. SET(&cor_item_pedra,"8");
  929. REPLACE(&itens_armazem,"^272$|^274$|^273$|^275$|^291$|","");
  930. ENDIF;
  931. DO;WHILE(KEY_5);
  932. ELSEIF(KEY_6);
  933. TOGGLE(arm_item_madeira);
  934. SET(#send_log,"299");
  935. IF(arm_item_madeira);
  936. SET(&cor_item_madeira,"e&l");
  937. SET(&itens_armazem,"%&itens_armazem%^268$|^270$|^269$|^271$|^290$|");
  938. ELSE;
  939. SET(&cor_item_madeira,"8");
  940. REPLACE(&itens_armazem,"^268$|^270$|^269$|^271$|^290$|","");
  941. ENDIF;
  942. DO;WHILE(KEY_6);
  943. ENDIF;
  944. UNTIL(KEY_RETURN);
  945. LOG("&9&l[&f&oM&facro&9&l] &aInformações salvas, confirmação concluída.");
  946. IF(!arm_item_diamante);
  947. REPLACE(&ids_kit_vip,"^276$|","");
  948.  
  949. ENDIF;
  950. IF((arm_item_diamante)&&(!arm_item_ouro)&&(!arm_item_ferro)&&(!arm_item_couro)&&(!arm_item_pedra)&&(!arm_item_madeira));
  951. SET(apenas_diamante);
  952. ENDIF;
  953. WAIT(12T);
  954. IF((arm_item_diamante)||(arm_item_ouro)||(arm_item_ferro)||(arm_item_couro)||(arm_item_pedra)||(arm_item_madeira));
  955. INC(#itens_armazem,3);
  956. IF((!arm_item_diamante)&&(!arm_item_ouro)&&(!arm_item_ferro)&&(!arm_item_couro)&&(arm_item_pedra)||(arm_item_madeira));
  957. DEC(#itens_armazem,1);
  958. ELSE;
  959. SET(#send_log,"299");
  960. DO;
  961. INC(#send_log,1);
  962. IF(%#send_log%=300);
  963. SET(#send_log,"");
  964. CLEARCHAT;
  965. LOG("&9&l[&f&oM&facro&9&l] &aArmazenar armaduras se tiver qual encantamento?");
  966. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fProteção 4");
  967. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fProteção 4/3");
  968. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fProteção 4 sem espinhos");
  969. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fProteção 4/3 sem espinhos");
  970. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fProteção 4 com inquebrável 3");
  971. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fProteção 4/3 com inquebrável 3");
  972. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fProteção 4 com inquebrável 3 sem espinhos");
  973. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fProteção 4/3 com inquebrável 3 sem espinhos");
  974. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fProteção 4 com inquebrável 1/2/3 sem espinhos");
  975. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &fProteção 4 com inquebrável 2/3 sem espinhos");
  976. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2-&f&l] &fArmazenar tudo");
  977. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2+&f&l] &cNão armazenar");
  978. LOG("");
  979. ENDIF;
  980. IF(KEY_1);
  981. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fProteção 4");
  982. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  983. DO;WHILE(KEY_1);
  984. BREAK;
  985. ELSEIF(KEY_2);
  986. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fProteção 4/3");
  987. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$|^(Protection|Proteção) III$");
  988. DO;WHILE(KEY_2);
  989. BREAK;
  990. ELSEIF(KEY_3);
  991. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fProteção 4 sem espinhos");
  992. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  993. SET(arm_thorns_trash);
  994. DO;WHILE(KEY_3);
  995. BREAK;
  996. ELSEIF(KEY_4);
  997. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fProteção 4/3 sem espinhos");
  998. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$|^(Protection|Proteção) III$");
  999. SET(arm_thorns_trash);
  1000. DO;WHILE(KEY_4);
  1001. BREAK;
  1002. ELSEIF(KEY_5);
  1003. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fProteção 4 com inquebrável 3");
  1004. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  1005. SET(arm_unbreaking_up);
  1006. DO;WHILE(KEY_5);
  1007. BREAK;
  1008. ELSEIF(KEY_6);
  1009. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fProteção 4/3 com inquebrável 3");
  1010. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$|^(Protection|Proteção) III$");
  1011. SET(arm_unbreaking_up);
  1012. DO;WHILE(KEY_6);
  1013. BREAK;
  1014. ELSEIF(KEY_7);
  1015. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fProteção 4 com inquebrável 3 sem espinhos");
  1016. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  1017. SET(arm_thorns_trash);
  1018. SET(arm_unbreaking_up);
  1019. DO;WHILE(KEY_7);
  1020. BREAK;
  1021. ELSEIF(KEY_8);
  1022. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fProteção 4/3 com inquebrável 3 sem espinhos");
  1023. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$|^(Protection|Proteção) III$");
  1024. SET(arm_thorns_trash);
  1025. SET(arm_unbreaking_up);
  1026. DO;WHILE(KEY_8);
  1027. BREAK;
  1028. ELSEIF(KEY_9);
  1029. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fProteção 4 com inquebrável 1/2/3 sem espinhos");
  1030. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  1031. SET(arm_thorns_trash);
  1032. SET(arm_unbreaking_up_all);
  1033. DO;WHILE(KEY_9);
  1034. BREAK;
  1035. ELSEIF(KEY_0);
  1036. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &fProteção 4 com inquebrável 2/3 sem espinhos");
  1037. SET(&enchant_yes_arm,"^(Protection|Proteção) IV$");
  1038. SET(arm_thorns_trash);
  1039. SET(arm_unbreaking_up_qall);
  1040. DO;WHILE(KEY_0);
  1041. BREAK;
  1042. ELSEIF((KEY_MINUS)||(KEY_SUBTRACT));
  1043. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2-&f&l] &fArmazenar tudo");
  1044. SET(&enchant_yes_arm,"TUDO");
  1045. DO;UNTIL((!KEY_MINUS)&&(!KEY_SUBTRACT));
  1046. BREAK;
  1047. ELSEIF((KEY_EQUALS)||(KEY_ADD));
  1048. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2+&f&l] &cNão armazenar");
  1049. DEC(#itens_armazem,1);
  1050. FOR(#clean_arms,298,317);
  1051. REPLACE(&itens_armazem,"^%#clean_arms%$|","");
  1052. NEXT;
  1053. DO;UNTIL((!KEY_EQUALS)&&(!KEY_ADD));
  1054. BREAK;
  1055. ENDIF;
  1056. LOOP;
  1057. WAIT(12T);
  1058. ENDIF;
  1059. SET(#send_log,"299");
  1060. DO;
  1061. INC(#send_log,1);
  1062. IF(%#send_log%=300);
  1063. SET(#send_log,"");
  1064. CLEARCHAT;
  1065. LOG("&9&l[&f&oM&facro&9&l] &aArmazenar espadas se tiver qual encantamento?");
  1066. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fAfiada 5");
  1067. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fAfiada 5 sem repulsão");
  1068. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fAfiada 5 com fogo 2");
  1069. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fAfiada 5 com fogo 2 sem repulsão");
  1070. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fAfiada 5 com fogo 1/2");
  1071. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fAfiada 5/4 com fogo 2");
  1072. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fAfiada 5/4 com fogo 1/2");
  1073. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fAfiada 5/4/3");
  1074. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fJulgamento 5/4 ou Pilhagem 3 ou Afiada 5/4");
  1075. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &fJulgamento 5 com Pilhagem 3");
  1076. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2-&f&l] &fArmazenar tudo");
  1077. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2+&f&l] &cNão armazenar");
  1078. LOG("");
  1079. ENDIF;
  1080. IF(KEY_1);
  1081. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fAfiada 5");
  1082. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$");
  1083. DO;WHILE(KEY_1);
  1084. BREAK;
  1085. ELSEIF(KEY_2);
  1086. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fAfiada 5 sem repulsão");
  1087. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$");
  1088. SET(esp_knockback_trash);
  1089. DO;WHILE(KEY_2);
  1090. BREAK;
  1091. ELSEIF(KEY_3);
  1092. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fAfiada 5 com fogo 2");
  1093. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$");
  1094. SET(esp_fire_2_up);
  1095. DO;WHILE(KEY_3);
  1096. BREAK;
  1097. ELSEIF(KEY_4);
  1098. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fAfiada 5 com fogo 2 sem repulsão");
  1099. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$");
  1100. SET(esp_knockback_trash);
  1101. SET(esp_fire_2_up);
  1102. DO;WHILE(KEY_4);
  1103. BREAK;
  1104. ELSEIF(KEY_5);
  1105. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fAfiada 5 com fogo 1/2");
  1106. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$");
  1107. SET(esp_fire_1_up);
  1108. SET(esp_fire_2_up);
  1109. DO;WHILE(KEY_5);
  1110. BREAK;
  1111. ELSEIF(KEY_6);
  1112. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fAfiada 5/4 com fogo 2");
  1113. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$|^(Sharpness|Afiada) IV$");
  1114. SET(esp_fire_2_up);
  1115. DO;WHILE(KEY_6);
  1116. BREAK;
  1117. ELSEIF(KEY_7);
  1118. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fAfiada 5/4 com fogo 1/2");
  1119. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$|^(Sharpness|Afiada) IV$");
  1120. SET(esp_fire_1_up);
  1121. SET(esp_fire_2_up);
  1122. DO;WHILE(KEY_7);
  1123. BREAK;
  1124. ELSEIF(KEY_8);
  1125. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fAfiada 5/4/3");
  1126. SET(&enchant_yes_esp,"^(Sharpness|Afiada) V$|^(Sharpness|Afiada) IV|^(Sharpness|Afiada) III$");
  1127. DO;WHILE(KEY_8);
  1128. BREAK;
  1129. ELSEIF(KEY_9);
  1130. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fJulgamento 5/4 ou Pilhagem 3 ou Afiada 5/4");
  1131. SET(&enchant_yes_esp,"^(Smite|Julgamento) V$|^(Smite|Julgamento) IV$|^(Looting|Pilhagem) III$|^(Sharpness|Afiada) V$|^(Sharpness|Afiada) IV$");
  1132. DO;WHILE(KEY_9);
  1133. BREAK;
  1134. ELSEIF(KEY_0);
  1135. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &fJulgamento 5 com Pilhagem 3");
  1136. SET(&enchant_yes_esp,"^(Smite|Julgamento) V$");
  1137. SET(esp_looting_up);
  1138. DO;WHILE(KEY_0);
  1139. BREAK;
  1140. ELSEIF((KEY_MINUS)||(KEY_SUBTRACT));
  1141. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2-&f&l] &fArmazenar tudo");
  1142. SET(&enchant_yes_esp,"TUDO");
  1143. DO;UNTIL((!KEY_MINUS)&&(!KEY_SUBTRACT));
  1144. BREAK;
  1145. ELSEIF((KEY_EQUALS)||(KEY_ADD));
  1146. LOG("&9&l[&f&oM&facro&9&l] &f&l[&2+&f&l] &cNão armazenar");
  1147. REPLACE(&ids_kit_vip,"^276$|","");
  1148. DEC(#itens_armazem,1);
  1149. REPLACE(&itens_armazem,"^267$|","");
  1150. REPLACE(&itens_armazem,"^268$|","");
  1151. REPLACE(&itens_armazem,"^272$|","");
  1152. REPLACE(&itens_armazem,"^276$|","");
  1153. REPLACE(&itens_armazem,"^283$|","");
  1154. DO;UNTIL((!KEY_EQUALS)&&(!KEY_ADD));
  1155. BREAK;
  1156. ENDIF;
  1157. LOOP;
  1158. WAIT(12T);
  1159. SET(#send_log,"299");
  1160. DO;
  1161. INC(#send_log,1);
  1162. IF(%#send_log%=300);
  1163. SET(#send_log,"");
  1164. CLEARCHAT;
  1165. LOG("&9&l[&f&oM&facro&9&l] &aArmazenar ferramentas se tiver qual encantamento?");
  1166. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fEficiência 5");
  1167. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fEficiência 5/4");
  1168. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fEficiência 5/4/3");
  1169. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fEficiência 5 com inquebrável 3");
  1170. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fEficiência 5/4 com inquebrável 3");
  1171. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fEficiência 5/4/3 com inquebrável 3");
  1172. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fAfiada 5 &f&o(apenas machados serão armazenados)");
  1173. IF(apenas_diamante);
  1174. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fArmazenar tudo que tenha durabilidade baixa &f&o(561)");
  1175. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fArmazenar tudo");
  1176. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &cNão armazenar");
  1177. ELSE;
  1178. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fArmazenar tudo");
  1179. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &cNão armazenar");
  1180. ENDIF;
  1181. LOG("");
  1182. ENDIF;
  1183. IF(KEY_1);
  1184. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fEficiência 5");
  1185. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$");
  1186. REPLACE(&itens_armazem,"^290$|","");
  1187. REPLACE(&itens_armazem,"^291$|","");
  1188. REPLACE(&itens_armazem,"^292$|","");
  1189. REPLACE(&itens_armazem,"^293$|","");
  1190. REPLACE(&itens_armazem,"^294$|","");
  1191. DO;WHILE(KEY_1);
  1192. BREAK;
  1193. ELSEIF(KEY_2);
  1194. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &fEficiência 5/4");
  1195. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$|^(Efficiency|Eficiência) IV$");
  1196. REPLACE(&itens_armazem,"^290$|","");
  1197. REPLACE(&itens_armazem,"^291$|","");
  1198. REPLACE(&itens_armazem,"^292$|","");
  1199. REPLACE(&itens_armazem,"^293$|","");
  1200. REPLACE(&itens_armazem,"^294$|","");
  1201. DO;WHILE(KEY_2);
  1202. BREAK;
  1203. ELSEIF(KEY_3);
  1204. LOG("&9&l[&f&oM&facro&9&l] &f&l[&23&f&l] &fEficiência 5/4/3");
  1205. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$|^(Efficiency|Eficiência) IV$|^(Efficiency|Eficiência) III$");
  1206. REPLACE(&itens_armazem,"^290$|","");
  1207. REPLACE(&itens_armazem,"^291$|","");
  1208. REPLACE(&itens_armazem,"^292$|","");
  1209. REPLACE(&itens_armazem,"^293$|","");
  1210. REPLACE(&itens_armazem,"^294$|","");
  1211. DO;WHILE(KEY_3);
  1212. BREAK;
  1213. ELSEIF(KEY_4);
  1214. LOG("&9&l[&f&oM&facro&9&l] &f&l[&24&f&l] &fEficiência 5 com inquebrável 3");
  1215. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$");
  1216. SET(fer_unbreaking_up);
  1217. REPLACE(&itens_armazem,"^290$|","");
  1218. REPLACE(&itens_armazem,"^291$|","");
  1219. REPLACE(&itens_armazem,"^292$|","");
  1220. REPLACE(&itens_armazem,"^293$|","");
  1221. REPLACE(&itens_armazem,"^294$|","");
  1222. DO;WHILE(KEY_4);
  1223. BREAK;
  1224. ELSEIF(KEY_5);
  1225. LOG("&9&l[&f&oM&facro&9&l] &f&l[&25&f&l] &fEficiência 5/4 com inquebrável 3");
  1226. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$|^(Efficiency|Eficiência) IV$");
  1227. SET(fer_unbreaking_up);
  1228. REPLACE(&itens_armazem,"^290$|","");
  1229. REPLACE(&itens_armazem,"^291$|","");
  1230. REPLACE(&itens_armazem,"^292$|","");
  1231. REPLACE(&itens_armazem,"^293$|","");
  1232. REPLACE(&itens_armazem,"^294$|","");
  1233. DO;WHILE(KEY_5);
  1234. BREAK;
  1235. ELSEIF(KEY_6);
  1236. LOG("&9&l[&f&oM&facro&9&l] &f&l[&26&f&l] &fEficiência 5/4/3 com inquebrável 3");
  1237. SET(&enchant_yes_fer,"^(Efficiency|Eficiência) V$|^(Efficiency|Eficiência) IV$|^(Efficiency|Eficiência) III$");
  1238. SET(fer_unbreaking_up);
  1239. REPLACE(&itens_armazem,"^290$|","");
  1240. REPLACE(&itens_armazem,"^291$|","");
  1241. REPLACE(&itens_armazem,"^292$|","");
  1242. REPLACE(&itens_armazem,"^293$|","");
  1243. REPLACE(&itens_armazem,"^294$|","");
  1244. DO;WHILE(KEY_6);
  1245. BREAK;
  1246. ELSEIF(KEY_7);
  1247. LOG("&9&l[&f&oM&facro&9&l] &f&l[&27&f&l] &fAfiada 5 &f&o(apenas machados serão armazenados)");
  1248. SET(&enchant_yes_fer,"^(Sharpness|Afiada) V$");
  1249.  
  1250. REPLACE(&itens_armazem,"^278$|","");
  1251.  
  1252. REPLACE(&itens_armazem,"^293$|","");
  1253. REPLACE(&itens_armazem,"^285$|","");
  1254. REPLACE(&itens_armazem,"^284$|","");
  1255. REPLACE(&itens_armazem,"^294$|","");
  1256. REPLACE(&itens_armazem,"^257$|","");
  1257. REPLACE(&itens_armazem,"^256$|","");
  1258. REPLACE(&itens_armazem,"^292$|","");
  1259. REPLACE(&itens_armazem,"^274$|","");
  1260. REPLACE(&itens_armazem,"^273$|","");
  1261. REPLACE(&itens_armazem,"^291$|","");
  1262. REPLACE(&itens_armazem,"^270$|","");
  1263. REPLACE(&itens_armazem,"^269$|","");
  1264. REPLACE(&itens_armazem,"^290$|","");
  1265. DO;WHILE(KEY_7);
  1266. BREAK;
  1267. ELSEIF(KEY_8);
  1268. IF(apenas_diamante);
  1269. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fArmazenar tudo que tenha durabilidade baixa &f&o(561)");
  1270. SET(fer_durability_down);
  1271. ELSE;
  1272. LOG("&9&l[&f&oM&facro&9&l] &f&l[&28&f&l] &fArmazenar tudo");
  1273. ENDIF;
  1274. SET(&enchant_yes_fer,"TUDO");
  1275. DO;WHILE(KEY_8);
  1276. BREAK;
  1277. ELSEIF(KEY_9);
  1278. IF(apenas_diamante);
  1279. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &fArmazenar tudo");
  1280. SET(&enchant_yes_fer,"TUDO");
  1281. ELSE;
  1282. LOG("&9&l[&f&oM&facro&9&l] &f&l[&29&f&l] &cNão armazenar");
  1283. SET(nao_armazenar);
  1284. ENDIF;
  1285. DO;WHILE(KEY_9);
  1286. BREAK;
  1287. ELSEIF((KEY_0)&&(apenas_diamante));
  1288. LOG("&9&l[&f&oM&facro&9&l] &f&l[&20&f&l] &cNão armazenar");
  1289. SET(nao_armazenar);
  1290. DO;WHILE(KEY_0);
  1291. BREAK;
  1292. ENDIF;
  1293. LOOP;
  1294. IF(nao_armazenar);
  1295. DEC(#itens_armazem,1);
  1296.  
  1297. REPLACE(&itens_armazem,"^278$|","");
  1298.  
  1299.  
  1300. REPLACE(&itens_armazem,"^293$|","");
  1301. REPLACE(&itens_armazem,"^285$|","");
  1302. REPLACE(&itens_armazem,"^284$|","");
  1303. REPLACE(&itens_armazem,"^286$|","");
  1304. REPLACE(&itens_armazem,"^294$|","");
  1305. REPLACE(&itens_armazem,"^257$|","");
  1306. REPLACE(&itens_armazem,"^256$|","");
  1307. REPLACE(&itens_armazem,"^258$|","");
  1308. REPLACE(&itens_armazem,"^292$|","");
  1309. REPLACE(&itens_armazem,"^274$|","");
  1310. REPLACE(&itens_armazem,"^273$|","");
  1311. REPLACE(&itens_armazem,"^275$|","");
  1312. REPLACE(&itens_armazem,"^291$|","");
  1313. REPLACE(&itens_armazem,"^270$|","");
  1314. REPLACE(&itens_armazem,"^269$|","");
  1315. REPLACE(&itens_armazem,"^271$|","");
  1316. REPLACE(&itens_armazem,"^290$|","");
  1317. ENDIF;
  1318. WAIT(12T);
  1319. ENDIF;
  1320. IF(%#itens_armazem%<1);
  1321. LOG("&9&l[&f&oM&facro&9&l] &cNenhum item foi selecionado, armazenamento desabilitado.");
  1322. IF((vender_disco)||(vender_peixe));
  1323. ELSE;
  1324. SET(#time_verificar,"1000000");
  1325. ENDIF;
  1326. UNSET(armazenar_itens);
  1327. WAIT(30T);
  1328. ELSE;
  1329. SET(&itens_armazem,"%&itens_armazem%^387$|");
  1330. ENDIF;
  1331. ENDIF;
  1332. ENDIF;
  1333. IF((armazenar_itens)&&(%#verificar_vip%<=80)&&(%&server_atual%!="Legacy"));
  1334. SET(#send_log,"299");
  1335. DO;
  1336. INC(#send_log,1);
  1337. IF(%#send_log%=300);
  1338. SET(#send_log,"");
  1339. CLEARCHAT;
  1340. LOG("&9&l[&f&oM&facro&9&l] &aDeseja armazenar o kit nbvip?");
  1341. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  1342. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  1343. LOG("");
  1344. ENDIF;
  1345. IF(KEY_1);
  1346. LOG("&9&l[&f&oM&facro&9&l] &f&l[&21&f&l] &fSim");
  1347. SET(&itens_armazem,"%&itens_armazem%%&ids_kit_vip%");
  1348. SET(kitnbvip);
  1349. DO;WHILE(KEY_1);
  1350. BREAK;
  1351. ELSEIF(KEY_2);
  1352. LOG("&9&l[&f&oM&facro&9&l] &f&l[&22&f&l] &cNão");
  1353. UNSET(kitnbvip);
  1354. DO;WHILE(KEY_2);
  1355. BREAK;
  1356. ENDIF;
  1357. LOOP;
  1358. WAIT(12T);
  1359. ENDIF;
  1360. IF(%#itens_armazem%>=1);
  1361. IF((%&enchant_yes_arm%="TUDO")&&(%&enchant_yes_esp%="TUDO")&&(%&enchant_yes_fer%="TUDO"));
  1362. SET(#pack_linha_min,"8");
  1363. ELSE;
  1364. SET(#pack_linha_min,"7");
  1365. ENDIF;
  1366. ELSE;
  1367. IF((vender_disco)||(vender_peixe));
  1368. SET(#pack_linha_min,"8");
  1369. ELSE;
  1370. SET(#pack_linha_min,"35");
  1371. ENDIF;
  1372. ENDIF;
  1373. SET(&itens_armazem,"%&itens_armazem%^IDFANTASMA$");
  1374. SET(&ids_armaduras,"^310$|^311$|^312$|^313$|^314$|^315$|^316$|^317$|^306$|^307$|^308$|^309$|^298$|^299$|^300$|^301$");
  1375. REPLACE(&item_id,"<ferro>","");
  1376. SET(&ids_espadas,"^267$|^268$|^272$|^276$|^283$");
  1377. SET(&ids_ferramentas,"^278$|^293$|^285$|^284$|^286$|^294$|^257$|^256$|^258$|^292$|^274$|^273$|^275$|^291$|^270$|^269$|^271$|^290$");
  1378. SET(#pack_linha_min_backup,"%#pack_linha_min%");
  1379. REPLACE(&item_id,"<ouro>","");
  1380. SET(&item_id,"/%&item_id%");
  1381. SET(#time_verificar_backup,"%#time_verificar%");
  1382. UNSET(config_register);
  1383. SET(config_backup_ds);
  1384. SET(&healt_down,"%&item_id%");
  1385. DO;
  1386. GUI();
  1387. UNSET(@sleepsethome);
  1388. LOOK(0,90);
  1389. WAIT(2T);
  1390. SET(#sleep_inc,"");
  1391. DO(2);
  1392. }$$/sethome sleeppesca$${
  1393. WAIT(20T);
  1394. LOOP;
  1395. DO;
  1396. INC(#sleep_inc,1);
  1397. LOOK(0,90);
  1398. UNTIL((@sleepsethome)||(%#sleep_inc%>=250));
  1399. WAIT(3T);
  1400. WHILE(!@sleepsethome);
  1401. REPLACE(&healt_down,"&a","&c");
  1402. REPLACE(&healt_down,"at","desat");
  1403. ENDIF;
  1404. IF(%HEALTH%<=8);
  1405. CLEARCHAT;
  1406. LOG("&9&l[&f&oM&facro&9&l] &cNão é possível iniciar com a vida muito baixa.");
  1407. LOG("&9&l[&f&oM&facro&9&l] &cRegenere primeiro e religue a macro.");
  1408. LOG("");
  1409. WAIT(10T);
  1410. LOG("&9&l[&f&oM&facro&9&l] &cSleep_Pesca &f&l[&4OFF&f&l]");
  1411. ACHIEVEMENTGET("[OFF] Pesca Upgrade 0.7","346");
  1412. UNSET(@afk_onchat);
  1413. TOGGLE(sleep_macro);
  1414. STOP;
  1415. ENDIF;
  1416. CLEARCHAT;
  1417. LOG("&9&l[&f&oM&facro&9&l] &aConfiguração:");
  1418. IF(%#verificar_vip%<=80);
  1419. LOG("&9&l[&f&oM&facro&9&l] &f&oVocê é um jogador VIP");
  1420. ELSE;
  1421. LOG("&9&l[&f&oM&facro&9&l] &f&oVocê não é um jogador VIP");
  1422. ENDIF;
  1423. IF(%#dur_vara_reparar%>1);
  1424. LOG("&9&l[&f&oM&facro&9&l] &f&oDurabilidade para reparar: &a%#dur_vara_reparar%");
  1425. ELSE;
  1426. LOG("&9&l[&f&oM&facro&9&l] &f&oDurabilidade para reparar: &cNão reparar");
  1427. ENDIF;
  1428. IF(vender_disco);
  1429. IF(%#vender_disco%=1);
  1430. LOG("&9&l[&f&oM&facro&9&l] &f&oVender discos: &aSim &f&ona /warp vip");
  1431. ELSE;
  1432. LOG("&9&l[&f&oM&facro&9&l] &f&oVender discos: &aSim &f&ona /warp loja");
  1433. ENDIF;
  1434. IF((!armazenar_itens)&&(!vender_peixe));
  1435. LOG("&9&l[&f&oM&facro&9&l] &f&oTempo para verificar o inventário: &a%#time_verificar% &f&osegundos");
  1436. ENDIF;
  1437. ELSE;
  1438. LOG("&9&l[&f&oM&facro&9&l] &f&oVender discos: &cNão");
  1439. ENDIF;
  1440. IF(vender_peixe);
  1441. IF(%#vender_peixe%=1);
  1442. LOG("&9&l[&f&oM&facro&9&l] &f&oVender peixes: &aSim &f&ona /warp vip");
  1443. ELSE;
  1444. LOG("&9&l[&f&oM&facro&9&l] &f&oVender peixes: &aSim &f&ona /warp loja");
  1445. ENDIF;
  1446. IF(!armazenar_itens);
  1447. LOG("&9&l[&f&oM&facro&9&l] &f&oTempo para verificar o inventário: &a%#time_verificar% &f&osegundos");
  1448. ENDIF;
  1449. ELSE;
  1450. LOG("&9&l[&f&oM&facro&9&l] &f&oVender peixes: &cNão");
  1451. ENDIF;
  1452. IF(armazenar_itens);
  1453. LOG("&9&l[&f&oM&facro&9&l] &f&oArmazenar itens: &aSim");
  1454. LOG("&9&l[&f&oM&facro&9&l] &f&oTempo para verificar o inventário: &a%#time_verificar% &f&osegundos");
  1455. IF(%#verificar_vip%<=80);
  1456. IF(kitnbvip);
  1457. LOG("&9&l[&f&oM&facro&9&l] &f&oArmazenar kit nbvip: &aSim");
  1458. ELSE;
  1459. LOG("&9&l[&f&oM&facro&9&l] &f&oArmazenar kit nbvip: &cNão");
  1460. ENDIF;
  1461. ENDIF;
  1462. ELSE;
  1463. LOG("&9&l[&f&oM&facro&9&l] &f&oArmazenar itens: &cNão");
  1464. ENDIF;
  1465. IF((!armazenar_itens)&&(!vender_disco)&&(!vender_peixe));
  1466. LOG("");
  1467. ENDIF;
  1468. IF(armazenar_itens);
  1469. LOG("");
  1470. LOG("&9&l[&f&oM&facro&9&l] &aTrap de baús:");
  1471. IF(%#chest_total_inc%<80);
  1472. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &a%#chest_total_inc%&fº");
  1473. ELSEIF(%#chest_total_inc%=80);
  1474. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &4%#chest_total_inc%&cº &f&o(último baú)");
  1475. ELSE;
  1476. LOG("&9&l[&f&oM&facro&9&l] &f&oBaú de armazenamento atual: &480&cº &f&o(não é mais possível armazenar)");
  1477. ENDIF;
  1478. SET(#total_itens_arm,"");
  1479. INC(#total_itens_arm,%#livros_tesouro%);
  1480. INC(#total_itens_arm,%#armadura_inc%);
  1481. INC(#total_itens_arm,%#espada_inc%);
  1482. INC(#total_itens_arm,%#ferramenta_inc%);
  1483. INC(#total_itens_arm,%#diamante_inc%);
  1484. INC(#total_itens_arm,%#ouro_inc%);
  1485. INC(#total_itens_arm,%#ferro_inc%);
  1486. INC(#total_itens_arm,%#lagrima_inc%);
  1487. INC(#total_itens_arm,%#blaze_inc%);
  1488. INC(#total_itens_arm,%#peixe_inc%);
  1489. INC(#total_itens_arm,%#disco_inc%);
  1490. INC(#total_itens_arm,%#lapis_inc%);
  1491. IF(%#total_itens_arm%>=1);
  1492. LOG("");
  1493. IF(%#total_itens_arm%=1);
  1494. LOG("&9&l[&f&oM&facro&9&l] &aItem armazenado:");
  1495. ELSEIF(%#total_itens_arm%>1);
  1496. LOG("&9&l[&f&oM&facro&9&l] &aItens armazenados:");
  1497. ENDIF;
  1498. IF(%#livros_tesouro%=1);
  1499. LOG("&9&l[&f&oM&facro&9&l] &f&oTesouro: &a1");
  1500. ELSEIF(%#livros_tesouro%>1);
  1501. LOG("&9&l[&f&oM&facro&9&l] &f&oTesouros: &a%#livros_tesouro%");
  1502. ENDIF;
  1503. IF(%#armadura_inc%=1);
  1504. LOG("&9&l[&f&oM&facro&9&l] &f&oParte de armadura: &a1");
  1505. ELSEIF(%#armadura_inc%>1);
  1506. LOG("&9&l[&f&oM&facro&9&l] &f&oPartes de armaduras: &a%#armadura_inc%");
  1507. ENDIF;
  1508. IF(%#espada_inc%=1);
  1509. LOG("&9&l[&f&oM&facro&9&l] &f&oEspada: &a1");
  1510. ELSEIF(%#espada_inc%>1);
  1511. LOG("&9&l[&f&oM&facro&9&l] &f&oEspadas: &a%#espada_inc%");
  1512. ENDIF;
  1513. IF(%#ferramenta_inc%=1);
  1514. LOG("&9&l[&f&oM&facro&9&l] &f&oFerramenta: &a1");
  1515. ELSEIF(%#ferramenta_inc%>1);
  1516. LOG("&9&l[&f&oM&facro&9&l] &f&oFerramentas: &a%#ferramenta_inc%");
  1517. ENDIF;
  1518. IF(%#diamante_inc%=1);
  1519. LOG("&9&l[&f&oM&facro&9&l] &f&oDiamante: &a1");
  1520. ELSEIF(%#diamante_inc%>1);
  1521. LOG("&9&l[&f&oM&facro&9&l] &f&oDiamantes: &a%#diamante_inc%");
  1522. ENDIF;
  1523. IF(%#ouro_inc%=1);
  1524. LOG("&9&l[&f&oM&facro&9&l] &f&oOuro: &a1");
  1525. ELSEIF(%#ouro_inc%>1);
  1526. LOG("&9&l[&f&oM&facro&9&l] &f&oOuros: &a%#ouro_inc%");
  1527. ENDIF;
  1528. IF(%#ferro_inc%=1);
  1529. LOG("&9&l[&f&oM&facro&9&l] &f&oFerro: &a1");
  1530. ELSEIF(%#ferro_inc%>1);
  1531. LOG("&9&l[&f&oM&facro&9&l] &f&oFerros: &a%#ferro_inc%");
  1532. ENDIF;
  1533. IF(%#lagrima_inc%=1);
  1534. LOG("&9&l[&f&oM&facro&9&l] &f&oLágrima de Ghast: &a1");
  1535. ELSEIF(%#lagrima_inc%>1);
  1536. LOG("&9&l[&f&oM&facro&9&l] &f&oLágrimas de Ghast: &a%#lagrima_inc%");
  1537. ENDIF;
  1538. IF(%#blaze_inc%=1);
  1539. LOG("&9&l[&f&oM&facro&9&l] &f&oVara incandescente: &a1");
  1540. ELSEIF(%#blaze_inc%>1);
  1541. LOG("&9&l[&f&oM&facro&9&l] &f&oVaras incandescentes: &a%#blaze_inc%");
  1542. ENDIF;
  1543. IF(%#peixe_inc%=1);
  1544. LOG("&9&l[&f&oM&facro&9&l] &f&oPeixe: &a1");
  1545. ELSEIF(%#peixe_inc%>1);
  1546. LOG("&9&l[&f&oM&facro&9&l] &f&oPeixes: &a%#peixe_inc%");
  1547. ENDIF;
  1548. IF(%#disco_inc%=1);
  1549. LOG("&9&l[&f&oM&facro&9&l] &f&oDisco: &a1");
  1550. ELSEIF(%#disco_inc%>1);
  1551. LOG("&9&l[&f&oM&facro&9&l] &f&oDiscos: &a%#disco_inc%");
  1552. ENDIF;
  1553. IF(%#lapis_inc%>=1);
  1554. LOG("&9&l[&f&oM&facro&9&l] &f&oLápis-Lazúli: &a%#lapis_inc%");
  1555. ENDIF;
  1556. ENDIF;
  1557. LOG("");
  1558. ENDIF;
  1559. IF(vender_disco);
  1560. IF(!armazenar_itens);
  1561. LOG("");
  1562. ENDIF;
  1563. LOG("&9&l[&f&oM&facro&9&l] &aVenda de discos:");
  1564. IF(%#discos_vendidos%>=1);
  1565. IF(%#vender_disco%=1);
  1566. #lucro_discos = %#discos_vendidos% * 110;
  1567. ELSE;
  1568. #lucro_discos = %#discos_vendidos% * 100;
  1569. ENDIF;
  1570. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &a%#discos_vendidos% &7- &f&oLucro total: &a%#lucro_discos% &f&ocoins");
  1571. ELSE;
  1572. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &cNenhum &7- &f&oLucro total: &cSem lucro");
  1573. ENDIF;
  1574. LOG("");
  1575. ENDIF;
  1576. IF(vender_peixe);
  1577. IF((!armazenar_itens)&&(!vender_disco));
  1578. LOG("");
  1579. ENDIF;
  1580. LOG("&9&l[&f&oM&facro&9&l] &aVenda de peixes:");
  1581. IF(%#peixes_vendidos%>=1);
  1582. IF(%#vender_peixe%=1);
  1583. #lucro_peixes = %#peixes_vendidos% * 704;
  1584. ELSE;
  1585. #lucro_peixes = %#peixes_vendidos% * 576;
  1586. ENDIF;
  1587. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos (em packs): &a%#peixes_vendidos% &7- &f&oLucro total: &a%#lucro_peixes% &f&ocoins");
  1588. ELSE;
  1589. LOG("&9&l[&f&oM&facro&9&l] &f&oVendidos: &cNenhum &7- &f&oLucro total: &cSem lucro");
  1590. ENDIF;
  1591. LOG("");
  1592. ENDIF;
  1593. IF(%#dur_vara_reparar%>1);
  1594. SET(sleep_ver_linha);
  1595. ELSE;
  1596. UNSET(sleep_ver_linha);
  1597. ENDIF;
  1598. IF(%#time_verificar%>=1000000);
  1599. UNSET(sleep_clean_inventory);
  1600. UNSET(sleep_ver_all);
  1601. ELSE;
  1602. SET(sleep_clean_inventory);
  1603. SET(sleep_ver_all);
  1604. ENDIF;
  1605. IF(%#delay_pescar%>350);
  1606. SET(#delay_pescar,"350");
  1607. ELSEIF(%#delay_pescar%<1);
  1608. SET(#delay_pescar,"1");
  1609. ENDIF;
  1610. IF(%#delay_dropar%>350);
  1611. SET(#delay_dropar,"350");
  1612. ELSEIF(%#delay_dropar%<1);
  1613. SET(#delay_dropar,"1");
  1614. ENDIF;
  1615. IF(%#delay_pescar%>300);
  1616. SET(#dec_delay,"13");
  1617. ELSEIF(%#delay_pescar%>250);
  1618. SET(#dec_delay,"11");
  1619. ELSEIF(%#delay_pescar%>200);
  1620. SET(#dec_delay,"9");
  1621. ELSEIF(%#delay_pescar%>150);
  1622. SET(#dec_delay,"7");
  1623. ELSEIF(%#delay_pescar%>100);
  1624. SET(#dec_delay,"5");
  1625. ELSEIF(%#delay_pescar%>50);
  1626. SET(#dec_delay,"3");
  1627. ELSEIF(%#delay_pescar%>20);
  1628. SET(#dec_delay,"2");
  1629. ELSEIF(%#delay_pescar%>1);
  1630. SET(#dec_delay,"1");
  1631. ENDIF;
  1632. SET(sleep_ver_vara);
  1633. SET(#itens_min_armazem,"1");
  1634. SET(#peixes_min_venda,"1");
  1635. SET(#send_pvp_off,"4");
  1636. SET(#send_kit_vip,"4");
  1637. SET(item_id);
  1638. UNSET(pesqueiro);
  1639. UNSET(reabastecer_vara);
  1640. UNSET(reabastecer_linha);
  1641. UNSET(unbug);
  1642. UNSET(home_break);
  1643. UNSET(venda_cancel);
  1644. UNSET(venda_2_cancel);
  1645. UNSET(comprar_linha);
  1646. TIME(#hora_atual,hh);
  1647. IF(%#hora_atual%!=%#hora_save%);
  1648. SET(sleep_send);
  1649. SET(#hora_save,"%#hora_atual%");
  1650. ELSE;
  1651. UNSET(sleep_send);
  1652. ENDIF;
  1653. IF(%#sleep_msg_send%=0);
  1654. SET(sleep_send);
  1655. SET(#sleep_msg_send,"1");
  1656. SET(#hora_save,"%#hora_atual%");
  1657. ENDIF;
  1658. DO;
  1659. INC(#send_pvp_off,1);
  1660. INC(#send_kit_vip,1);
  1661. IF((%XPOS%=%#xpos_pesqueiro%)&&(%YPOS%=%#ypos_pesqueiro%)&&(%ZPOS%=%#zpos_pesqueiro%));
  1662. IF((sleep_ver_all)&&(!sleep_clean_inventory));
  1663. SET(#sleep_homes,"");
  1664. ELSEIF(home_break);
  1665. SET(#sleep_homes,"");
  1666. UNSET(home_break);
  1667. ELSE;
  1668. SET(#sleep_homes,"1");
  1669. SET(unbug_vara);
  1670. ENDIF;
  1671. ELSE;
  1672. SET(#sleep_homes,"2");
  1673. SET(unbug_vara);
  1674. ENDIF;
  1675. DO(%#sleep_homes%);
  1676. DO;
  1677. GUI();
  1678. UNSET(@sleepteleport);
  1679. WAIT(2T);
  1680. SET(#sleep_inc,"");
  1681. }$$/home sleeppesca$${
  1682. DO;
  1683. INC(#sleep_inc,1);
  1684. IF(%HEALTH%<=8);
  1685. GUI();
  1686. LOOK(NORTH);
  1687. LOOK(-46,+30);
  1688. PRESS(F2);
  1689. WAIT(7T);
  1690. LOOK(NORTH);
  1691. LOOK(+135,+30);
  1692. PRESS(F2);
  1693. WAIT(7T);
  1694. SET(pesqueiro_invadido);
  1695. DISCONNECT;
  1696. ENDIF;
  1697. UNTIL((@sleepteleport)||(%#sleep_inc%>=250));
  1698. WAIT(2T);
  1699. WHILE(!@sleepteleport);
  1700. LOOP;
  1701. IF(!pesqueiro);
  1702. LOG("");
  1703. LOG("&9&l[&f&oM&facro&9&l] &aVerificando seu pesqueiro...");
  1704. LOG("");
  1705. UNSET(send_error);
  1706. GETIDREL(0,-1,0,#bloco_1);
  1707. GETIDREL(0,-2,-1,#bau_2);
  1708. GETIDREL(0,-2,1,#bau_3);
  1709. GETIDREL(1,-2,0,#bau_4);
  1710. GETIDREL(-1,-2,0,#bau_5);
  1711. GETIDREL(0,-2,-3,#bau_6);
  1712. GETIDREL(0,1,-3,#bau_7);
  1713. GETIDREL(0,2,-3,#air_8);
  1714. GETIDREL(-3,-2,0,#bau_9);
  1715. GETIDREL(-3,1,0,#bau_10);
  1716. GETIDREL(-3,2,0,#air_11);
  1717. GETIDREL(3,-2,0,#bau_12);
  1718. GETIDREL(3,1,0,#bau_13);
  1719. GETIDREL(3,2,0,#air_14);
  1720. GETIDREL(0,-2,3,#bau_15);
  1721. GETIDREL(0,1,3,#bau_16);
  1722. GETIDREL(0,2,3,#air_17);
  1723. GETIDREL(-2,-2,-2,#air_18);
  1724. GETIDREL(2,1,2,#air_19);
  1725. GETIDREL(-1,-2,-1,#baur_1);
  1726. GETIDREL(1,-2,-1,#baur_2);
  1727. GETIDREL(-1,-2,1,#baur_3);
  1728. GETIDREL(1,-2,1,#baur_4);
  1729. GETIDREL(0,-2,-2,#air_24);
  1730. GETIDREL(0,-2,2,#air_25);
  1731. GETIDREL(-2,-2,0,#air_26);
  1732. GETIDREL(2,-2,0,#air_27);
  1733. SET(&pesqueiro,"<%#bloco_1%-%#bau_2%-%#bau_3%-%#bau_4%-%#bau_5%-%#bau_6%-%#bau_7%-%#bau_9%-%#bau_10%-%#bau_12%-%#bau_13%-%#bau_15%-%#bau_16%-%#baur_1%-%#baur_2%-%#baur_3%-%#baur_4%-");
  1734. SET(&pesqueiro,"%&pesqueiro%%#air_18%-%#air_19%-%#air_24%-%#air_25%-%#air_26%-%#air_27%>");
  1735. IFMATCHES("%&pesqueiro%","<42-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-0-0-0-0-0-0>");
  1736. IF((%#air_8%=54)||(%#air_11%=54)||(%#air_14%=54)||(%#air_17%=54));
  1737. SET(send_error);
  1738. ELSE;
  1739. IF((%#air_8%=146)||(%#air_11%=146)||(%#air_14%=146)||(%#air_17%=146));
  1740. SET(send_error);
  1741. ENDIF;
  1742. ENDIF;
  1743. ELSE;
  1744. SET(send_error);
  1745. ENDIF;
  1746. IF(send_error);
  1747. CLEARCHAT;
  1748. LOG("&9&l[&f&oM&facro&9&l] &cSeu pesqueiro tem algo errado, verifique e tente novamente.");
  1749. LOG("&9&l[&f&oM&facro&9&l] &cPara ver como ele deve ser construído entre no link:");
  1750. LOG("&9&l[&f&oM&facro&9&l] &ahttp://prnt.sc/eg0uli");
  1751. IF((%#baur_1%=0)&&(%#baur_2%=0)&&(%#baur_3%=0)&&(%#baur_4%=0));
  1752. LOG("&9&l[&f&oM&facro&9&l] &cOs baús de reabastecimento de linha e vara sofreram alterações na versão 0.5 desta macro, verifique na print acima.");
  1753. ENDIF;
  1754. LOG("&9&l[&f&oM&facro&9&l] &cSe você marcar a home sleeppesca no local errado, este erro também acontece.");
  1755. LOG("");
  1756. WAIT(10T);
  1757. LOG("&9&l[&f&oM&facro&9&l] &cSleep_Pesca &f&l[&4OFF&f&l]");
  1758. ACHIEVEMENTGET("[OFF] Pesca Upgrade 0.7","346");
  1759. UNSET(@afk_onchat);
  1760. TOGGLE(sleep_macro);
  1761. STOP;
  1762. ENDIF;
  1763. SET(#xpos_pesqueiro,"%XPOS%");
  1764. SET(#ypos_pesqueiro,"%YPOS%");
  1765. SET(#zpos_pesqueiro,"%ZPOS%");
  1766. SET(pesqueiro);
  1767. ENDIF;
  1768. IF((%#verificar_vip%<=80)&&(%#send_pvp_off%>=5));
  1769. SET(#send_pvp_off,"");
  1770. }$$/pvp off$${
  1771. ENDIF;
  1772. IF(sleep_ver_all);
  1773. LOG("&9&l[&f&oM&facro&9&l] &aVerificando e/ou limpando o inventário. &9&o#SLEEP");
  1774. UNSET(sleep_ver_all);
  1775. IF(%GUI%!="GUIINVENTORY");
  1776. GUI(INVENTORY);
  1777. ENDIF;
  1778. IF(cancelar_compra);
  1779. SET(#itens_min_armazem,"1");
  1780. SET(sleep_clean_inventory);
  1781. UNSET(cancelar_compra);
  1782. ENDIF;
  1783. IF(!venda_cancel);
  1784. GETSLOT(346,#slot_vara);
  1785. GETSLOT(287,#slot_linha);
  1786. SET(sleep_clean_inventory);
  1787. SET(#itens_min_armazem,"1");
  1788. SET(#peixes_min_venda,"1");
  1789. UNSET(reabastecer_linha);
  1790. UNSET(reabastecer_vara);
  1791. IF((%#slot_vara%=-1)&&(%#slot_linha%=-1));
  1792. IF(%#dur_vara_reparar%>1);
  1793. SET(reabastecer_linha);
  1794. ENDIF;
  1795. SET(reabastecer_vara);
  1796. ELSEIF(%#slot_vara%=-1);
  1797. SET(reabastecer_vara);
  1798. ELSEIF((%#slot_linha%=-1)&&(%#dur_vara_reparar%>1));
  1799. SET(reabastecer_linha);
  1800. ELSE;
  1801. SET(#itens_min_armazem,"23");
  1802. SET(#peixes_min_venda,"6");
  1803. UNSET(sleep_clean_inventory);
  1804. ENDIF;
  1805. ENDIF;
  1806. DO;
  1807. UNSET(parar);
  1808. SET(#itens_inventory_armazem,"");
  1809. SET(#itens_inventory,"");
  1810. SET(#discos_inventory,"");
  1811. SET(#peixes_inventory,"");
  1812. SET(&slots_fer_not,"");
  1813. UNSAFE;
  1814. FOR(#sleep_slot,9,44);
  1815. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack,#sleep_data);
  1816. IF((%#sleep_id%!=0)&&(%#sleep_id%!=346)&&(%#sleep_id%!=287));
  1817. INC(#itens_inventory,1);
  1818. IF(%#chest_total_inc%=81);
  1819. IF((vender_disco)&&(%#sleep_id%>=2256));
  1820. ELSEIF((vender_peixe)&&(%#sleep_id%=349));
  1821. ELSE;
  1822. SET(#sleep_id,"-1");
  1823. ENDIF;
  1824. ENDIF;
  1825. IFMATCHES("%#sleep_id%","%&itens_armazem%");
  1826. INC(#itens_inventory_armazem,1);
  1827. IFMATCHES("%#sleep_id%","%&ids_ferramentas%");
  1828. IF((fer_durability_down)&&(%#sleep_data%<1000));
  1829. DEC(#itens_inventory_armazem,1);
  1830. SET(&slots_fer_not,"%&slots_fer_not%<%#sleep_slot%>");
  1831. ENDIF;
  1832. ENDIF;
  1833. ELSEIF(sleep_clean_inventory);
  1834. IF((%#sleep_id%>=2256)&&(vender_disco)&&(!venda_cancel));
  1835. INC(#discos_inventory,1);
  1836. ELSEIF((%#sleep_id%=349)&&(vender_peixe)&&(!venda_2_cancel));
  1837. IF(%#sleep_stack%=64);
  1838. INC(#peixes_inventory,1);
  1839. ELSE;
  1840. INC(#itens_inventory_armazem,1);
  1841. ENDIF;
  1842. ELSE;
  1843. LOOKS(45,0,1);
  1844. SET(parar);
  1845. SLOTCLICK(%#sleep_slot%,L,FALSE);
  1846. WAIT(%#delay_dropar%MS);
  1847. SLOTCLICK(-999);
  1848. WAIT(%#delay_dropar%MS);
  1849. ENDIF;
  1850. ENDIF;
  1851. ENDIF;
  1852. IF(%GUI%!="GUIINVENTORY");
  1853. GUI(INVENTORY);
  1854. ENDIF;
  1855. NEXT;
  1856. ENDUNSAFE;
  1857. IF((%&slots_fer_not%!=NONE)&&(sleep_clean_inventory));
  1858. DO;
  1859. IF(%GUI%!="GUIINVENTORY");
  1860. GUI(INVENTORY);
  1861. ENDIF;
  1862. IFMATCHES("%&slots_fer_not%","^<([\d,.]+)>(.*)$");
  1863. MATCH("%&slots_fer_not%","^<([\d,.]+)>(.*)$",{#slot_fer,&slots_fer_not});
  1864. LOOKS(45,0,1);
  1865. SLOTCLICK(%#slot_fer%,L,FALSE);
  1866. WAIT(%#delay_dropar%MS);
  1867. SLOTCLICK(-999);
  1868. WAIT(%#delay_dropar%MS);
  1869. ENDIF;
  1870. UNTIL(%&slots_fer_not%=NONE);
  1871. ENDIF;
  1872. IF((%#itens_inventory%>=24)&&(!sleep_clean_inventory));
  1873. SET(parar);
  1874. SET(sleep_clean_inventory);
  1875. ENDIF;
  1876. UNTIL(!parar);
  1877. IF(%GUI%!="GUIINVENTORY");
  1878. GUI(INVENTORY);
  1879. ENDIF;
  1880. GETSLOT(346,#slot_vara,36);
  1881. GETSLOT(287,#slot_linha);
  1882. UNSET(reabastecer_linha);
  1883. UNSET(reabastecer_vara);
  1884. IF((%#slot_vara%=-1)&&(%#slot_linha%=-1));
  1885. IF(%#dur_vara_reparar%>1);
  1886. SET(reabastecer_linha);
  1887. ENDIF;
  1888. SET(reabastecer_vara);
  1889. GETSLOT(346,#slot_vara,9);
  1890. IF(%#slot_vara%!=-1);
  1891. UNSET(reabastecer_vara);
  1892. SET(sleep_ver_vara);
  1893. ENDIF;
  1894. ELSEIF(%#slot_vara%=-1);
  1895. SET(reabastecer_vara);
  1896. GETSLOT(346,#slot_vara,9);
  1897. IF(%#slot_vara%!=-1);
  1898. UNSET(reabastecer_vara);
  1899. SET(sleep_ver_vara);
  1900. ENDIF;
  1901. ELSEIF((%#slot_linha%=-1)&&(%#dur_vara_reparar%>1));
  1902. SET(reabastecer_linha);
  1903. ENDIF;
  1904. IF((reabastecer_vara)&&(reabastecer_linha));
  1905. LOG("");
  1906. LOG("&9&l[&f&oM&facro&9&l] &aReabastecimento de vara e linha habilitado. &9&o#SLEEP");
  1907. LOG("");
  1908. ELSEIF(reabastecer_linha);
  1909. LOG("");
  1910. LOG("&9&l[&f&oM&facro&9&l] &aReabastecimento de linha habilitado. &9&o#SLEEP");
  1911. LOG("");
  1912. ELSEIF(reabastecer_vara);
  1913. LOG("");
  1914. LOG("&9&l[&f&oM&facro&9&l] &aReabastecimento de vara habilitado. &9&o#SLEEP");
  1915. LOG("");
  1916. ENDIF;
  1917. ENDIF;
  1918. UNSET(sleep_clean_inventory);
  1919. UNSET(venda_cancel);
  1920. UNSET(venda_2_cancel);
  1921. INC(#itens_inventory_armazem,%#discos_inventory%);
  1922. INC(#itens_inventory_armazem,%#peixes_inventory%);
  1923. IF((armazenar_itens)&&(%#chest_total_inc%<81)&&(%#itens_inventory_armazem%>=%#itens_min_armazem%));
  1924. DO;
  1925. LOG("&9&l[&f&oM&facro&9&l] &aBaú de armazenamento número &2%#chest_total_inc%&a. &9&o#SLEEP");
  1926. SET(#sleep_inc_two,"");
  1927. GUI();
  1928. SET(stop);
  1929. DO;
  1930. IF(%#sleep_inc_two%>=3);
  1931. DO(2);
  1932. LOOK(0,270);
  1933. PICK(346);
  1934. WAIT(%#delay_dropar%MS);
  1935. KEY(USE);
  1936. WAIT(%#delay_dropar%MS);
  1937. LOOP;
  1938. ENDIF;
  1939. IF(%#chest_dir_inc%=1);
  1940. LOOK(NORTH);
  1941. ELSEIF(%#chest_dir_inc%=2);
  1942. LOOK(EAST);
  1943. ELSEIF(%#chest_dir_inc%=3);
  1944. LOOK(SOUTH);
  1945. ELSEIF(%#chest_dir_inc%=4);
  1946. LOOK(WEST);
  1947. ENDIF;
  1948. IF(%#chest_inc%=1);
  1949. LOOK(-40,+0);
  1950. ELSEIF(%#chest_inc%=2);
  1951. LOOK(-23,+0);
  1952. ELSEIF(%#chest_inc%=3);
  1953. LOOK(+0,+0);
  1954. ELSEIF(%#chest_inc%=4);
  1955. LOOK(+20,+0);
  1956. ELSEIF(%#chest_inc%=5);
  1957. LOOK(+37,+0);
  1958. ELSEIF(%#chest_inc%=6);
  1959. LOOK(-39,+17);
  1960. ELSEIF(%#chest_inc%=7);
  1961. LOOK(-22,+20);
  1962. ELSEIF(%#chest_inc%=8);
  1963. LOOK(+0,+21);
  1964. ELSEIF(%#chest_inc%=9);
  1965. LOOK(+20,+20);
  1966. ELSEIF(%#chest_inc%=10);
  1967. LOOK(+37,+17);
  1968. ELSEIF(%#chest_inc%=11);
  1969. LOOK(-39,+31);
  1970. ELSEIF(%#chest_inc%=12);
  1971. LOOK(-22,+36);
  1972. ELSEIF(%#chest_inc%=13);
  1973. LOOK(+0,+38);
  1974. ELSEIF(%#chest_inc%=14);
  1975. LOOK(+21,+36);
  1976. ELSEIF(%#chest_inc%=15);
  1977. LOOK(+37,+31);
  1978. ELSEIF(%#chest_inc%=16);
  1979. LOOK(-39,+41);
  1980. ELSEIF(%#chest_inc%=17);
  1981. LOOK(-22,+46);
  1982. ELSEIF(%#chest_inc%=18);
  1983. LOOK(+0,+48);
  1984. ELSEIF(%#chest_inc%=19);
  1985. LOOK(+20,+46);
  1986. ELSEIF(%#chest_inc%=20);
  1987. LOOK(+37,+42);
  1988. ENDIF;
  1989. LOOKS(+0,+1,1);
  1990. WAIT(1T);
  1991. KEY(USE);
  1992. SET(#sleep_inc,"");
  1993. DO;
  1994. INC(#sleep_inc,1);
  1995. UNTIL((%GUI%="GUICHEST")||(%#sleep_inc%=300));
  1996. INC(#sleep_inc_two,1);
  1997. WHILE(%GUI%!="GUICHEST");
  1998. WAIT(3T);
  1999. UNSET(parar_break);
  2000. DO;
  2001. UNSET(parar);
  2002. FOR(#sleep_slot,89,54);
  2003. GETSLOT(0,#chest_slot_vazio);
  2004. IF((%#chest_slot_vazio%=-1)||(%#chest_slot_vazio%>53));
  2005. INC(#chest_total_inc,1);
  2006. SET(parar_break);
  2007. UNSET(parar);
  2008. IF((%#chest_total_inc%=21)||(%#chest_total_inc%=41)||(%#chest_total_inc%=61));
  2009. INC(#chest_dir_inc,1);
  2010. SET(#chest_inc,"1");
  2011. UNSET(stop);
  2012. BREAK;
  2013. ELSEIF(%#chest_total_inc%=81);
  2014. LOG("");
  2015. LOG("&9&l[&f&oM&facro&9&l] &cBaús cheios, armazenamento desabilitado. &9&o#SLEEP");
  2016. LOG("");
  2017. IF((vender_disco)||(vender_peixe));
  2018. SET(#pack_linha_min,"8");
  2019. ELSE;
  2020. SET(#pack_linha_min,"18");
  2021. SET(#time_verificar,"1000000");
  2022. ENDIF;
  2023. SET(stop);
  2024. BREAK;
  2025. ELSE;
  2026. UNSET(stop);
  2027. INC(#chest_inc,1);
  2028. BREAK;
  2029. ENDIF;
  2030. ENDIF;
  2031. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack,#sleep_data);
  2032. IF((%#sleep_id%!=0)&&(%#sleep_id%!=346)&&(%#sleep_id%!=287));
  2033. IFMATCHES("%#sleep_id%","%&itens_armazem%");
  2034. SET(sleep_armazenar);
  2035. UNSET(sleep_ver_enchant);
  2036. IFMATCHES("%#sleep_id%","%&ids_armaduras%");
  2037. IF(%&enchant_yes_arm%!="TUDO");
  2038. SET(sleep_ver_enchant);
  2039. UNSET(thorns);
  2040. UNSET(unbreaking);
  2041. UNSET(unbreaking_all);
  2042. UNSET(unbreaking_qall);
  2043. ENDIF;
  2044. ENDIF;
  2045. IFMATCHES("%#sleep_id%","%&ids_espadas%");
  2046. IF(%&enchant_yes_esp%!="TUDO");
  2047. SET(sleep_ver_enchant);
  2048. UNSET(fire_1);
  2049. UNSET(fire_2);
  2050. UNSET(knockback);
  2051. UNSET(looting);
  2052. ENDIF;
  2053. ENDIF;
  2054. IFMATCHES("%#sleep_id%","%&ids_ferramentas%");
  2055. IF(%&enchant_yes_fer%!="TUDO");
  2056. IF((%#sleep_id%>289)&&(%#sleep_id%<295));
  2057. UNSET(sleep_armazenar);
  2058. ELSE;
  2059. SET(sleep_ver_enchant);
  2060. UNSET(unbreaking);
  2061. ENDIF;
  2062. ELSEIF((fer_durability_down)&&(%#sleep_data%<1000));
  2063. UNSET(sleep_armazenar);
  2064. ENDIF;
  2065. ENDIF;
  2066. IF(sleep_ver_enchant);
  2067. UNSET(sleep_ver_enchant);
  2068. GETITEMINFO(%#sleep_id%,&item_name);
  2069. SLOT(1);
  2070. IF(%#sleep_slot%!=81);
  2071. GETSLOT(0,#slot_vazio,54);
  2072. GETSLOTITEM(81,#id_81);
  2073. IF(%#id_81%!=0);
  2074. SLOTCLICK(81,L,FALSE);
  2075. WAIT(%#delay_dropar%MS);
  2076. IF((%#slot_vazio%=-1)||(%#slot_vazio%<=80));
  2077. SLOTCLICK(%#slot_vazio%,L,FALSE);
  2078. ELSE;
  2079. SLOTCLICK(-999);
  2080. ENDIF;
  2081. WAIT(%#delay_dropar%MS);
  2082. ENDIF;
  2083. SLOTCLICK(%#sleep_slot%,L,FALSE);
  2084. WAIT(%#delay_dropar%MS);
  2085. SLOTCLICK(81,L,FALSE);
  2086. WAIT(%#delay_dropar%MS);
  2087. ENDIF;
  2088. FOREACH(enchantments);
  2089. IFMATCHES("%#sleep_id%","%&ids_armaduras%");
  2090. IFMATCHES("%ENCHANTMENT%","%&enchant_yes_arm%");
  2091. SET(sleep_ver_enchant);
  2092. ENDIF;
  2093. IFMATCHES("%ENCHANTMENT%","^(Espinhos|Thorns) (I|II|III)$");
  2094. SET(thorns);
  2095. ENDIF;
  2096. IFMATCHES("%ENCHANTMENT%","^(Inquebrável|Unbreaking) III$");
  2097. SET(unbreaking);
  2098. ENDIF;
  2099. IFMATCHES("%ENCHANTMENT%","^(Inquebrável|Unbreaking) (I|II|III)$");
  2100. SET(unbreaking_all);
  2101. ENDIF;
  2102. IFMATCHES("%ENCHANTMENT%","^(Inquebrável|Unbreaking) (II|III)$");
  2103. SET(unbreaking_qall);
  2104. ENDIF;
  2105. ENDIF;
  2106. IFMATCHES("%#sleep_id%","%&ids_espadas%");
  2107. IFMATCHES("%ENCHANTMENT%","%&enchant_yes_esp%");
  2108. SET(sleep_ver_enchant);
  2109. ENDIF;
  2110. IFMATCHES("%ENCHANTMENT%","^(Aspecto Flamejante|Fire Aspect) I$");
  2111. SET(fire_1);
  2112. ENDIF;
  2113. IFMATCHES("%ENCHANTMENT%","^(Aspecto Flamejante|Fire Aspect) II$");
  2114. SET(fire_2);
  2115. ENDIF;
  2116. IFMATCHES("%ENCHANTMENT%","^(Repulsão|Knockback) (I|II)$");
  2117. SET(knockback);
  2118. ENDIF;
  2119. IFMATCHES("%ENCHANTMENT%","^(Looting|Pilhagem) III$");
  2120. SET(looting);
  2121. ENDIF;
  2122. ENDIF;
  2123. IFMATCHES("%#sleep_id%","%&ids_ferramentas%");
  2124. IFMATCHES("%ENCHANTMENT%","%&enchant_yes_fer%");
  2125. SET(sleep_ver_enchant);
  2126. ENDIF;
  2127. IFMATCHES("%ENCHANTMENT%","^(Inquebrável|Unbreaking) III$");
  2128. SET(unbreaking);
  2129. ENDIF;
  2130. ENDIF;
  2131. NEXT;
  2132. IFMATCHES("%#sleep_id%","%&ids_armaduras%");
  2133. IF(sleep_ver_enchant);
  2134. IF((arm_thorns_trash)&&(thorns));
  2135. UNSET(sleep_armazenar);
  2136. ENDIF;
  2137. IF((arm_unbreaking_up)&&(!unbreaking));
  2138. UNSET(sleep_armazenar);
  2139. ENDIF;
  2140. IF((arm_unbreaking_up_all)&&(!unbreaking_all));
  2141. UNSET(sleep_armazenar);
  2142. ENDIF;
  2143. IF((arm_unbreaking_up_qall)&&(!unbreaking_qall));
  2144. UNSET(sleep_armazenar);
  2145. ENDIF;
  2146. ELSE;
  2147. UNSET(sleep_armazenar);
  2148. ENDIF;
  2149. ENDIF;
  2150. IFMATCHES("%#sleep_id%","%&ids_espadas%");
  2151. IF(sleep_ver_enchant);
  2152. IF((esp_fire_1_up)&&(esp_fire_2_up));
  2153. IF((fire_1)||(fire_2));
  2154. ELSE;
  2155. UNSET(sleep_armazenar);
  2156. ENDIF;
  2157. ELSE;
  2158. IF((esp_fire_2_up)&&(!fire_2));
  2159. UNSET(sleep_armazenar);
  2160. ENDIF;
  2161. IF((esp_knockback_trash)&&(knockback));
  2162. UNSET(sleep_armazenar);
  2163. ENDIF;
  2164. IF((esp_looting_up)&&(!looting));
  2165. UNSET(sleep_armazenar);
  2166. ENDIF;
  2167. ENDIF;
  2168. ELSE;
  2169. UNSET(sleep_armazenar);
  2170. ENDIF;
  2171. ENDIF;
  2172. IFMATCHES("%#sleep_id%","%&ids_ferramentas%");
  2173. IF(sleep_ver_enchant);
  2174. IF((fer_unbreaking_up)&&(!unbreaking));
  2175. UNSET(sleep_armazenar);
  2176. ENDIF;
  2177. ELSE;
  2178. UNSET(sleep_armazenar);
  2179. ENDIF;
  2180. ENDIF;
  2181. SET(#sleep_slot,"81");
  2182. WAIT(%#delay_dropar%MS);
  2183. ENDIF;
  2184. IF(sleep_armazenar);
  2185. SLOTCLICK(%#sleep_slot%,L,TRUE);
  2186. WAIT(%#delay_dropar%MS);
  2187. IF(!parar_break);
  2188. IF(%#sleep_id%=387);
  2189. INC(#livros_tesouro,1);
  2190. ELSEIF(%#sleep_id%>2000);
  2191. INC(#disco_inc,1);
  2192. ELSEIF(%#sleep_id%=351);
  2193. INC(#lapis_inc,%#sleep_stack%);
  2194. ELSEIF(%#sleep_id%=349);
  2195. INC(#peixe_inc,%#sleep_stack%);
  2196. ELSEIF(%#sleep_id%=369);
  2197. INC(#blaze_inc,%#sleep_stack%);
  2198. ELSEIF(%#sleep_id%=370);
  2199. INC(#lagrima_inc,%#sleep_stack%);
  2200. ELSEIF(%#sleep_id%=264);
  2201. INC(#diamante_inc,%#sleep_stack%);
  2202. ELSEIF(%#sleep_id%=266);
  2203. INC(#ouro_inc,%#sleep_stack%);
  2204. ELSEIF(%#sleep_id%=265);
  2205. INC(#ferro_inc,%#sleep_stack%);
  2206. ELSE;
  2207. IFMATCHES("%#sleep_id%","%&ids_armaduras%");
  2208. INC(#armadura_inc,1);
  2209. ENDIF;
  2210. IFMATCHES("%#sleep_id%","%&ids_ferramentas%");
  2211. INC(#ferramenta_inc,1);
  2212. ENDIF;
  2213. IFMATCHES("%#sleep_id%","%&ids_espadas%");
  2214. INC(#espada_inc,1);
  2215. ENDIF;
  2216. ENDIF;
  2217. ENDIF;
  2218. ELSE;
  2219. LOG("&9&l[&f&oM&facro&9&l] &cItem sem o(s) encantamento(s) configurado(s). &9&o#SLEEP");
  2220. SLOTCLICK(%#sleep_slot%,L,FALSE);
  2221. WAIT(%#delay_dropar%MS);
  2222. SLOTCLICK(-999);
  2223. WAIT(%#delay_dropar%MS);
  2224. ENDIF;
  2225. ELSEIF((%#sleep_id%>=2256)&&(vender_disco));
  2226. ELSEIF((%#sleep_id%=349)&&(vender_peixe));
  2227. ELSE;
  2228. LOG("&9&l[&f&oM&facro&9&l] &cLixo encontrado, você esta com lag. &9&o#SLEEP");
  2229. SLOTCLICK(%#sleep_slot%,L,FALSE);
  2230. WAIT(%#delay_dropar%MS);
  2231. SLOTCLICK(-999);
  2232. WAIT(%#delay_dropar%MS);
  2233. ENDIF;
  2234. ENDIF;
  2235. IF(%GUI%!="GUICHEST");
  2236. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, reabrindo baú. &9&o#SLEEP");
  2237. UNSET(stop);
  2238. UNSET(parar);
  2239. BREAK;
  2240. ENDIF;
  2241. NEXT;
  2242. IF((!parar_break)&&(%GUI%="GUICHEST"));
  2243. SET(parar);
  2244. SET(parar_break);
  2245. ENDIF;
  2246. UNTIL(!parar);
  2247. UNTIL(stop);
  2248. GUI();
  2249. IF((!reabastecer_linha)&&(!reabastecer_vara));
  2250. SET(unbug);
  2251. ENDIF;
  2252. ENDIF;
  2253. IF((vender_disco)&&(%#discos_inventory%>=1)&&(%#itens_inventory_armazem%>=%#itens_min_armazem%));
  2254. SET(esconder);
  2255. SET(#sleep_inc_three,"");
  2256. SET(#sleep_homes,"2");
  2257. DO;
  2258. UNSET(parar);
  2259. DO(%#sleep_homes%);
  2260. DO;
  2261. UNSET(@sleepteleport);
  2262. WAIT(2T);
  2263. SET(#sleep_inc,"");
  2264. IF(%#vender_disco%=1);
  2265. }$$/warp vip$${
  2266. ELSE;
  2267. }$$/home sleepdiscos$${
  2268. ENDIF;
  2269. DO(250);
  2270. GETIDREL(0,-1,0,#sleepteleport);
  2271. IF(%#sleepteleport%=57);
  2272. INC(#sleep_inc,1);
  2273. ELSE;
  2274. SET(#sleep_inc,"");
  2275. ENDIF;
  2276. UNTIL((@sleepteleport)||(%#sleep_inc%=47));
  2277. IF(%#sleep_inc%=47);
  2278. BREAK;
  2279. ELSE;
  2280. WAIT(2T);
  2281. ENDIF;
  2282. WHILE(!@sleepteleport);
  2283. UNTIL(%#sleep_inc%=47);
  2284. DO;
  2285. GETIDREL(0,-1,0,#sleep_id);
  2286. WHILE(%#sleep_id%=0);
  2287. SET(#sleep_homes,"1");
  2288. UNSET(menuloja);
  2289. IF(%#vender_disco%=1);
  2290. IF(warp_vip_nova);
  2291. SET(#sleep_inc,"");
  2292. DO;
  2293. GUI();
  2294. LOOK(NORTH);
  2295. GETIDREL(4,0,0,#id_pedra);
  2296. GETIDREL(0,-1,0,#id_unbug);
  2297. IF(%ZPOS%<=654);
  2298. KEYDOWN(SNEAK);
  2299. ENDIF;
  2300. KEYDOWN(FORWARD);
  2301. UNSPRINT;
  2302. INC(#sleep_inc,1);
  2303. IF(%#id_pedra%=43);
  2304. IF(!menuloja);
  2305. ECHO("/menuloja off");
  2306. SET(menuloja);
  2307. ENDIF;
  2308. WAIT(3T);
  2309. KEYUP(SNEAK);
  2310. KEYUP(FORWARD);
  2311. SET(#sleep_inc,"");
  2312. DO;
  2313. LOOK(NORTH);
  2314. LOOK(+54,+0);
  2315. INC(#sleep_inc,1);
  2316. GETIDREL(0,-2,0,#id_unbug);
  2317. GETIDREL(0,-1,0,#id_glowstone);
  2318. GETIDREL(1,0,0,#id_quartzo);
  2319. GETIDREL(3,0,0,#id_lan,#data_lan);
  2320. KEYDOWN(FORWARD);
  2321. SPRINT;
  2322. IF((%#id_lan%=35)&&(%#data_lan%=4)&&(%#id_quartzo%=100));
  2323. KEYUP(FORWARD);
  2324. WAIT(1T);
  2325. GUI(INVENTORY);
  2326. GETIDREL(0,2,0,#placa_dinamica);
  2327. IF(%#placa_dinamica%!=68);
  2328. SET(&sleep_pdy,"+0");
  2329. SET(&sleep_pdp,"+0");
  2330. ELSE;
  2331. SET(&sleep_pdy,"+0");
  2332. SET(&sleep_pdp,"+282");
  2333. ENDIF;
  2334. LOOK(EAST);
  2335. LOOK(%&sleep_pdy%,%&sleep_pdp%);
  2336. WAIT(3T);
  2337. SET(&sleep_look,"EAST");
  2338. IF(%#sleep_inc_three%=0);
  2339. REPLACE(&tfarc_1,"9"," ");
  2340. REPLACE(&tfarc_1,"8","");
  2341. ENDIF;
  2342. FOR(#sleep_id,2256,2267);
  2343. SET(#sleep_inc,"");
  2344. IF(%GUI%!="GUIINVENTORY");
  2345. GUI(INVENTORY);
  2346. ENDIF;
  2347. IF((%#sleep_id%<=2261)&&(%#sleep_id%>2256));
  2348. LOOK(EAST);
  2349. LOOK(%&sleep_pdy%,%&sleep_pdp%);
  2350. SET(&sleep_look,"EAST");
  2351. #zpos_parar = %ZPOS% + 1;
  2352. DO;
  2353. KEYDOWN(SNEAK);
  2354. KEYDOWN(RIGHT);
  2355. INC(#sleep_inc,1);
  2356. GETIDREL(0,-1,0,#id_unbug);
  2357. IF((%#id_unbug%=0)||(%#id_unbug%!=89));
  2358. INC(#sleep_inc,150);
  2359. ENDIF;
  2360. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2361. IF(%#sleep_inc%>=150);
  2362. SET(parar);
  2363. BREAK;
  2364. ENDIF;
  2365. WAIT(1T);
  2366. KEYUP(SNEAK);
  2367. KEYUP(RIGHT);
  2368. ELSEIF(%#sleep_id%>2261);
  2369. SET(&sleep_look,"WEST");
  2370. IF(%#sleep_id%=2262);
  2371. GUI();
  2372. DO;
  2373. LOOK(WEST);
  2374. GETIDREL(0,-1,0,#id_quartzo);
  2375. KEYDOWN(FORWARD);
  2376. SPRINT;
  2377. INC(#sleep_inc,1);
  2378. GETIDREL(0,-2,0,#id_unbug);
  2379. IF(%#id_unbug%=0);
  2380. INC(#sleep_inc,250);
  2381. ENDIF;
  2382. UNTIL((%#sleep_inc%>=250)||(%#id_quartzo%=155));
  2383. IF(%#sleep_inc%>=250);
  2384. SET(parar);
  2385. BREAK;
  2386. ENDIF;
  2387. KEYUP(FORWARD);
  2388. SET(#sleep_inc,"");
  2389. LOOK(WEST);
  2390. #zpos_parar = %ZPOS% + 2;
  2391. DO;
  2392. KEYDOWN(SNEAK);
  2393. KEYDOWN(LEFT);
  2394. INC(#sleep_inc,1);
  2395. GETIDREL(0,-1,0,#id_unbug);
  2396. IF(%#id_unbug%=0);
  2397. INC(#sleep_inc,150);
  2398. ENDIF;
  2399. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2400. IF(%#sleep_inc%>=150);
  2401. SET(parar);
  2402. BREAK;
  2403. ENDIF;
  2404. KEYUP(SNEAK);
  2405. KEYUP(LEFT);
  2406. LOOK(WEST);
  2407. #zpos_parar = %ZPOS% - 1;
  2408. DO;
  2409. KEYDOWN(SNEAK);
  2410. KEYDOWN(RIGHT);
  2411. INC(#sleep_inc,1);
  2412. GETIDREL(0,-1,0,#id_unbug);
  2413. IF(%#id_unbug%=0);
  2414. INC(#sleep_inc,150);
  2415. ENDIF;
  2416. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2417. IF(%#sleep_inc%>=150);
  2418. SET(parar);
  2419. BREAK;
  2420. ENDIF;
  2421. WAIT(3T);
  2422. KEYUP(SNEAK);
  2423. KEYUP(RIGHT);
  2424. DO;
  2425. LOOK(WEST);
  2426. GETIDREL(0,-1,0,#id_glowstone);
  2427. GETIDREL(-1,0,-1,#id_escada);
  2428. KEYDOWN(FORWARD);
  2429. SPRINT;
  2430. INC(#sleep_inc,1);
  2431. GETIDREL(0,-2,0,#id_unbug);
  2432. IF(%#id_unbug%=0);
  2433. INC(#sleep_inc,250);
  2434. ENDIF;
  2435. UNTIL((%#sleep_inc%>=250)||(%#id_glowstone%=89)&&(%#id_escada%=109));
  2436. IF(%#sleep_inc%>=250);
  2437. SET(parar);
  2438. BREAK;
  2439. ENDIF;
  2440. WAIT(5T);
  2441. KEYUP(FORWARD);
  2442. ELSE;
  2443. LOOK(WEST);
  2444. LOOK(%&sleep_pdy%,%&sleep_pdp%);
  2445. #zpos_parar = %ZPOS% - 1;
  2446. DO;
  2447. KEYDOWN(SNEAK);
  2448. KEYDOWN(RIGHT);
  2449. INC(#sleep_inc,1);
  2450. GETIDREL(0,-1,0,#id_unbug);
  2451. IF((%#id_unbug%=0)||(%#id_unbug%!=89));
  2452. INC(#sleep_inc,150);
  2453. ENDIF;
  2454. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2455. IF(%#sleep_inc%>=150);
  2456. SET(parar);
  2457. BREAK;
  2458. ENDIF;
  2459. WAIT(1T);
  2460. KEYUP(SNEAK);
  2461. KEYUP(RIGHT);
  2462. ENDIF;
  2463. ENDIF;
  2464. SET(#sleep_inc,"");
  2465. SET(#sleep_inc_two,"");
  2466. DO;
  2467. IF(%GUI%!="GUIINVENTORY");
  2468. GUI(INVENTORY);
  2469. ENDIF;
  2470. GETSLOT(%#sleep_id%,#sleep_slot);
  2471. IF(%#sleep_slot%=-1);
  2472. BREAK;
  2473. ELSE;
  2474. IF(%HIT%="PLAYER");
  2475. IF(esconder);
  2476. ECHO("/esconder");
  2477. UNSET(esconder);
  2478. ENDIF;
  2479. INC(#sleep_inc_two,1);
  2480. RANDOM(#sleep_time,200,20);
  2481. GUI();
  2482. DO;
  2483. GETIDREL(0,-1,0,#id_glowstone);
  2484. LOOK(%&sleep_look%);
  2485. IF(%#sleep_time%>=1);
  2486. IF((%XPOS%=717)||(%XPOS%=726));
  2487. KEYUP(SNEAK);
  2488. KEYUP(BACK);
  2489. IF(%HIT%="PLAYER");
  2490. ELSE;
  2491. SET(#sleep_time,"-1");
  2492. ENDIF;
  2493. ELSE;
  2494. KEYDOWN(SNEAK);
  2495. KEYDOWN(BACK);
  2496. ENDIF;
  2497. ELSEIF(%#sleep_time%<1);
  2498. KEYUP(SNEAK);
  2499. KEYDOWN(FORWARD);
  2500. IF(%#id_glowstone%=89);
  2501. WAIT(5T);
  2502. KEYUP(FORWARD);
  2503. BREAK;
  2504. ENDIF;
  2505. ENDIF;
  2506. DEC(#sleep_time,1);
  2507. UNTIL((%#id_glowstone%=0)||(%#sleep_time%<=-150));
  2508. IF((%#id_glowstone%=0)||(%#sleep_time%<=-150));
  2509. SET(parar);
  2510. BREAK;
  2511. ENDIF;
  2512. ELSE;
  2513. SET(#sleep_inc_two,"");
  2514. GUI();
  2515. LOOK(%&sleep_look%);
  2516. LOOK(%&sleep_pdy%,%&sleep_pdp%);
  2517. WAIT(%#delay_dropar%MS);
  2518. KEY(ATTACK);
  2519. WAIT(%#delay_dropar%MS);
  2520. ENDIF;
  2521. ENDIF;
  2522. GETIDREL(0,-1,0,#id_unbug);
  2523. INC(#sleep_inc,1);
  2524. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  2525. SET(parar);
  2526. BREAK;
  2527. ENDIF;
  2528. LOOP;
  2529. IF(parar);
  2530. BREAK;
  2531. ENDIF;
  2532. NEXT;
  2533. BREAK;
  2534. ENDIF;
  2535. UNTIL((%#sleep_inc%>=250)||(%#id_unbug%=0));
  2536. IF((%#sleep_inc%>=250)||(%#id_unbug%=0));
  2537. SET(parar);
  2538. BREAK;
  2539. ENDIF;
  2540. BREAK;
  2541. ELSEIF((%#sleep_inc%>=150)||(%#id_unbug%=0));
  2542. SET(parar);
  2543. BREAK;
  2544. ENDIF;
  2545. LOOP;
  2546. ELSE;
  2547. SET(#sleep_inc,"");
  2548. DO;
  2549. GUI();
  2550. LOOK(NORTH);
  2551. LOOK(+76,+0);
  2552. KEYDOWN(FORWARD);
  2553. UNSPRINT;
  2554. KEYDOWN(JUMP);
  2555. GETIDREL(1,0,0,#id_lan_red,#data_lan_red);
  2556. GETIDREL(0,0,-1,#id_bloco_lapis);
  2557. GETIDREL(0,-2,0,#id_unbug);
  2558. INC(#sleep_inc,1);
  2559. IF((%#id_lan_red%=35)&&(%#data_lan_red%=14)&&(%#id_bloco_lapis%=22));
  2560. IF(!menuloja);
  2561. ECHO("/menuloja off");
  2562. SET(menuloja);
  2563. ENDIF;
  2564. SET(&sleep_look,"EAST");
  2565. KEYUP(JUMP);
  2566. WAIT(5T);
  2567. KEYUP(FORWARD);
  2568. GUI(INVENTORY);
  2569. LOOK(EAST);
  2570. WAIT(2T);
  2571. IF(%#sleep_inc_three%=0);
  2572. REPLACE(&tfarc_1,"9"," ");
  2573. REPLACE(&tfarc_1,"8","");
  2574. ENDIF;
  2575. FOR(#sleep_id,2256,2267);
  2576. SET(#sleep_inc,"");
  2577. IF(%GUI%!="GUIINVENTORY");
  2578. GUI(INVENTORY);
  2579. ENDIF;
  2580. IF((%#sleep_id%<=2261)&&(%#sleep_id%>2256));
  2581. LOOK(EAST);
  2582. SET(&sleep_look,"EAST");
  2583. #zpos_parar = %ZPOS% + 1;
  2584. DO;
  2585. KEYDOWN(SNEAK);
  2586. KEYDOWN(RIGHT);
  2587. INC(#sleep_inc,1);
  2588. GETIDREL(0,-1,0,#id_unbug);
  2589. GETIDREL(1,0,0,#id_lan_red,#data_lan_red);
  2590. IF((%#id_unbug%=0)||(%#id_lan_red%!=35)&&(%#data_lan_red%!=14));
  2591. INC(#sleep_inc,150);
  2592. ENDIF;
  2593. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2594. IF(%#sleep_inc%>=150);
  2595. SET(parar);
  2596. BREAK;
  2597. ENDIF;
  2598. WAIT(1T);
  2599. KEYUP(SNEAK);
  2600. KEYUP(RIGHT);
  2601. ELSEIF(%#sleep_id%>2261);
  2602. SET(&sleep_look,"WEST");
  2603. IF(%#sleep_id%=2262);
  2604. GUI();
  2605. DO;
  2606. LOOK(WEST);
  2607. GETIDREL(0,-1,0,#id_lan_orange,#data_lan_orange);
  2608. GETIDREL(-1,0,0,#id_lan_red,#data_lan_red);
  2609. KEYDOWN(FORWARD);
  2610. UNSPRINT;
  2611. KEYDOWN(JUMP);
  2612. INC(#sleep_inc,1);
  2613. GETIDREL(0,-2,0,#id_unbug);
  2614. IF(%#id_unbug%=0);
  2615. INC(#sleep_inc,250);
  2616. ENDIF;
  2617. UNTIL((%#sleep_inc%>=250)||(%#id_lan_orange%=35)&&(%#data_lan_orange%=1)&&(%#id_lan_red%=35)&&(%#data_lan_red%=14));
  2618. IF(%#sleep_inc%>=250);
  2619. SET(parar);
  2620. BREAK;
  2621. ENDIF;
  2622. KEYUP(JUMP);
  2623. WAIT(5T);
  2624. KEYUP(FORWARD);
  2625. ELSE;
  2626. LOOK(WEST);
  2627. #zpos_parar = %ZPOS% - 1;
  2628. DO;
  2629. KEYDOWN(SNEAK);
  2630. KEYDOWN(RIGHT);
  2631. INC(#sleep_inc,1);
  2632. GETIDREL(0,-1,0,#id_unbug);
  2633. GETIDREL(-1,0,0,#id_lan_red,#data_lan_red);
  2634. IF((%#id_unbug%=0)||(%#id_lan_red%!=35)&&(%#data_lan_red%!=14));
  2635. INC(#sleep_inc,150);
  2636. ENDIF;
  2637. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2638. IF(%#sleep_inc%>=150);
  2639. SET(parar);
  2640. BREAK;
  2641. ENDIF;
  2642. WAIT(1T);
  2643. KEYUP(SNEAK);
  2644. KEYUP(RIGHT);
  2645. ENDIF;
  2646. ENDIF;
  2647. SET(#sleep_inc,"");
  2648. SET(#sleep_inc_two,"");
  2649. DO;
  2650. IF(%GUI%!="GUIINVENTORY");
  2651. GUI(INVENTORY);
  2652.  
  2653. ENDIF;
  2654. GETSLOT(%#sleep_id%,#sleep_slot);
  2655. IF(%#sleep_slot%=-1);
  2656. BREAK;
  2657. ELSE;
  2658. IF(%HIT%="PLAYER");
  2659. IF(esconder);
  2660. ECHO("/esconder");
  2661. UNSET(esconder);
  2662. ENDIF;
  2663. INC(#sleep_inc_two,1);
  2664. RANDOM(#sleep_time,200,20);
  2665. GUI();
  2666. DO;
  2667. GETIDREL(0,-1,0,#id_lan,#data_lan);
  2668. GETIDREL(0,4,0,#id_lan_two,#data_lan_two);
  2669. LOOK(%&sleep_look%);
  2670. IF(%#sleep_time%>=1);
  2671. IF((%#id_lan%=35)&&(%#data_lan%>=5));
  2672. KEYUP(SNEAK);
  2673. KEYUP(BACK);
  2674. IF(%HIT%="PLAYER");
  2675. ELSE;
  2676. SET(#sleep_time,"-1");
  2677. ENDIF;
  2678. ELSE;
  2679. KEYDOWN(SNEAK);
  2680. KEYDOWN(BACK);
  2681. ENDIF;
  2682. ELSEIF(%#sleep_time%<1);
  2683. KEYUP(SNEAK);
  2684. KEYDOWN(FORWARD);
  2685. IF((%#id_lan_two%=35)&&(%#data_lan_two%=4));
  2686. WAIT(5T);
  2687. KEYUP(FORWARD);
  2688. BREAK;
  2689. ENDIF;
  2690. ENDIF;
  2691. DEC(#sleep_time,1);
  2692. UNTIL((%#id_lan%=0)||(%#sleep_time%<=-150));
  2693. IF((%#id_lan%=0)||(%#sleep_time%<=-150));
  2694. SET(parar);
  2695. BREAK;
  2696. ENDIF;
  2697. ELSE;
  2698. SET(#sleep_inc_two,"");
  2699. GUI();
  2700. LOOK(%&sleep_look%);
  2701. WAIT(%#delay_dropar%MS);
  2702. KEY(ATTACK);
  2703. WAIT(%#delay_dropar%MS);
  2704. ENDIF;
  2705. ENDIF;
  2706. GETIDREL(0,-1,0,#id_unbug);
  2707. INC(#sleep_inc,1);
  2708. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  2709. SET(parar);
  2710. BREAK;
  2711. ENDIF;
  2712. LOOP;
  2713. IF(parar);
  2714. BREAK;
  2715. ENDIF;
  2716. NEXT;
  2717. BREAK;
  2718. ELSEIF((%#sleep_inc%>=250)||(%#id_unbug%=0));
  2719. SET(parar);
  2720. BREAK;
  2721. ENDIF;
  2722. LOOP;
  2723. ENDIF;
  2724. ELSE;
  2725. SET(#sleep_inc,"");
  2726. DO;
  2727. GUI();
  2728. DO(2);
  2729. DO;
  2730. INC(#sleep_inc,1);
  2731. GETIDREL(0,-1,0,#id_unbug);
  2732. IF((%#sleep_inc%>=275)||(%#id_unbug%=0));
  2733. SET(parar);
  2734. BREAK;
  2735. ENDIF;
  2736. IF(%ZPOS%<625);
  2737. LOOK(SOUTH);
  2738. KEYDOWN(FORWARD);
  2739. KEYDOWN(SNEAK);
  2740. UNSPRINT;
  2741. ELSEIF(%ZPOS%>625);
  2742. LOOK(NORTH);
  2743. KEYDOWN(FORWARD);
  2744. KEYDOWN(SNEAK);
  2745. UNSPRINT;
  2746. ELSE;
  2747. IF(!menuloja);
  2748. ECHO("/menuloja off");
  2749. SET(menuloja);
  2750. ENDIF;
  2751. WAIT(1MS);
  2752. KEYUP(FORWARD);
  2753. KEYUP(SNEAK);
  2754. BREAK;
  2755. ENDIF;
  2756. LOOP;
  2757. DO;
  2758. INC(#sleep_inc,1);
  2759. GETIDREL(0,-1,0,#id_unbug);
  2760. IF((%#sleep_inc%>=275)||(%#id_unbug%=0));
  2761. SET(parar);
  2762. BREAK;
  2763. ENDIF;
  2764. IF(%XPOS%<-714);
  2765. LOOK(EAST);
  2766. KEYDOWN(FORWARD);
  2767. UNSPRINT;
  2768. ELSEIF(%XPOS%>-714);
  2769. LOOK(WEST);
  2770. KEYDOWN(FORWARD);
  2771. UNSPRINT;
  2772. ELSE;
  2773. WAIT(3T);
  2774. KEYUP(FORWARD);
  2775. KEYUP(SNEAK);
  2776. BREAK;
  2777. ENDIF;
  2778. LOOP;
  2779. LOOP;
  2780. IF(!parar);
  2781. SET(&sleep_look,"WEST");
  2782. IF(%#sleep_inc_three%=0);
  2783. REPLACE(&tfarc_1,"9"," ");
  2784. REPLACE(&tfarc_1,"8","");
  2785. ENDIF;
  2786. FOR(#sleep_id,2256,2267);
  2787. SET(#sleep_inc,"");
  2788. IF(%GUI%!="GUIINVENTORY");
  2789. GUI(INVENTORY);
  2790. ENDIF;
  2791. IF((%#sleep_id%!=2256)&&(%#sleep_id%!=2264));
  2792. LOOK(WEST);
  2793. #zpos_parar = %ZPOS% - 1;
  2794. DO;
  2795. KEYDOWN(SNEAK);
  2796. KEYDOWN(RIGHT);
  2797. INC(#sleep_inc,1);
  2798. GETIDREL(0,-1,0,#id_unbug);
  2799. GETIDREL(-1,0,0,#id_bloco);
  2800. IF((%#id_unbug%=0)||(%#id_bloco%!=112));
  2801. INC(#sleep_inc,150);
  2802. ENDIF;
  2803. UNTIL((%ZPOS%=%#zpos_parar%)||(%#sleep_inc%>=150));
  2804. IF(%#sleep_inc%>=150);
  2805. SET(parar);
  2806. BREAK;
  2807. ENDIF;
  2808. WAIT(1T);
  2809. KEYUP(SNEAK);
  2810. KEYUP(RIGHT);
  2811. ELSEIF(%#sleep_id%=2264);
  2812. GUI();
  2813. DO;
  2814. LOOK(WEST);
  2815. GETIDREL(-2,1,0,#id_sign);
  2816. KEYDOWN(BACK);
  2817. KEYDOWN(SNEAK);
  2818. UNSPRINT;
  2819. INC(#sleep_inc,1);
  2820. GETIDREL(0,-1,0,#id_unbug);
  2821. IF(%#id_unbug%=0);
  2822. INC(#sleep_inc,250);
  2823. ENDIF;
  2824. UNTIL((%#sleep_inc%>=250)||(%#id_sign%=68));
  2825. IF(%#sleep_inc%>=250);
  2826. SET(parar);
  2827. BREAK;
  2828. ENDIF;
  2829. WAIT(2T);
  2830. KEYUP(BACK);
  2831. KEYUP(SNEAK);
  2832. GUI();
  2833. SET(#sleep_inc,"");
  2834. DO;
  2835. INC(#sleep_inc,1);
  2836. GETIDREL(0,-1,0,#id_unbug);
  2837. IF((%#sleep_inc%>=275)||(%#id_unbug%=0));
  2838. SET(parar);
  2839. BREAK;
  2840. ENDIF;
  2841. IF(%ZPOS%<609);
  2842. LOOK(SOUTH);
  2843. KEYDOWN(FORWARD);
  2844. UNSPRINT;
  2845. ELSEIF(%ZPOS%>609);
  2846. LOOK(NORTH);
  2847. KEYDOWN(FORWARD);
  2848. UNSPRINT;
  2849. ELSE;
  2850. KEYUP(FORWARD);
  2851. BREAK;
  2852. ENDIF;
  2853. LOOP;
  2854. DO;
  2855. INC(#sleep_inc,1);
  2856. GETIDREL(0,-1,0,#id_unbug);
  2857. IF((%#sleep_inc%>=275)||(%#id_unbug%=0));
  2858. SET(parar);
  2859. BREAK;
  2860. ENDIF;
  2861. IF(%XPOS%<-714);
  2862. LOOK(EAST);
  2863. KEYDOWN(FORWARD);
  2864. UNSPRINT;
  2865. ELSEIF(%XPOS%>-714);
  2866. LOOK(WEST);
  2867. KEYDOWN(FORWARD);
  2868. UNSPRINT;
  2869. ELSE;
  2870. LOOK(WEST);
  2871. KEYDOWN(LEFT);
  2872. IF(%ZPOS%=610);
  2873. WAIT(5T);
  2874. KEYUP(LEFT);
  2875. KEYUP(FORWARD);
  2876. BREAK;
  2877. ENDIF;
  2878. ENDIF;
  2879. LOOP;
  2880. IF(parar);
  2881. BREAK;
  2882. ENDIF;
  2883. ENDIF;
  2884. SET(#sleep_inc,"");
  2885. SET(#sleep_inc_two,"");
  2886. DO;
  2887. IF(%GUI%!="GUIINVENTORY");
  2888. GUI(INVENTORY);
  2889. ENDIF;
  2890. GETSLOT(%#sleep_id%,#sleep_slot);
  2891. IF(%#sleep_slot%=-1);
  2892. BREAK;
  2893. ELSE;
  2894. IF(%HIT%="PLAYER");
  2895. IF(esconder);
  2896. ECHO("/esconder");
  2897. UNSET(esconder);
  2898. ENDIF;
  2899. INC(#sleep_inc_two,1);
  2900. RANDOM(#sleep_time,200,20);
  2901. GUI();
  2902. DO;
  2903. GETIDREL(-2,1,0,#id_sign);
  2904. GETIDREL(0,3,0,#id_bloco_up);
  2905. GETIDREL(0,-1,0,#id_unbug);
  2906. LOOK(WEST);
  2907. IF(%#sleep_time%>=1);
  2908. IF(%#id_sign%=68);
  2909. KEYUP(SNEAK);
  2910. KEYUP(BACK);
  2911. IF(%HIT%="PLAYER");
  2912. ELSE;
  2913. SET(#sleep_time,"-1");
  2914. ENDIF;
  2915. ELSE;
  2916. KEYDOWN(SNEAK);
  2917. KEYDOWN(BACK);
  2918. ENDIF;
  2919. ELSEIF(%#sleep_time%<1);
  2920. KEYUP(SNEAK);
  2921. KEYDOWN(FORWARD);
  2922. IF(%#id_bloco_up%=112);
  2923. WAIT(5T);
  2924. KEYUP(FORWARD);
  2925. BREAK;
  2926. ENDIF;
  2927. ENDIF;
  2928. DEC(#sleep_time,1);
  2929. UNTIL((%#id_unbug%=0)||(%#sleep_time%<=-150));
  2930. IF((%#id_unbug%=0)||(%#sleep_time%<=-150));
  2931. SET(parar);
  2932. BREAK;
  2933. ENDIF;
  2934. ELSE;
  2935. SET(#sleep_inc_two,"");
  2936. GUI();
  2937. LOOK(WEST);
  2938. WAIT(%#delay_dropar%MS);
  2939. KEY(ATTACK);
  2940. WAIT(%#delay_dropar%MS);
  2941. ENDIF;
  2942. ENDIF;
  2943. GETIDREL(0,-1,0,#id_unbug);
  2944. INC(#sleep_inc,1);
  2945. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  2946. SET(parar);
  2947. BREAK;
  2948. ENDIF;
  2949. LOOP;
  2950. IF(parar);
  2951. BREAK;
  2952. ENDIF;
  2953. NEXT;
  2954. BREAK;
  2955. ELSE;
  2956. BREAK;
  2957. ENDIF;
  2958. LOOP;
  2959. ENDIF;
  2960. KEYUP(SNEAK);
  2961. KEYUP(RIGHT);
  2962. KEYUP(LEFT);
  2963. KEYUP(BACK);
  2964. KEYUP(FORWARD);
  2965. KEYUP(JUMP);
  2966. GUI();
  2967. INC(#sleep_inc_three,1);
  2968. IF((%#sleep_inc_three%>=3)&&(parar));
  2969. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, venda cancelada. &9&o#SLEEP");
  2970. BREAK;
  2971. ENDIF;
  2972. IF(parar);
  2973. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  2974. DO(6);
  2975. LOOK(%&sleep_look%);
  2976. KEYDOWN(BACK);
  2977. LOOP;
  2978. KEYUP(BACK);
  2979. ENDIF;
  2980. UNTIL(!parar);
  2981. DO(6);
  2982. LOOK(%&sleep_look%);
  2983. KEYDOWN(BACK);
  2984. LOOP;
  2985. KEYUP(BACK);
  2986. IF(%#sleep_inc_three%>=3);
  2987. FOR(#sleep_slot,9,44);
  2988. IF(%GUI%!="GUIINVENTORY");
  2989. GUI(INVENTORY);
  2990. ENDIF;
  2991. GETSLOTITEM(%#sleep_slot%,#sleep_id);
  2992. IF(%#sleep_id%>=2256);
  2993. DEC(#discos_inventory,1);
  2994. ENDIF;
  2995. NEXT;
  2996. GUI();
  2997. SET(sleep_ver_all);
  2998. SET(sleep_clean_inventory);
  2999. SET(venda_cancel);
  3000. ELSE;
  3001. LOG("&9&l[&f&oM&facro&9&l] &aVenda de discos concluída. &9&o#SLEEP");
  3002. UNSET(sleep_ver_all);
  3003. REPLACE(&tfarc_2,"9"," ");
  3004. REPLACE(&tfarc_2,"8","");
  3005. WAIT(2T);
  3006. ENDIF;
  3007. INC(#discos_vendidos,%#discos_inventory%);
  3008. SET(#discos_inventory,"");
  3009. SET(unbug);
  3010. ENDIF;
  3011. IF((vender_peixe)&&(%#peixes_inventory%>=%#peixes_min_venda%)&&(%#itens_inventory_armazem%>=%#itens_min_armazem%));
  3012. SET(esconder);
  3013. SET(#sleep_inc_three,"");
  3014. IF((vender_disco)&&(unbug));
  3015. IF((%#vender_disco%=1)&&(%#vender_peixe%=1));
  3016. SET(#sleep_homes,"1");
  3017. ELSEIF((%#vender_disco%=2)&&(%#vender_peixe%=2));
  3018. SET(#sleep_homes,"1");
  3019. ELSE;
  3020. SET(#sleep_homes,"2");
  3021. ENDIF;
  3022. ELSE;
  3023. SET(#sleep_homes,"2");
  3024. ENDIF;
  3025. DO;
  3026. UNSET(parar);
  3027. DO(%#sleep_homes%);
  3028. DO;
  3029. UNSET(@sleepteleport);
  3030. WAIT(2T);
  3031. SET(#sleep_inc,"");
  3032. IF(%#vender_peixe%=1);
  3033. }$$/warp vip$${
  3034. ELSE;
  3035. }$$/home sleeppeixe$${
  3036. ENDIF;
  3037. DO(250);
  3038. GETIDREL(0,-1,0,#sleepteleport);
  3039. IF(%#sleepteleport%=57);
  3040. INC(#sleep_inc,1);
  3041. ELSE;
  3042. SET(#sleep_inc,"");
  3043. ENDIF;
  3044. UNTIL((@sleepteleport)||(%#sleep_inc%=47));
  3045. IF(%#sleep_inc%=47);
  3046. BREAK;
  3047. ELSE;
  3048. WAIT(2T);
  3049. ENDIF;
  3050. WHILE(!@sleepteleport);
  3051. UNTIL(%#sleep_inc%=47);
  3052. DO;
  3053. GETIDREL(0,-1,0,#sleep_id);
  3054. WHILE(%#sleep_id%=0);
  3055. UNSET(menuloja);
  3056. SET(#sleep_homes,"1");
  3057. IF(%#vender_peixe%=1);
  3058. IF(warp_vip_nova);
  3059. SET(#sleep_inc,"");
  3060. SET(&sleep_look,"EAST");
  3061. DO;
  3062. GUI();
  3063. IF(%ZPOS%=672);
  3064. IF(!menuloja);
  3065. ECHO("/menuloja off");
  3066. SET(menuloja);
  3067. ENDIF;
  3068. LOOK(EAST);
  3069. KEYDOWN(FORWARD);
  3070. UNSPRINT;
  3071. KEYDOWN(JUMP);
  3072. KEYUP(SNEAK);
  3073. ELSEIF(%ZPOS%>=670);
  3074. LOOK(EAST);
  3075. LOOK(+30,+0);
  3076. KEYDOWN(FORWARD);
  3077. UNSPRINT;
  3078. KEYUP(JUMP);
  3079. KEYDOWN(SNEAK);
  3080. ELSE;
  3081. LOOK(EAST);
  3082. LOOK(+30,+0);
  3083. KEYDOWN(FORWARD);
  3084. UNSPRINT;
  3085. KEYDOWN(JUMP);
  3086. ENDIF;
  3087. GETIDREL(0,-3,0,#id_unbug);
  3088. GETIDREL(0,0,5,#id_escada);
  3089. INC(#sleep_inc,1);
  3090. IF(%#id_escada%=53);
  3091. KEYUP(SNEAK);
  3092. KEYUP(JUMP);
  3093. WAIT(10T);
  3094. KEYUP(FORWARD);
  3095. SET(#sleep_inc,"");
  3096. SET(#sleep_inc_two,"");
  3097. SET(&y_sleep,"+0");
  3098. SET(&p_sleep,"+0");
  3099. IF(%#sleep_inc_three%=0);
  3100. REPLACE(&tfarc_3,"9"," ");
  3101. REPLACE(&tfarc_3,"8","");
  3102. ENDIF;
  3103. DO;
  3104. LOOK(EAST);
  3105. LOOK(%&y_sleep%,%&p_sleep%);
  3106. #sleep_getslot = 9;
  3107. UNSET(peixe);
  3108. DO;
  3109. IF(%GUI%!="GUIINVENTORY");
  3110. GUI(INVENTORY);
  3111. ENDIF;
  3112. GETSLOT(349,#sleep_slot,%#sleep_getslot%);
  3113. IF(%#sleep_slot%=-1);
  3114. BREAK;
  3115. ELSE;
  3116. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  3117. IF(%#sleep_stack%=64);
  3118. SET(peixe);
  3119. ELSE;
  3120. #sleep_getslot = %#sleep_slot% + 1;
  3121. ENDIF;
  3122. ENDIF;
  3123. UNTIL(peixe);
  3124. IF(peixe);
  3125. IF(%HIT%="PLAYER");
  3126. IF(esconder);
  3127. ECHO("/esconder");
  3128. UNSET(esconder);
  3129. ENDIF;
  3130. INC(#sleep_inc_two,1);
  3131. RANDOM(#sleep_time,200,20);
  3132. IF(%ZPOS%=672);
  3133. SET(&keydown,"RIGHT");
  3134. SET(#pos_stop,"673");
  3135. SET(&y_sleep,"-55");
  3136. SET(&p_sleep,"+0");
  3137. ELSEIF(%ZPOS%=673);
  3138. SET(&keydown,"LEFT");
  3139. SET(#pos_stop,"671");
  3140. SET(&y_sleep,"+55");
  3141. SET(&p_sleep,"+0");
  3142. ELSEIF(%ZPOS%=671);
  3143. SET(&keydown,"RIGHT");
  3144. SET(#pos_stop,"672");
  3145. SET(&y_sleep,"+0");
  3146. SET(&p_sleep,"+0");
  3147. ENDIF;
  3148. GUI();
  3149. DO(50);
  3150. LOOK(EAST);
  3151. KEYDOWN(%&keydown%);
  3152. KEYDOWN(SNEAK);
  3153. UNTIL(%ZPOS%=%#pos_stop%);
  3154. KEYUP(SNEAK);
  3155. KEYUP(%&keydown%);
  3156. DO(50);
  3157. LOOK(EAST);
  3158. KEYDOWN(BACK);
  3159. KEYDOWN(SNEAK);
  3160. UNTIL(%XPOS%=734);
  3161. DO;
  3162. LOOK(EAST);
  3163. KEYUP(SNEAK);
  3164. KEYUP(BACK);
  3165. DEC(#sleep_time,1);
  3166. GETIDREL(2,-1,0,#id_unbug);
  3167. IF(%HIT%="PLAYER");
  3168. ELSE;
  3169. SET(#sleep_time,"-1");
  3170. ENDIF;
  3171. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=89));
  3172. IF(%#id_unbug%=89);
  3173. DO(50);
  3174. LOOK(EAST);
  3175. KEYDOWN(FORWARD);
  3176. UNTIL(%XPOS%=736);
  3177. WAIT(10T);
  3178. KEYUP(FORWARD);
  3179. ELSE;
  3180. SET(parar);
  3181. BREAK;
  3182. ENDIF;
  3183. ELSE;
  3184. SET(#sleep_inc_two,"");
  3185. GUI();
  3186. LOOK(EAST);
  3187. LOOK(%&y_sleep%,%&p_sleep%);
  3188. WAIT(%#delay_dropar%MS);
  3189. KEY(ATTACK);
  3190. WAIT(%#delay_dropar%MS);
  3191. ENDIF;
  3192. ELSE;
  3193. BREAK;
  3194. ENDIF;
  3195. GETIDREL(0,-1,0,#id_unbug);
  3196. INC(#sleep_inc,1);
  3197. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  3198. SET(parar);
  3199. BREAK;
  3200. ENDIF;
  3201. LOOP;
  3202. IF((parar)||(!peixe));
  3203. BREAK;
  3204. ENDIF;
  3205. ENDIF;
  3206. IF((%#sleep_inc%>=370)||(%#id_unbug%=0));
  3207. SET(parar);
  3208. BREAK;
  3209. ENDIF;
  3210. LOOP;
  3211. ELSE;
  3212. SET(#sleep_inc,"");
  3213. SET(&sleep_look,"SOUTH");
  3214. DO;
  3215. GUI();
  3216. IF(%XPOS%=721);
  3217. LOOK(SOUTH);
  3218. GETIDREL(0,-3,0,#id_unbug);
  3219. ELSEIF(%ZPOS%>=665);
  3220. LOOK(EAST);
  3221. GETIDREL(0,-2,0,#id_unbug);
  3222. ELSE;
  3223. LOOK(SOUTH);
  3224. GETIDREL(0,-2,0,#id_unbug);
  3225. ENDIF;
  3226. KEYDOWN(FORWARD);
  3227. UNSPRINT;
  3228. IF((%DIRECTION%="E")&&(%XPOS%>=718));
  3229. KEYUP(JUMP);
  3230. KEYDOWN(SNEAK);
  3231. IF(!menuloja);
  3232. ECHO("/menuloja off");
  3233. SET(menuloja);
  3234. ENDIF;
  3235. ELSEIF((%DIRECTION%="S")&&(%ZPOS%>=671));
  3236. KEYUP(JUMP);
  3237. KEYDOWN(SNEAK);
  3238. ELSE;
  3239. KEYDOWN(JUMP);
  3240. ENDIF;
  3241. GETIDREL(-1,1,-5,#id_escada);
  3242. INC(#sleep_inc,1);
  3243. IF(%#id_escada%=53);
  3244. KEYUP(SNEAK);
  3245. KEYUP(JUMP);
  3246. WAIT(10T);
  3247. KEYUP(FORWARD);
  3248. SET(#sleep_inc,"");
  3249. SET(#sleep_inc_two,"");
  3250. SET(&y_sleep,"180");
  3251. SET(&p_sleep,"274");
  3252. IF(%#sleep_inc_three%=0);
  3253. REPLACE(&tfarc_3,"9"," ");
  3254. REPLACE(&tfarc_3,"8","");
  3255. ENDIF;
  3256. DO;
  3257. LOOK(%&y_sleep%,%&p_sleep%);
  3258. #sleep_getslot = 9;
  3259. UNSET(peixe);
  3260. DO;
  3261. IF(%GUI%!="GUIINVENTORY");
  3262. GUI(INVENTORY);
  3263. ENDIF;
  3264. GETSLOT(349,#sleep_slot,%#sleep_getslot%);
  3265. IF(%#sleep_slot%=-1);
  3266. BREAK;
  3267. ELSE;
  3268. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  3269. IF(%#sleep_stack%=64);
  3270. SET(peixe);
  3271. ELSE;
  3272. #sleep_getslot = %#sleep_slot% + 1;
  3273. ENDIF;
  3274. ENDIF;
  3275. UNTIL(peixe);
  3276. IF(peixe);
  3277. IF(%HIT%="PLAYER");
  3278. IF(esconder);
  3279. ECHO("/esconder");
  3280. UNSET(esconder);
  3281. ENDIF;
  3282. INC(#sleep_inc_two,1);
  3283. RANDOM(#sleep_time,200,20);
  3284. IF(%XPOS%=721);
  3285. SET(&keydown,"RIGHT");
  3286. SET(#pos_stop,"720");
  3287. SET(&y_sleep,"106");
  3288. SET(&p_sleep,"283");
  3289. ELSEIF(%XPOS%=720);
  3290. SET(&keydown,"LEFT");
  3291. SET(#pos_stop,"722");
  3292. SET(&y_sleep,"252");
  3293. SET(&p_sleep,"284");
  3294. ELSEIF(%XPOS%=722);
  3295. SET(&keydown,"RIGHT");
  3296. SET(#pos_stop,"721");
  3297. SET(&y_sleep,"180");
  3298. SET(&p_sleep,"274");
  3299. ENDIF;
  3300. GUI();
  3301. DO(50);
  3302. LOOK(SOUTH);
  3303. KEYDOWN(%&keydown%);
  3304. KEYDOWN(SNEAK);
  3305. UNTIL(%XPOS%=%#pos_stop%);
  3306. KEYUP(SNEAK);
  3307. KEYUP(%&keydown%);
  3308. DO(50);
  3309. LOOK(SOUTH);
  3310. KEYDOWN(BACK);
  3311. KEYDOWN(SNEAK);
  3312. UNTIL(%ZPOS%=672);
  3313. DO;
  3314. LOOK(SOUTH);
  3315. KEYUP(SNEAK);
  3316. KEYUP(BACK);
  3317. DEC(#sleep_time,1);
  3318. GETIDREL(0,0,3,#id_unbug);
  3319. IF(%HIT%="PLAYER");
  3320. ELSE;
  3321. SET(#sleep_time,"-1");
  3322. ENDIF;
  3323. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=45));
  3324. IF(%#id_unbug%=45);
  3325. DO(50);
  3326. LOOK(SOUTH);
  3327. KEYDOWN(FORWARD);
  3328. UNTIL(%ZPOS%=674);
  3329. WAIT(10T);
  3330. KEYUP(FORWARD);
  3331. ELSE;
  3332. SET(parar);
  3333. BREAK;
  3334. ENDIF;
  3335. ELSE;
  3336. SET(#sleep_inc_two,"");
  3337. GUI();
  3338. LOOK(%&y_sleep%,%&p_sleep%);
  3339. WAIT(%#delay_dropar%MS);
  3340. KEY(ATTACK);
  3341. WAIT(%#delay_dropar%MS);
  3342. ENDIF;
  3343. ELSE;
  3344. BREAK;
  3345. ENDIF;
  3346. GETIDREL(0,-1,0,#id_unbug);
  3347. INC(#sleep_inc,1);
  3348. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  3349. SET(parar);
  3350. BREAK;
  3351. ENDIF;
  3352. LOOP;
  3353. IF((parar)||(!peixe));
  3354. BREAK;
  3355. ENDIF;
  3356. ENDIF;
  3357. IF((%#sleep_inc%>=370)||(%#id_unbug%=0));
  3358. SET(parar);
  3359.  
  3360. BREAK;
  3361. ENDIF;
  3362. LOOP;
  3363. ENDIF;
  3364. ELSE;
  3365. SET(#sleep_inc,"");
  3366. SET(&sleep_look,"NORTH");
  3367. DO;
  3368. DO(2);
  3369. DO;
  3370. INC(#sleep_inc,1);
  3371. GETIDREL(0,-1,0,#id_unbug);
  3372. IF((%#sleep_inc%>=200)||(%#id_unbug%=0));
  3373. SET(parar);
  3374. BREAK;
  3375. ENDIF;
  3376. IF(%XPOS%<-658);
  3377. LOOK(EAST);
  3378. KEYDOWN(FORWARD);
  3379. KEYDOWN(SNEAK);
  3380. UNSPRINT;
  3381. ELSEIF(%XPOS%>-658);
  3382. LOOK(WEST);
  3383. KEYDOWN(FORWARD);
  3384. KEYDOWN(SNEAK);
  3385. UNSPRINT;
  3386. ELSE;
  3387. IF(!menuloja);
  3388. ECHO("/menuloja off");
  3389. SET(menuloja);
  3390. ENDIF;
  3391. WAIT(1MS);
  3392. KEYUP(FORWARD);
  3393. KEYUP(SNEAK);
  3394. BREAK;
  3395. ENDIF;
  3396. LOOP;
  3397. DO;
  3398. INC(#sleep_inc,1);
  3399. GETIDREL(0,-1,0,#id_unbug);
  3400. IF((%#sleep_inc%>=200)||(%#id_unbug%=0));
  3401. SET(parar);
  3402. BREAK;
  3403. ENDIF;
  3404. IF(%ZPOS%<605);
  3405. LOOK(SOUTH);
  3406. KEYDOWN(FORWARD);
  3407. UNSPRINT;
  3408. ELSEIF(%ZPOS%>605);
  3409. LOOK(NORTH);
  3410. KEYDOWN(FORWARD);
  3411. UNSPRINT;
  3412. ELSE;
  3413. WAIT(3T);
  3414. KEYUP(FORWARD);
  3415. KEYUP(SNEAK);
  3416. BREAK;
  3417. ENDIF;
  3418. LOOP;
  3419. LOOP;
  3420. IF(!parar);
  3421. SET(#sleep_inc,"");
  3422. SET(#sleep_inc_two,"");
  3423. IF(%#sleep_inc_three%=0);
  3424. REPLACE(&tfarc_3,"9"," ");
  3425. REPLACE(&tfarc_3,"8","");
  3426. ENDIF;
  3427. GETIDREL(0,0,0,#placa_dinamica);
  3428. IF(%#placa_dinamica%!=68);
  3429. SET(&y_sleep,"0");
  3430. SET(&p_sleep,"0");
  3431. ELSE;
  3432. SET(&y_sleep,"+0");
  3433. SET(&p_sleep,"+79");
  3434. ENDIF;
  3435. DO;
  3436. LOOK(NORTH);
  3437. LOOK(%&y_sleep%,%&p_sleep%);
  3438. #sleep_getslot = 9;
  3439. UNSET(peixe);
  3440. DO;
  3441. IF(%GUI%!="GUIINVENTORY");
  3442. GUI(INVENTORY);
  3443. ENDIF;
  3444. GETSLOT(349,#sleep_slot,%#sleep_getslot%);
  3445. IF(%#sleep_slot%=-1);
  3446. BREAK;
  3447. ELSE;
  3448. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  3449. IF(%#sleep_stack%=64);
  3450. SET(peixe);
  3451. ELSE;
  3452. #sleep_getslot = %#sleep_slot% + 1;
  3453. ENDIF;
  3454. ENDIF;
  3455. UNTIL(peixe);
  3456. IF(peixe);
  3457. IF(%HIT%="PLAYER");
  3458. IF(esconder);
  3459. ECHO("/esconder");
  3460. UNSET(esconder);
  3461. ENDIF;
  3462. INC(#sleep_inc_two,1);
  3463. RANDOM(#sleep_time,200,20);
  3464. IF(%XPOS%=-658);
  3465. SET(&keydown,"RIGHT");
  3466. SET(#pos_stop,"-657");
  3467. IF(%#placa_dinamica%!=68);
  3468. SET(&y_sleep,"305");
  3469. SET(&p_sleep,"2");
  3470. ELSE;
  3471. SET(&y_sleep,"-66");
  3472. SET(&p_sleep,"+66");
  3473. ENDIF;
  3474. ELSEIF(%XPOS%=-657);
  3475. SET(&keydown,"LEFT");
  3476. SET(#pos_stop,"-659");
  3477. IF(%#placa_dinamica%!=68);
  3478. SET(&y_sleep,"58");
  3479. SET(&p_sleep,"0");
  3480. ELSE;
  3481. SET(&y_sleep,"+66");
  3482. SET(&p_sleep,"+66");
  3483. ENDIF;
  3484. ELSEIF(%XPOS%=-659);
  3485. SET(&keydown,"RIGHT");
  3486. SET(#pos_stop,"-658");
  3487. IF(%#placa_dinamica%!=68);
  3488. SET(&y_sleep,"0");
  3489. SET(&p_sleep,"0");
  3490. ELSE;
  3491. SET(&y_sleep,"+0");
  3492. SET(&p_sleep,"+79");
  3493. ENDIF;
  3494. ENDIF;
  3495. GUI();
  3496. DO(50);
  3497. LOOK(NORTH);
  3498. KEYDOWN(%&keydown%);
  3499. KEYDOWN(SNEAK);
  3500. UNTIL(%XPOS%=%#pos_stop%);
  3501. KEYUP(SNEAK);
  3502. KEYUP(%&keydown%);
  3503. DO(50);
  3504. LOOK(NORTH);
  3505. KEYDOWN(BACK);
  3506. KEYDOWN(SNEAK);
  3507. UNTIL(%ZPOS%=607);
  3508. DO;
  3509. LOOK(NORTH);
  3510. KEYUP(SNEAK);
  3511. KEYUP(BACK);
  3512. DEC(#sleep_time,1);
  3513. GETIDREL(0,-1,7,#id_unbug);
  3514. IF(%HIT%="PLAYER");
  3515. ELSE;
  3516. SET(#sleep_time,"-1");
  3517. ENDIF;
  3518. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=124));
  3519. IF(%#id_unbug%=124);
  3520. DO(50);
  3521. LOOK(NORTH);
  3522. KEYDOWN(FORWARD);
  3523. UNTIL(%ZPOS%=605);
  3524. WAIT(10T);
  3525. KEYUP(FORWARD);
  3526. ELSE;
  3527. SET(parar);
  3528. BREAK;
  3529. ENDIF;
  3530. ELSE;
  3531. SET(#sleep_inc_two,"");
  3532. GUI();
  3533. LOOK(NORTH);
  3534. LOOK(%&y_sleep%,%&p_sleep%);
  3535. WAIT(%#delay_dropar%MS);
  3536. KEY(ATTACK);
  3537. WAIT(%#delay_dropar%MS);
  3538. ENDIF;
  3539. ELSE;
  3540. BREAK;
  3541. ENDIF;
  3542. GETIDREL(0,-1,0,#id_unbug);
  3543. INC(#sleep_inc,1);
  3544. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  3545. SET(parar);
  3546. BREAK;
  3547. ENDIF;
  3548. LOOP;
  3549. IF((parar)||(!peixe));
  3550. BREAK;
  3551. ENDIF;
  3552. ELSE;
  3553. BREAK;
  3554. ENDIF;
  3555. LOOP;
  3556. ENDIF;
  3557. KEYUP(SNEAK);
  3558. KEYUP(RIGHT);
  3559. KEYUP(LEFT);
  3560. KEYUP(BACK);
  3561. KEYUP(FORWARD);
  3562. KEYUP(JUMP);
  3563. GUI();
  3564. INC(#sleep_inc_three,1);
  3565. IF((%#sleep_inc_three%>=3)&&(parar));
  3566. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, venda cancelada. &9&o#SLEEP");
  3567. BREAK;
  3568. ENDIF;
  3569. IF(parar);
  3570. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  3571. DO(6);
  3572. LOOK(%&sleep_look%);
  3573. KEYDOWN(BACK);
  3574. LOOP;
  3575. KEYUP(BACK);
  3576. ENDIF;
  3577. UNTIL(!parar);
  3578. DO(6);
  3579. LOOK(%&sleep_look%);
  3580. KEYDOWN(BACK);
  3581. LOOP;
  3582. KEYUP(BACK);
  3583. IF(%#sleep_inc_three%>=3);
  3584. FOR(#sleep_slot,9,44);
  3585. IF(%GUI%!="GUIINVENTORY");
  3586. GUI(INVENTORY);
  3587. ENDIF;
  3588. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  3589. IF((%#sleep_id%=349)&&(%#sleep_stack%=64));
  3590. DEC(#peixes_inventory,1);
  3591. ENDIF;
  3592. NEXT;
  3593. GUI();
  3594. ELSE;
  3595. LOG("&9&l[&f&oM&facro&9&l] &aVenda de peixes concluída. &9&o#SLEEP");
  3596. REPLACE(&tfarc_4,"9"," ");
  3597. REPLACE(&tfarc_4,"8","");
  3598. IF(!venda_cancel);
  3599. UNSET(sleep_ver_all);
  3600. ENDIF;
  3601. WAIT(2T);
  3602. ENDIF;
  3603. INC(#peixes_vendidos,%#peixes_inventory%);
  3604. SET(#peixes_inventory,"");
  3605. SET(unbug);
  3606. ENDIF;
  3607. IF(!unbug);
  3608. IF((reabastecer_linha)||(reabastecer_vara));
  3609. SET(#chest_reab_inc,"1");
  3610. IF(reabastecer_vara);
  3611. UNSET(reabastecer_vara);
  3612. SET(&sleep_name_reab,"vara");
  3613. SET(sleep_ver_vara);
  3614. SET(#sleep_id_reab,"346");
  3615. SET(#sleep_quant,"1");
  3616. ELSE;
  3617. UNSET(reabastecer_linha);
  3618. SET(sleep_ver_linha);
  3619. SET(&sleep_name_reab,"linha");
  3620. SET(#sleep_id_reab,"287");
  3621. IF(%#pack_linha_min%=35);
  3622. SET(#sleep_quant,"18");
  3623. ELSE;
  3624. SET(#sleep_quant,"%#pack_linha_min%");
  3625. ENDIF;
  3626. ENDIF;
  3627. SET(#itens_reab,"");
  3628. UNSET(comprar_linha);
  3629. DO;
  3630. LOG("&9&l[&f&oM&facro&9&l] &aBaú de reabastecimento número &2%#chest_reab_inc%&a. &9&o#SLEEP");
  3631. GUI();
  3632. SET(stop);
  3633. SET(#sleep_inc_two,"");
  3634. DO;
  3635. IF(%#sleep_inc_two%>=3);
  3636. DO(2);
  3637. LOOK(0,270);
  3638. PICK(346);
  3639. WAIT(%#delay_dropar%MS);
  3640. KEY(USE);
  3641. WAIT(%#delay_dropar%MS);
  3642. LOOP;
  3643. ENDIF;
  3644. IF(%#chest_reab_inc%=1);
  3645. LOOK(NORTH);
  3646. ELSEIF(%#chest_reab_inc%=2);
  3647. LOOK(EAST);
  3648. ELSEIF(%#chest_reab_inc%=3);
  3649. LOOK(SOUTH);
  3650. ELSEIF(%#chest_reab_inc%=4);
  3651. LOOK(WEST);
  3652. ENDIF;
  3653. LOOK(+0,+63);
  3654. LOOKS(+0,+2,1);
  3655. WAIT(1T);
  3656. KEY(USE);
  3657. SET(#sleep_inc,"");
  3658. DO;
  3659. INC(#sleep_inc,1);
  3660. UNTIL((%GUI%="GUICHEST")||(%#sleep_inc%=300));
  3661. INC(#sleep_inc_two,1);
  3662. WHILE(%GUI%!="GUICHEST");
  3663. WAIT(10T);
  3664. DO;
  3665. IF(%&sleep_name_reab%="vara");
  3666. PICK(346);
  3667. IF(%ITEM%=346);
  3668. SET(stop);
  3669. BREAK;
  3670. ENDIF;
  3671. ENDIF;
  3672. IF(%GUI%!="GUICHEST");
  3673. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, reabrindo baú. &9&o#SLEEP");
  3674. UNSET(stop);
  3675. BREAK;
  3676. ENDIF;
  3677. GETSLOT(%#sleep_id_reab%,#sleep_slot);
  3678. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<54));
  3679. UNSET(clicar);
  3680. IF(%&sleep_name_reab%="linha");
  3681. SET(#linha_fix_bug,"");
  3682. SET(#sleep_getslot,"54");
  3683. DO;
  3684. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,%#sleep_getslot%);
  3685. IF(%#slot_fix_bug%=-1);
  3686. BREAK;
  3687. ELSE;
  3688. INC(#linha_fix_bug,1);
  3689. #sleep_getslot = %#slot_fix_bug% + 1;
  3690. ENDIF;
  3691. LOOP;
  3692. IF(%#linha_fix_bug%<%#pack_linha_min%);
  3693. SET(clicar);
  3694. ENDIF;
  3695. ELSE;
  3696. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,54);
  3697. IF(%#slot_fix_bug%=-1);
  3698. SET(clicar);
  3699. ENDIF;
  3700. ENDIF;
  3701. IF(clicar);
  3702. SLOTCLICK(%#sleep_slot%,L,TRUE);
  3703. WAIT(%#delay_dropar%MS);
  3704. ENDIF;
  3705. INC(#itens_reab,1);
  3706. ELSE;
  3707. IF(%#chest_reab_inc%<4);
  3708. INC(#chest_reab_inc,1);
  3709. UNSET(stop);
  3710. BREAK;
  3711. ELSEIF(%#chest_reab_inc%=4);
  3712. IF(%#itens_reab%=0);
  3713. LOG("");
  3714. IF(%&sleep_name_reab%="linha");
  3715. LOG("&9&l[&f&oM&facro&9&l] &cNenhuma %&sleep_name_reab% encontrada, compra habilitada. &9&o#SLEEP");
  3716. SET(comprar_linha);
  3717. ELSE;
  3718. LOG("&9&l[&f&oM&facro&9&l] &cNenhuma %&sleep_name_reab% encontrada, busca reiniciada. &9&o#SLEEP");
  3719. SET(#chest_reab_inc,"1");
  3720. UNSET(stop);
  3721. ENDIF;
  3722. LOG("");
  3723. BREAK;
  3724. ELSE;
  3725. SET(stop);
  3726. BREAK;
  3727. ENDIF;
  3728. ENDIF;
  3729. ENDIF;
  3730. DEC(#sleep_quant,1);
  3731. IF((%#sleep_quant%=0)&&(reabastecer_linha));
  3732. SET(#chest_reab_inc,"1");
  3733. SET(#itens_reab,"");
  3734. UNSET(reabastecer_linha);
  3735. SET(sleep_ver_linha);
  3736. SET(&sleep_name_reab,"linha");
  3737. SET(#sleep_id_reab,"287");
  3738. IF(%#pack_linha_min%=35);
  3739. SET(#sleep_quant,"18");
  3740. ELSE;
  3741. SET(#sleep_quant,"%#pack_linha_min%");
  3742. ENDIF;
  3743. UNSET(stop);
  3744. BREAK;
  3745. ENDIF;
  3746. UNTIL(%#sleep_quant%=0);
  3747. WAIT(3T);
  3748. UNTIL(stop);
  3749. SET(unbug);
  3750. GUI();
  3751. IF(!comprar_linha);
  3752. LOG("&9&l[&f&oM&facro&9&l] &aReabastecimento concluído. &9&o#SLEEP");
  3753. ENDIF;
  3754. ENDIF;
  3755. ENDIF;
  3756. IF(comprar_linha);
  3757. SET(esconder);
  3758. SET(#sleep_inc_three,"");
  3759. UNSET(comprar_linha);
  3760. IF(%#pack_linha_min%=35);
  3761. SET(#sleep_quant,"18");
  3762. ELSE;
  3763. SET(#sleep_quant,"%#pack_linha_min%");
  3764. ENDIF;
  3765. DO;
  3766. SET(fim);
  3767. DO(2);
  3768. DO;
  3769. UNSET(@sleepteleport);
  3770. }$$/warp loja$${
  3771. GUI();
  3772. SET(#sleep_inc,"");
  3773. WAIT(40T);
  3774. DO(350);
  3775. GETIDREL(0,-1,0,#sleep_id);
  3776. IF((%XPOS%=%#xpos_pesqueiro%)&&(%YPOS%=%#ypos_pesqueiro%)&&(%ZPOS%=%#zpos_pesqueiro%));
  3777. UNSET(ok);
  3778. ELSE;
  3779. SET(ok);
  3780. ENDIF;
  3781. GETIDREL(0,-1,0,#sleepteleport);
  3782. IF(%#sleepteleport%=4);
  3783. INC(#sleep_inc,1);
  3784. IF(%#sleep_inc%=47);
  3785. SET(@sleepteleport);
  3786. ENDIF;
  3787. ELSE;
  3788. SET(#sleep_inc,"");
  3789. ENDIF;
  3790. UNTIL((%#sleep_id%=4)&&(ok)&&(%YPOS%=6)&&(@sleepteleport));
  3791. WHILE(!@sleepteleport);
  3792. UNTIL(%#sleep_inc%=47);
  3793. UNSET(cancelar_compra);
  3794. UNSET(menuloja);
  3795. SET(#slots_vazios,"");
  3796. SET(#getslot,"9");
  3797. DO;
  3798. IF(%GUI%!="GUIINVENTORY");
  3799. GUI(INVENTORY);
  3800. ENDIF;
  3801. GETSLOT(0,#verificar_slot_vazio,%#getslot%);
  3802. IF(%#verificar_slot_vazio%!=-1);
  3803. INC(#slots_vazios,1);
  3804. #getslot = %#verificar_slot_vazio% + 1;
  3805. ELSE;
  3806. BREAK;
  3807. ENDIF;
  3808. UNTIL(%#slots_vazios%=%#sleep_quant%);
  3809. GUI();
  3810. IF(%#slots_vazios%=%#sleep_quant%);
  3811. SET(#sleep_time,"");
  3812. SET(#passos,"1");
  3813. DO;
  3814. UNSET(sleep_zpos);
  3815. UNSET(sleep_xpos);
  3816. IF(%#passos%=1);
  3817. SET(&sleep_look,"NORTH");
  3818. SET(sleep_zpos);
  3819. SET(#sleep_coord,"697");
  3820. SET(#sleep_coord_sneak,"699");
  3821. SET(&sleep_move,"FORWARD");
  3822. ELSEIF(%#passos%=2);
  3823. SET(&sleep_look,"NORTH");
  3824. SET(sleep_xpos);
  3825. SET(#sleep_coord,"-679");
  3826. SET(#sleep_coord_sneak,"-677");
  3827. SET(&sleep_move,"LEFT");
  3828. ELSEIF(%#passos%=3);
  3829. SET(&sleep_look,"NORTH");
  3830. SET(sleep_zpos);
  3831. SET(#sleep_coord,"673");
  3832. SET(#sleep_coord_sneak,"675");
  3833. SET(&sleep_move,"FORWARD");
  3834. ELSEIF(%#passos%=4);
  3835. SET(&sleep_look,"NORTH");
  3836. SET(sleep_xpos);
  3837. SET(#sleep_coord,"-685");
  3838. SET(#sleep_coord_sneak,"-683");
  3839. SET(&sleep_move,"LEFT");
  3840. ELSEIF(%#passos%=5);
  3841. SET(&sleep_look,"NORTH");
  3842. SET(sleep_zpos);
  3843. SET(#sleep_coord,"662");
  3844. SET(#sleep_coord_sneak,"664");
  3845. SET(&sleep_move,"FORWARD");
  3846. ELSEIF(%#passos%=6);
  3847. SET(&sleep_look,"SOUTH");
  3848. SET(sleep_xpos);
  3849. SET(#sleep_coord,"-698");
  3850. SET(#sleep_coord_sneak,"-696");
  3851. SET(&sleep_move,"RIGHT");
  3852. ELSEIF(%#passos%=7);
  3853. IF(!menuloja);
  3854. ECHO("/menuloja off");
  3855. SET(menuloja);
  3856. ENDIF;
  3857. SET(&sleep_look,"SOUTH");
  3858. SET(sleep_zpos);
  3859. SET(#sleep_coord,"675");
  3860. SET(&sleep_move,"FORWARD");
  3861. ENDIF;
  3862. INC(#sleep_time,1);
  3863. IF(%#sleep_time%=600);
  3864. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema pode estar acontecendo... &9&o#SLEEP");
  3865. ELSEIF(%#sleep_time%=1200);
  3866. UNSET(fim);
  3867. BREAK;
  3868. ENDIF;
  3869. LOOK(%&sleep_look%);
  3870. KEYDOWN(%&sleep_move%);
  3871. SPRINT;
  3872. IF(sleep_xpos);
  3873. IF(%XPOS%=%#sleep_coord%);
  3874. KEYUP(%&sleep_move%);
  3875. KEYUP(SNEAK);
  3876. INC(#passos,1);
  3877. ELSEIF(%XPOS%<=%#sleep_coord_sneak%);
  3878. KEYDOWN(SNEAK);
  3879. ELSE;
  3880. KEYUP(SNEAK);
  3881. ENDIF;
  3882. ELSEIF(sleep_zpos);
  3883. IF(%ZPOS%=%#sleep_coord%);
  3884. IF(%#passos%<=7);
  3885. KEYUP(%&sleep_move%);
  3886. KEYUP(SNEAK);
  3887. INC(#passos,1);
  3888. ENDIF;
  3889. ELSEIF(%ZPOS%<=%#sleep_coord_sneak%);
  3890. KEYDOWN(SNEAK);
  3891. ELSE;
  3892. KEYUP(SNEAK);
  3893. ENDIF;
  3894. ENDIF;
  3895. UNTIL((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  3896. IF((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  3897. KEYDOWN(%&sleep_move%);
  3898. WAIT(10T);
  3899. ENDIF;
  3900. KEYUP(%&sleep_move%);
  3901. KEYUP(SNEAK);
  3902. SET(#sleep_inc,"");
  3903. SET(#sleep_inc_two,"");
  3904. IF(fim);
  3905. IF(%#sleep_inc_three%=0);
  3906. REPLACE(&tfarc_5,"9"," ");
  3907. REPLACE(&tfarc_5,"8","");
  3908. INC(#sleep_inc_three,1);
  3909. ENDIF;
  3910. GETIDREL(0,0,0,#placa_dinamica);
  3911. IF(%#placa_dinamica%!=68);
  3912. SET(&y_sleep,"180");
  3913. SET(&p_sleep,"0");
  3914. ELSE;
  3915. SET(&y_sleep,"+0");
  3916. SET(&p_sleep,"+79");
  3917. ENDIF;
  3918. DO;
  3919. LOOK(SOUTH);
  3920. LOOK(%&y_sleep%,%&p_sleep%);
  3921. SET(#linhas_inventory,"");
  3922. #sleep_getslot = 9;
  3923. UNSET(linha);
  3924. DO;
  3925. IF(%GUI%!="GUIINVENTORY");
  3926. GUI(INVENTORY);
  3927. ENDIF;
  3928. GETSLOT(287,#sleep_slot,%#sleep_getslot%);
  3929. IF((%#sleep_slot%=-1)||(%#linhas_inventory%>=%#sleep_quant%));
  3930. BREAK;
  3931. ELSE;
  3932. INC(#linhas_inventory,1);
  3933. #sleep_getslot = %#sleep_slot% + 1;
  3934. ENDIF;
  3935. LOOP;
  3936. IF(%#linhas_inventory%<%#sleep_quant%);
  3937. SET(linha);
  3938. ENDIF;
  3939. IF(linha);
  3940. IF(%HIT%="PLAYER");
  3941. IF(esconder);
  3942. ECHO("/esconder");
  3943. UNSET(esconder);
  3944. ENDIF;
  3945. INC(#sleep_inc_two,1);
  3946. RANDOM(#sleep_time,200,20);
  3947. IF(%XPOS%=-697);
  3948. SET(&keydown,"RIGHT");
  3949. SET(#pos_stop,"-698");
  3950. IF(%#placa_dinamica%!=68);
  3951. SET(&y_sleep,"180");
  3952. SET(&p_sleep,"0");
  3953. ELSE;
  3954. SET(&y_sleep,"+0");
  3955. SET(&p_sleep,"+79");
  3956. ENDIF;
  3957. ELSEIF(%XPOS%=-699);
  3958. SET(&keydown,"LEFT");
  3959. SET(#pos_stop,"-697");
  3960. IF(%#placa_dinamica%!=68);
  3961. SET(&y_sleep,"238");
  3962. SET(&p_sleep,"0");
  3963. ELSE;
  3964. SET(&y_sleep,"+66");
  3965. SET(&p_sleep,"+66");
  3966. ENDIF;
  3967. ELSEIF(%XPOS%=-698);
  3968. SET(&keydown,"RIGHT");
  3969. SET(#pos_stop,"-699");
  3970. IF(%#placa_dinamica%!=68);
  3971. SET(&y_sleep,"128");
  3972. SET(&p_sleep,"0");
  3973. ELSE;
  3974. SET(&y_sleep,"-66");
  3975. SET(&p_sleep,"+66");
  3976. ENDIF;
  3977. ENDIF;
  3978. GUI();
  3979. DO(50);
  3980. LOOK(SOUTH);
  3981. KEYDOWN(%&keydown%);
  3982. KEYDOWN(SNEAK);
  3983. UNTIL(%XPOS%=%#pos_stop%);
  3984. KEYUP(SNEAK);
  3985. KEYUP(%&keydown%);
  3986. DO(50);
  3987. LOOK(SOUTH);
  3988. KEYDOWN(BACK);
  3989. KEYDOWN(SNEAK);
  3990. UNTIL(%ZPOS%=673);
  3991. DO;
  3992. LOOK(SOUTH);
  3993. KEYUP(SNEAK);
  3994. KEYUP(BACK);
  3995. DEC(#sleep_time,1);
  3996. GETIDREL(0,-1,1,#id_unbug);
  3997. IF(%HIT%="PLAYER");
  3998. ELSE;
  3999. SET(#sleep_time,"-1");
  4000. ENDIF;
  4001. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=124));
  4002. IF(%#id_unbug%=124);
  4003. DO(50);
  4004. LOOK(SOUTH);
  4005. KEYDOWN(FORWARD);
  4006. UNTIL(%ZPOS%=675);
  4007. WAIT(10T);
  4008. KEYUP(FORWARD);
  4009. ELSE;
  4010. UNSET(fim);
  4011. BREAK;
  4012. ENDIF;
  4013. ELSE;
  4014. SET(#sleep_inc_two,"");
  4015. LOOK(SOUTH);
  4016. LOOK(%&y_sleep%,%&p_sleep%);
  4017. IF(%#placa_dinamica%!=68);
  4018. KEYDOWN(SNEAK);
  4019. ENDIF;
  4020. WAIT(2T);
  4021. KEY(USE);
  4022. WAIT(4T);
  4023. KEYUP(SNEAK);
  4024. ENDIF;
  4025. ELSE;
  4026. BREAK;
  4027. ENDIF;
  4028. GETIDREL(0,-1,0,#id_unbug);
  4029. INC(#sleep_inc,1);
  4030. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  4031. UNSET(fim);
  4032. BREAK;
  4033. ENDIF;
  4034. LOOP;
  4035. ENDIF;
  4036. IF(!fim);
  4037. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, compra reiniciada. &9&o#SLEEP");
  4038. DO(6);
  4039. LOOK(%&sleep_look%);
  4040. KEYDOWN(BACK);
  4041. LOOP;
  4042. KEYUP(BACK);
  4043. ENDIF;
  4044. ELSE;
  4045. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, compra cancelada. &9&o#SLEEP");
  4046. SET(cancelar_compra);
  4047. ENDIF;
  4048. UNTIL(fim);
  4049. IF(!cancelar_compra);
  4050. DO(6);
  4051. LOOK(%&sleep_look%);
  4052. KEYDOWN(BACK);
  4053. LOOP;
  4054. KEYUP(BACK);
  4055. LOG("&9&l[&f&oM&facro&9&l] &aCompra de linhas concluída. &9&o#SLEEP");
  4056. REPLACE(&tfarc_6,"9"," ");
  4057. REPLACE(&tfarc_6,"8","");
  4058. WAIT(2T);
  4059. ENDIF;
  4060. ENDIF;
  4061. SET(#itens_inventory_armazem,"");
  4062. SET(#itens_min_armazem,"23");
  4063. SET(#peixes_min_venda,"6");
  4064. #sleep_loop = %#time_verificar% * 23;
  4065. IF(unbug);
  4066. UNSET(unbug);
  4067. ELSE;
  4068. IF(%GUI%!="GUIINVENTORY");
  4069. GUI(INVENTORY);
  4070. ENDIF;
  4071. IF((sleep_send)&&(item_id));
  4072. UNSET(item_id);
  4073. ENDIF;
  4074. IF(sleep_ver_vara);
  4075. DO;
  4076. GETSLOT(346,#slot_vara);
  4077. IF(%#slot_vara%!=-1);
  4078. GETSLOTITEM(44,#id_vara);
  4079. IF(%#id_vara%!=346);
  4080. IF(%#id_vara%!=0);
  4081. SLOTCLICK(44,L,TRUE);
  4082. WAIT(%#delay_dropar%MS);
  4083. ENDIF;
  4084. SLOTCLICK(%#slot_vara%,L,FALSE);
  4085. WAIT(%#delay_dropar%MS);
  4086. SLOTCLICK(44,L,FALSE);
  4087. WAIT(%#delay_dropar%MS);
  4088. ELSE;
  4089. IF(%#slot_vara%=44);
  4090. BREAK;
  4091. ELSE;
  4092. IF(!sleep_clean_inventory);
  4093. LOOKS(45,0,1);
  4094. WAIT(%#delay_dropar%MS);
  4095. ENDIF;
  4096. SLOTCLICK(%#slot_vara%,L,FALSE);
  4097. WAIT(%#delay_dropar%MS);
  4098. SLOTCLICK(-999);
  4099. WAIT(%#delay_dropar%MS);
  4100. ENDIF;
  4101. ENDIF;
  4102. ELSE;
  4103. BREAK;
  4104. ENDIF;
  4105. LOOP;
  4106. UNSET(sleep_ver_vara);
  4107. ENDIF;
  4108. IF(sleep_ver_linha);
  4109. FOR(#sleep_slot,36,44);
  4110. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  4111. IF((%#sleep_id%!=346)&&(%#sleep_id%!=287)&&(%#sleep_id%!=0));
  4112. SLOTCLICK(%#sleep_slot%,L,TRUE);
  4113. WAIT(%#delay_dropar%MS);
  4114. ENDIF;
  4115. NEXT;
  4116. SET(#pack_linha,"");
  4117. SET(#getslot,"9");
  4118. DO;
  4119. GETSLOT(287,#slot_linha,%#getslot%);
  4120. IF(%#slot_linha%=-1);
  4121. BREAK;
  4122. ELSE;
  4123. INC(#pack_linha,1);
  4124. #getslot = %#slot_linha% + 1;
  4125. IF(%#slot_linha%<36);
  4126. SLOTCLICK(%#slot_linha%,L,TRUE);
  4127. GETSLOTITEM(%#slot_linha%,#id_linha);
  4128. IF(%#id_linha%=287);
  4129. ELSE;
  4130. WAIT(%#delay_dropar%MS);
  4131. DEC(#pack_linha,1);
  4132. ENDIF;
  4133. ENDIF;
  4134. ENDIF;
  4135. LOOP;
  4136. IF(%#pack_linha%>%#pack_linha_min%);
  4137. DO;
  4138. GETSLOT(287,#slot_linha);
  4139. IF(!sleep_clean_inventory);
  4140. LOOKS(45,0,1);
  4141. WAIT(%#delay_dropar%MS);
  4142. ENDIF;
  4143. SLOTCLICK(%#slot_linha%,L,FALSE);
  4144. WAIT(%#delay_dropar%MS);
  4145. SLOTCLICK(-999);
  4146. WAIT(%#delay_dropar%MS);
  4147. DEC(#pack_linha,1);
  4148. UNTIL(%#pack_linha%=%#pack_linha_min%);
  4149. ENDIF;
  4150. IF(%#pack_linha_min%=7);
  4151. GETSLOT(0,#slot_vazio,37);
  4152. GETSLOTITEM(36,#sleep_id);
  4153. IF(%#sleep_id%=287);
  4154. SLOTCLICK(36,L,FALSE);
  4155. WAIT(%#delay_dropar%MS);
  4156. IF(%#slot_vazio%!=-1);
  4157. SLOTCLICK(%#slot_vazio%,L,FALSE);
  4158. ELSE;
  4159. IF(!sleep_clean_inventory);
  4160. LOOKS(45,0,1);
  4161. WAIT(%#delay_dropar%MS);
  4162. ENDIF;
  4163. SLOTCLICK(-999);
  4164. ENDIF;
  4165. WAIT(%#delay_dropar%MS);
  4166. ENDIF;
  4167. ENDIF;
  4168. UNSET(sleep_ver_linha);
  4169. ENDIF;
  4170. IF((%#verificar_vip%<=80)&&(kitnbvip)&&(%#send_kit_vip%>=5));
  4171. SET(#send_kit_vip,"");
  4172. }$$/kit nbvip$${
  4173. ENDIF;
  4174. UNSAFE;
  4175. DO;
  4176. PICK(346);
  4177. IF((%DURABILITY%<=%#dur_vara_reparar%)||(%ITEM%!=346)||(unbug_vara));
  4178. UNSET(@sleeplack);
  4179. SET(#sleep_inc,"299");
  4180. SET(#sleep_inc_two,"");
  4181. DO;
  4182. INC(#sleep_inc,1);
  4183. IF(%#sleep_inc%=300);
  4184. SET(#sleep_inc,"200");
  4185. INC(#sleep_inc_two,1);
  4186. PICK(346);
  4187. IF(%ITEM%!=346);
  4188. SET(reabastecer_vara);
  4189. ENDIF;
  4190. LOOK(0,90);
  4191. WAIT(2T);
  4192. IF(%#dur_vara_reparar%=-1);
  4193. BREAK;
  4194. ENDIF;
  4195. DO(2);
  4196. KEY(USE);
  4197. WAIT(2T);
  4198. LOOP;
  4199. ELSEIF(@sleeplack);
  4200. SET(reabastecer_linha);
  4201. ENDIF;
  4202. UNTIL((%DURABILITY%=64)||(%#sleep_inc_two%>=10)||(reabastecer_vara)||(reabastecer_linha));
  4203. IF(%#sleep_inc_two%>=10);
  4204. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, desbugando a vara. &9&o#SLEEP");
  4205. GUI();
  4206. BREAK;
  4207. ELSEIF((reabastecer_vara)||(reabastecer_linha));
  4208. SET(sleep_ver_all);
  4209. BREAK;
  4210. ENDIF;
  4211. IF(unbug_vara);
  4212. UNSET(unbug_vara);
  4213. LOOK(NORTH);
  4214. LOOK(0,270,1);
  4215. ENDIF;
  4216. ELSE;
  4217. LOOK(0,270);
  4218. KEY(USE);
  4219. WAIT(%#delay_pescar%MS);
  4220. ENDIF;
  4221. IF(%GUI%!="GUIINVENTORY");
  4222. WAIT(3);
  4223. IF(%GUI%="GUICHAT");
  4224. LOG("&9&l[&f&oM&facro&9&l] &aChat detectado, feche para continuar. &9&o#SLEEP");
  4225. DO;
  4226. WHILE(%GUI%="GUICHAT");
  4227. WAIT(3T);
  4228. ENDIF;
  4229. GUI(INVENTORY);
  4230. PICK(346);
  4231. LOOKS(0,270,1);
  4232. ELSEIF((%XPOS%!=%#xpos_pesqueiro%)||(%YPOS%!=%#ypos_pesqueiro%)||(%ZPOS%!=%#zpos_pesqueiro%));
  4233. LOG("&9&l[&f&oM&facro&9&l] &cAlgum problema aconteceu, voltando ao pesqueiro. &9&o#SLEEP");
  4234. LOG("&9&l[&f&oM&facro&9&l] &cParece que você não esta nas coordenadas configuradas do pesqueiro. &9&o#SLEEP");
  4235. GUI();
  4236. BREAK;
  4237. ELSEIF(%HEALTH%<=8);
  4238. GUI();
  4239. LOOK(NORTH);
  4240. LOOK(-46,+30);
  4241. PRESS(F2);
  4242. WAIT(7T);
  4243. LOOK(NORTH);
  4244. LOOK(+135,+30);
  4245. PRESS(F2);
  4246. WAIT(7T);
  4247. SET(pesqueiro_invadido);
  4248. DISCONNECT;
  4249. ENDIF;
  4250. DEC(#sleep_loop,%#dec_delay%);
  4251. IF(%#sleep_loop%<1);
  4252. SET(#slot_clean,"");
  4253. SET(#getslot,"9");
  4254. LOG("");
  4255. LOG("&9&l[&f&oM&facro&9&l] &aVerificando espaço livre do inventário. &9&o#SLEEP");
  4256. DO;
  4257. IF(%GUI%!="GUIINVENTORY");
  4258. GUI(INVENTORY);
  4259. ENDIF;
  4260. GETSLOT(0,#sleep_slot,%#getslot%);
  4261. IF(%#sleep_slot%=-1);
  4262. BREAK;
  4263. ELSE;
  4264. INC(#slot_clean,1);
  4265. #getslot = %#sleep_slot% + 1;
  4266. IF(%#slot_clean%>=4);
  4267. BREAK;
  4268. ENDIF;
  4269. ENDIF;
  4270. LOOP;
  4271. IF(%#slot_clean%<4);
  4272. LOG("&9&l[&f&oM&facro&9&l] &aPoucos slots livres, iniciando limpeza. &9&o#SLEEP");
  4273. SET(sleep_ver_all);
  4274. ELSE;
  4275. LOG("&9&l[&f&oM&facro&9&l] &aInventário ainda vazio. &9&o#SLEEP");
  4276. #sleep_loop = %#time_verificar% * 23;
  4277. ENDIF;
  4278. LOG("");
  4279. ENDIF;
  4280. WHILE(%#sleep_loop%>=1);
  4281. ENDUNSAFE;
  4282. ENDIF;
  4283. LOOP;
  4284. ENDIF;
  4285.  
  4286. }$$
  4287.  
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!