API tools faq
paste
Advertisement
Guest User

Untitled

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