API tools faq
paste
Advertisement
Guest User

Untitled

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