API tools faq
paste
Advertisement
RafaelloMC

Untitled

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