Isaujr7

Macro Xylic (Editado)

Aug 25th, 2019
102
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. $${
  2.  
  3. //Tópico Forum Craftlandia:
  4. //https://forum.craftlandia.com.br/xf/threads/macro-xylic-assar-legacy.957400/
  5.  
  6. //Demonstração:
  7. //https://www.youtube.com/watch?v=rimEGMxRPBU
  8.  
  9. //Como Fazer a Trap:
  10. //https://www.youtube.com/watch?v=ieqBs9T4ziA
  11.  
  12.  
  13.  
  14. &versionassar="v0.3-s-a";
  15. match(%&versionassar%,"v(.+).(.+)-(.+)-(.+)",{#assarbuild,#assarminor,&assaralbest,&abefec});
  16. @#assarbuild=%#assarbuild%;
  17. @#assarminor=%#assarminor%;
  18. @&assaralbest=%&assaralbest%;
  19. ifmatches(%&assaralbest%,"-");&assarstability="Bleeding Edge";endif;ifmatches(%&assaralbest%,"a");&assarstability="Fase Alpha";endif;ifmatches(%&assaralbest%,"b");&assarstability="Fase Beta";endif;ifmatches(%&assaralbest%,"s");&assarstability="Estavel";endif;
  20. ifmatches(%&abefec%,"a");&assarliber="&3Publica";endif;ifmatches(%&abefec%,"c");&assarliber="&3Convidados";endif;ifmatches(%&abefec%,"f");&assarliber="&4Fechada";endif;
  21. @&assarstability=%&assarstability%;
  22. @&assarliber=%&assarliber%;
  23.  
  24. if(@xyassar);
  25. log("&6&l[&5XylicAssar&6&l] &9&lAssar &9v%#assarbuild%.%#assarminor% &f&l[&4&lOFF&f&l] &f&l[&4Editado por &l&9IsauBR&f&l]");
  26. unset(@xyassar);
  27. stop;
  28. else;
  29. set(@xyassar);
  30.  
  31. &home="assar";
  32. &homevenda="xylic peixeassadovip";
  33. #poxvenda=734;
  34. #pozvenda=673;
  35. #itcru=1;
  36. #itassado=1;
  37. #fuel2=1;
  38. #vistalimpa="";
  39. #frythis="";
  40. #fryok="";
  41.  
  42. log("&6&l[&5XylicAssar&6&l] &9&lAssar &9v%#assarbuild%.%#assarminor% &f&l[&2&lON&f&l] &f&l[&4Editado por &l&9IsauBR&f&l]");
  43. wait(200ms);
  44.  
  45. //Prompt Item
  46. do();
  47. log("&6&l[&5XylicAssar&6&l] &9&lDigite o &6&lNumero &9&lequivalente ao item:");log(" ");
  48. log("&6&l[&5XylicAssar&6&l] &6&l[1] &3Peixe -> Peixe Assado");
  49. log("&6&l[&5XylicAssar&6&l] &6&l[2] &7Minério de Ferro -> Barra de Ferro");
  50. log("&6&l[&5XylicAssar&6&l] &6&l[3] &6Minério de Ouro -> Barra de Ouro");
  51. log("&6&l[&5XylicAssar&6&l] &6&l[4] &eAreia -> Vidro");
  52. log("&6&l[&5XylicAssar&6&l] &6&l[5] &8Pedregulho -> Pedra");
  53. log("&6&l[&5XylicAssar&6&l] &6&l[6] &2Cacto -> Tinta Verde");
  54. log(" ");
  55. prompt(#frythis,$$?,"Digite o Numero equivalente ao item");
  56. if((%#frythis%>0)&&(%#frythis%<6));
  57. #fryok=1;
  58. endif;
  59. until(#fryok=1);
  60.  
  61. //Prompt vender ou guardar peixe
  62. if(%#frythis%=1);
  63. #vendeguarda="";
  64. #vengua="";
  65. do();
  66. log("&6&l[&5XylicAssar&6&l] &9&lGostaria de &3Vender &9ou &bGuardar &9&lo Peixe?");log(" ");
  67. log("&6&l[&5XylicAssar&6&l] &6&l[1] &9Guardar");
  68. log("&6&l[&5XylicAssar&6&l] &6&l[2] &9Vender");
  69. log(" ");
  70. prompt(#vendeguarda,$$?,"Digite o Numero equivalente ao item");
  71. if((%#vendeguarda%>0)&&(%#vendeguarda%<3));
  72. #vengua=1;
  73. endif;
  74. until(#vengua=1);
  75. endif;
  76. if(%#vendeguarda%=2);#vender=1;else;#vender=0;endif;
  77.  
  78. log(" ");
  79. if(%#frythis%=1);#item=349;if(%#vender%!=1);
  80. Log("&6&l[&5XylicAssar&6&l] &9Assando &6Peixe &f[&cGuardar&f]");
  81. else;
  82. Log("&6&l[&5XylicAssar&6&l] &9Assando &6Peixe &f[&cVender&f]");
  83. endif;&itemname="o Peixe";
  84. elseif(%#frythis%=2);#item=15;Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ferro");&itemname="o Ferro";
  85. elseif(%#frythis%=3);#item=14;Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ouro");&itemname="o Ouro";
  86. elseif(%#frythis%=4);#item=12;Log("&6&l[&5XylicAssar&6&l] &9Assando &6Areia");&itemname="a Areia";
  87. elseif(%#frythis%=5);#item=4;Log("&6&l[&5XylicAssar&6&l] &9Assando &6Pedregulho");&itemname="o Pedregulho";
  88. elseif(%#frythis%=6);#item=81;Log("&6&l[&5XylicAssar&6&l] &9Assando &6Cacto");&itemname="a Cacto";
  89. endif;
  90.  
  91. echo("/home %&home%");
  92. do();
  93. wait();
  94. until((%HITID%=54)||(%HITID%=146));
  95. wait(500ms);
  96.  
  97. if(%DIRECTION%="N");&front="north";&right="east";&back="south";&left="west";endif;
  98. if(%DIRECTION%="E");&front="east";&right="south";&back="west";&left="north";endif;
  99. if(%DIRECTION%="W");&front="west";&right="north";&back="east";&left="south";endif;
  100. if(%DIRECTION%="S");&front="south";&right="west";&back="north";&left="east";endif;
  101.  
  102. look(%&back%);
  103. wait(80ms);
  104. gui(inventory);
  105. #nospace="";
  106. #beginstor="";
  107. #vazio="";
  108. unsafe;
  109. for(#slt,9,44);
  110. getslotitem(%#slt%,#idit);
  111. if(%#idit%=0);
  112. inc(#vazio,1);
  113. else;
  114. inc(#beginstor,1);
  115. endif;
  116. wait(1t);
  117. next;
  118. endunsafe;
  119. gui();
  120. wait(600ms);
  121. #tresmais="";
  122. if(%#vazio%>2);#tresmais=1;else;#tresmais=0;endif;
  123.  
  124. if(%#tresmais%=0);
  125. look(%&back%);look(,60);
  126. wait(80ms);
  127. do();
  128. wait(30ms);
  129. until((%HITID%=54)||(%HITID%=146));
  130. wait(100ms);
  131. key(use);
  132. do();
  133. wait(20ms);
  134. until(%GUI%="GUICHEST");
  135. wait(200ms);
  136.  
  137. unsafe;
  138. for(#startslt,54,89);
  139. slotclick(%#startslt%,l,true);
  140. wait(5ms);
  141. next;
  142. wait(80ms);
  143. endunsafe;
  144.  
  145. gui();
  146. wait(100ms);
  147.  
  148. echo("/fornalha vip");
  149. do();
  150. wait(15ms);
  151. until(%GUI%="GUIFURNACE");
  152. wait(125ms);
  153.  
  154. slotclick(0,l,true);wait(50ms);
  155. slotclick(1,l,true);wait(50ms);
  156. slotclick(2,l,true);wait(50ms);
  157.  
  158. gui();
  159. wait(100ms);
  160.  
  161. look(%&back%);look(,60);
  162. wait(80ms);
  163. do();
  164. wait(30ms);
  165. until((%HITID%=54)||(%HITID%=146));
  166. wait(100ms);
  167. key(use);
  168. do();
  169. wait(20ms);
  170. until(%GUI%="GUICHEST");
  171. wait(200ms);
  172.  
  173. unsafe;
  174. for(#startslt,54,89);
  175. slotclick(%#startslt%,l,true);
  176. wait(5ms);
  177. next;
  178. wait(50ms);
  179. endunsafe;
  180.  
  181. gui();
  182. wait(100ms);
  183. else;
  184.  
  185. echo("/fornalha vip");
  186. do();
  187. wait(15ms);
  188. until(%GUI%="GUIFURNACE");
  189. wait(125ms);
  190.  
  191. slotclick(0,l,true);wait(50ms);
  192. slotclick(1,l,true);wait(50ms);
  193. slotclick(2,l,true);wait(50ms);
  194.  
  195. gui();
  196. wait(100ms);
  197.  
  198. look(%&back%);look(,60);
  199. wait(80ms);
  200. do();
  201. wait(30ms);
  202. until((%HITID%=54)||(%HITID%=146));
  203. wait(100ms);
  204. key(use);
  205. do();
  206. wait(20ms);
  207. until(%GUI%="GUICHEST");
  208. wait(200ms);
  209.  
  210. unsafe;
  211. for(#startslt,54,89);
  212. slotclick(%#startslt%,l,true);
  213. wait(1ms);
  214. next;
  215. wait(50ms);
  216. endunsafe;
  217.  
  218. gui();
  219. wait(80ms);
  220. endif;
  221. look(%&front%);look(,40);wait(100ms);
  222.  
  223. if(%&msge%!=" &5#xylic &6Assar");
  224. do();
  225. do();
  226. if(%#itcru%=1);look(%&left%);look(-48,333);endif;
  227. if(%#itcru%=2);look(%&left%);look(-48,346);endif;
  228. if(%#itcru%=3);look(%&left%);look(-48,);endif;
  229. if(%#itcru%=4);look(%&left%);look(-48,+15);endif;
  230. if(%#itcru%=5);look(%&left%);look(-48,+28);endif;
  231. if(%#itcru%=6);look(%&left%);look(-38,329);endif;
  232. if(%#itcru%=7);look(%&left%);look(-38,343);endif;
  233. if(%#itcru%=8);look(%&left%);look(-38,);endif;
  234. if(%#itcru%=9);look(%&left%);look(-38,+17);endif;
  235. if(%#itcru%=10);look(%&left%);look(-38,+32);endif;
  236. if(%#itcru%=11);look(%&left%);look(-22,325);endif;
  237. if(%#itcru%=12);look(%&left%);look(-22,340);endif;
  238. if(%#itcru%=13);look(%&left%);look(-22,);endif;
  239. if(%#itcru%=14);look(%&left%);look(-22,+20);endif;
  240. if(%#itcru%=15);look(%&left%);look(-22,+36);endif;
  241. if(%#itcru%=16);look(%&left%);look(,322);endif;
  242. if(%#itcru%=17);look(%&left%);look(,340);endif;
  243. if(%#itcru%=18);look(%&left%);endif;
  244. if(%#itcru%=19);look(%&left%);look(,+21);endif;
  245. if(%#itcru%=20);look(%&left%);look(,+38);endif;
  246. if(%#itcru%=21);look(%&left%);look(+21,325);endif;
  247. if(%#itcru%=22);look(%&left%);look(+21,340);endif;
  248. if(%#itcru%=23);look(%&left%);look(+21,);endif;
  249. if(%#itcru%=24);look(%&left%);look(+21,+20);endif;
  250. if(%#itcru%=25);look(%&left%);look(+21,+36);endif;
  251. if(%#itcru%=26);look(%&left%);look(+37,329);endif;
  252. if(%#itcru%=27);look(%&left%);look(+37,343);endif;
  253. if(%#itcru%=28);look(%&left%);look(+37,);endif;
  254. if(%#itcru%=29);look(%&left%);look(+37,+18);endif;
  255. if(%#itcru%=30);look(%&left%);look(+37,+32);endif;
  256. if(%#itcru%=31);look(%&left%);look(+49,333);endif;
  257. if(%#itcru%=32);look(%&left%);look(+49,346);endif;
  258. if(%#itcru%=33);look(%&left%);look(+49,);endif;
  259. if(%#itcru%=34);look(%&left%);look(+49,+15);endif;
  260. if(%#itcru%=35);look(%&left%);look(+49,+27);endif;
  261.  
  262. wait(120ms);
  263. do();
  264. wait(40ms);
  265. until((%HITID%=54)||(%HITID%=146));
  266. key(use);
  267. do();
  268. wait(30ms);
  269. until(%GUI%="GUICHEST");
  270. wait(150ms);
  271.  
  272. #slotpeixe=0;
  273. #enchi=0;
  274. unsafe;
  275. do();
  276. getslotitem(64,#fullpeixe);
  277. if(%#fullpeixe%=%#item%);
  278. #enchi=1;
  279. else;
  280. getslotitem(%#slotpeixe%,#peixeclick);
  281. if(%#peixeclick%=%#item%);
  282. slotclick(%#slotpeixe%,l,true);
  283. inc(#slotpeixe,1);
  284. wait(7ms);
  285. else;
  286. inc(#slotpeixe,1);
  287. endif;
  288. endif;
  289. until((#enchi=1)||(%#slotpeixe%>53));
  290. endunsafe;
  291.  
  292. gui();
  293. do();
  294. wait(10ms);
  295. until(%GUI%!="GUICHEST");
  296. wait(400ms);
  297.  
  298. if(%#slotpeixe%>53);
  299. if(%#itcru%>35);
  300.  
  301. look(%&left%);look(+49,+27);
  302. wait(120ms);
  303. do();
  304. wait(40ms);
  305. until((%HITID%=54)||(%HITID%=146));
  306. key(use);
  307. do();
  308. wait(30ms);
  309. until(%GUI%="GUICHEST");
  310. wait(150ms);
  311.  
  312. unsafe;
  313. for(#fimsemitem,64,89);
  314. slotclick(%#fimsemitem%,l,true);
  315. wait(15ms);
  316. next;
  317. endunsafe;
  318.  
  319. unset(@xyassar);
  320. log("&6&l[&5XylicAssar&6&l] &cAcabou &9%&itemname%");
  321. log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l] &f&l[&4Editado por &l&9IsauBR&f&l]");
  322. gui();
  323. stop;
  324. else;
  325. inc(#itcru,1);
  326. endif;
  327. endif;
  328.  
  329. until(#fullpeixe=%#item%);
  330.  
  331. //Carvao
  332. do();
  333. if(%#fuel2%=1);look(%&front%);look(-28,334);endif;
  334. if(%#fuel2%=2);look(%&front%);look(-28,347);endif;
  335. if(%#fuel2%=3);look(%&front%);look(-28,);endif;
  336. if(%#fuel2%=4);look(%&front%);look(-28,+14);endif;
  337. if(%#fuel2%=5);look(%&front%);look(-28,+26);endif;
  338. if(%#fuel2%=6);look(%&front%);look(-16,332);endif;
  339. if(%#fuel2%=7);look(%&front%);look(-16,346);endif;
  340. if(%#fuel2%=8);look(%&front%);look(-16,);endif;
  341. if(%#fuel2%=9);look(%&front%);look(-16,+15);endif;
  342. if(%#fuel2%=10);look(%&front%);look(-16,+28);endif;
  343. if(%#fuel2%=11);look(%&front%);look(,332);endif;
  344. if(%#fuel2%=12);look(%&front%);look(,345);endif;
  345. if(%#fuel2%=13);look(%&front%);endif;
  346. if(%#fuel2%=14);look(%&front%);look(,+16);endif;
  347. if(%#fuel2%=15);look(%&front%);look(,+29);endif;
  348. if(%#fuel2%=16);look(%&front%);look(+15,332);endif;
  349. if(%#fuel2%=17);look(%&front%);look(+15,346);endif;
  350. if(%#fuel2%=18);look(%&front%);look(+15,);endif;
  351. if(%#fuel2%=19);look(%&front%);look(+15,+15);endif;
  352. if(%#fuel2%=20);look(%&front%);look(+15,+28);endif;
  353. if(%#fuel2%=21);look(%&front%);look(+28,335);endif;
  354. if(%#fuel2%=22);look(%&front%);look(+28,347);endif;
  355. if(%#fuel2%=23);look(%&front%);look(+28,);endif;
  356. if(%#fuel2%=24);look(%&front%);look(+28,+14);endif;
  357. if(%#fuel2%=25);look(%&front%);look(+28,+27);endif;
  358.  
  359. wait(120ms);
  360. do();
  361. wait(40ms);
  362. until((%HITID%=54)||(%HITID%=146));
  363. key(use);
  364. do();
  365. wait(30ms);
  366. until(%GUI%="GUICHEST");
  367. wait(150ms);
  368.  
  369. #slotcarvao=0;
  370. #enchi2=0;
  371. unsafe;
  372. do();
  373. getslotitem(54,#fullcarvao,#carvaoqntd);
  374. if((%#fullcarvao%=263)&&(%#carvaoqntd%=64));
  375. #enchi2=1;
  376. else;
  377. getslotitem(%#slotcarvao%,#carvaoclick);
  378. if(%#carvaoclick%=263);
  379. slotclick(%#slotcarvao%,l,true);
  380. inc(#slotcarvao,1);
  381. wait(7ms);
  382. else;
  383. inc(#slotcarvao,1);
  384. endif;
  385. endif;
  386. until((#enchi2=1)||(%#slotcarvao%>53));
  387. endunsafe;
  388.  
  389. gui();
  390. do();
  391. wait(10ms);
  392. until(%GUI%!="GUICHEST");
  393. wait(400ms);
  394.  
  395. if(%#slotcarvao%>53);
  396. if(%#fuel2%>25);
  397.  
  398. look(%&left%);look(+49,+27);
  399. wait(120ms);
  400. do();
  401. wait(40ms);
  402. until((%HITID%=54)||(%HITID%=146));
  403. key(use);
  404. do();
  405. wait(30ms);
  406. until(%GUI%="GUICHEST");
  407. wait(150ms);
  408.  
  409. unsafe;
  410. for(#fimsemitem,64,89);
  411. slotclick(%#fimsemitem%,l,true);
  412. wait(15ms);
  413. next;
  414. endunsafe;
  415.  
  416. gui();wait(120ms);
  417.  
  418. look(%&front%);look(+28,+27);
  419. wait(120ms);
  420. do();
  421. wait(40ms);
  422. until((%HITID%=54)||(%HITID%=146));
  423. key(use);
  424. do();
  425. wait(30ms);
  426. until(%GUI%="GUICHEST");
  427. wait(150ms);
  428.  
  429. unsafe;
  430. for(#fimsemitem,54,63);
  431. slotclick(%#fimsemitem%,l,true);
  432. wait(15ms);
  433. next;
  434. endunsafe;
  435.  
  436. unset(@xyassar);
  437. log("&6&l[&5XylicAssar&6&l] &cAcabou &9Carvao");
  438. log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l] &f&l[&4Editado por &l&9IsauBR&f&l]");
  439. gui();
  440. stop;
  441. else;
  442. inc(#fuel2,1);
  443. endif;
  444. endif;
  445.  
  446. until(#fullcarvao=263);
  447.  
  448. //Fornalha
  449. look(%&right%);
  450. echo("/fornalha vip");
  451. do();
  452. wait(15ms);
  453. until(%GUI%="GUIFURNACE");
  454. wait(100ms);
  455.  
  456. //Cozinhar
  457. #cozid=0;
  458. do();
  459. if(%GUI%="GUIFURNACE");
  460. else;
  461. echo("/fornalha vip");
  462. wait(800ms);
  463. endif;
  464. //Carvao
  465. #refilcarvao=3;
  466. unsafe;
  467. do();
  468. getslotitem(1,#fuelnace,#fuelqnt);
  469. if(%#fuelqnt%<25);
  470. if(%#refilcarvao%>12);
  471. else;
  472. getslotitem(%#refilcarvao%,#refuel);
  473. if(%#refuel%=263);
  474. slotclick(%#refilcarvao%,l,true);
  475. wait(10ms);
  476. endif;
  477. inc(#refilcarvao,1);
  478. endif;
  479. endif;
  480. until(#fuelqnt>25);
  481. endunsafe;
  482.  
  483. //Peixe
  484. if(%GUI%="GUIFURNACE");
  485. else;
  486. echo("/fornalha vip");
  487. wait(800ms);
  488. endif;
  489.  
  490. wait(100ms);
  491. #sltcru=13;
  492. do();
  493. #clicked=0;
  494. do();
  495. if(%#sltcru%>38);
  496. #clicked=1;
  497. else;
  498. getslotitem(%#sltcru%,#itemraw);
  499. if(%#itemraw%=%#item%);
  500. unsafe;
  501. do();
  502. slotclick(%#sltcru%,l,true);
  503. wait(200ms);
  504. getslotitem(0,#itesla);
  505. getslotitem(2,#iteslb);
  506. until((#itesla!=0)||(#iteslb!=0));
  507. endunsafe;
  508. #clicked=1;
  509. endif;
  510. inc(#sltcru,1);
  511. endif;
  512. until(#clicked=1);
  513.  
  514. do();
  515. getslotitem(2,#itemcook);
  516. wait(10ms);
  517. until((#itemcook!=0)||(#sltcru>38));
  518. wait(80ms);
  519.  
  520. if(%#itemcook%=0);
  521. else;
  522. slotclick(2,l,true);
  523. inc(#cozid,1);
  524. wait(80ms);
  525. endif;
  526.  
  527. do();
  528. slotclick(2,l,true);
  529. wait(50ms);
  530. getslotitem(2,#itemcook);
  531. until(%#itemcook%=0);
  532.  
  533. until((#itemcook=0)||(#sltcru>38));
  534.  
  535. until((#cozid=26)||(#sltcru>38));
  536.  
  537. do();
  538. slotclick(2,l,true);
  539. wait(80ms);
  540. getslotitem(2,#itemcook);
  541. until(%#itemcook%=0);
  542.  
  543. do();
  544. slotclick(1,l,true);
  545. wait(100ms);
  546. getslotitem(1,#desbcarvao);
  547. until(#desbcarvao=0);
  548.  
  549. gui();
  550. wait(300ms);
  551.  
  552. //Limpando Carvoes do Inventario
  553. do(1);
  554. if(%#fuel2%=1);look(%&front%);look(-28,334);endif;
  555. if(%#fuel2%=2);look(%&front%);look(-28,347);endif;
  556. if(%#fuel2%=3);look(%&front%);look(-28,);endif;
  557. if(%#fuel2%=4);look(%&front%);look(-28,+14);endif;
  558. if(%#fuel2%=5);look(%&front%);look(-28,+26);endif;
  559. if(%#fuel2%=6);look(%&front%);look(-16,332);endif;
  560. if(%#fuel2%=7);look(%&front%);look(-16,346);endif;
  561. if(%#fuel2%=8);look(%&front%);look(-16,);endif;
  562. if(%#fuel2%=9);look(%&front%);look(-16,+15);endif;
  563. if(%#fuel2%=10);look(%&front%);look(-16,+28);endif;
  564. if(%#fuel2%=11);look(%&front%);look(,332);endif;
  565. if(%#fuel2%=12);look(%&front%);look(,345);endif;
  566. if(%#fuel2%=13);look(%&front%);endif;
  567. if(%#fuel2%=14);look(%&front%);look(,+16);endif;
  568. if(%#fuel2%=15);look(%&front%);look(,+29);endif;
  569. if(%#fuel2%=16);look(%&front%);look(+15,332);endif;
  570. if(%#fuel2%=17);look(%&front%);look(+15,346);endif;
  571. if(%#fuel2%=18);look(%&front%);look(+15,);endif;
  572. if(%#fuel2%=19);look(%&front%);look(+15,+15);endif;
  573. if(%#fuel2%=20);look(%&front%);look(+15,+28);endif;
  574. if(%#fuel2%=21);look(%&front%);look(+28,335);endif;
  575. if(%#fuel2%=22);look(%&front%);look(+28,347);endif;
  576. if(%#fuel2%=23);look(%&front%);look(+28,);endif;
  577. if(%#fuel2%=24);look(%&front%);look(+28,+14);endif;
  578. if(%#fuel2%=25);look(%&front%);look(+28,+27);endif;
  579.  
  580. wait(120ms);
  581. do();
  582. wait(40ms);
  583. until((%HITID%=54)||(%HITID%=146));
  584. key(use);
  585. do();
  586. wait(30ms);
  587. until(%GUI%="GUICHEST");
  588. wait(125ms);
  589.  
  590. for(#arrumacoal,54,63);
  591. getslotitem(%#arrumacoal%,#arrumacarvao);
  592. if(%#arrumacarvao%=263);
  593. slotclick(%#arrumacoal%,l,true);
  594. wait(10ms);
  595. endif;
  596. wait(10ms);
  597. next;
  598.  
  599. loop;
  600. gui();
  601. wait(300ms);
  602.  
  603. if(%#vender%=1);
  604. echo("/home %&homevenda%");
  605. do();
  606. wait();
  607. until((%XPOS%=%#poxvenda%)&&(%ZPOS%=%#pozvenda%));
  608. //until((%XPOS%=734)&&(%ZPOS%=672));
  609. wait(100ms);
  610. if(%#vistalimpa%=1);
  611. else;
  612. echo("/esconder");
  613. echo("/menuloja off");
  614. #vistalimpa=1;
  615. endif;
  616.  
  617. do();
  618. slot(9);
  619. ifmatches(%HIT%,"TILE");
  620. do(2);
  621. key(attack);
  622. wait(20ms);
  623. loop;
  624. #vendi=1;
  625. else;
  626. ifmatches(%HIT%,"PLAYER");
  627. echo("/esconder");
  628. &plname=%HITNAME%;
  629. echo("/tell @%&plname% [XylicMacro] Com licenca %&plname% voce esta na minha frente, preciso vender. Obrigado");
  630. wait(500ms);
  631. endif;
  632. endif;
  633. wait(500ms);
  634. until(%ITEM%=0);
  635.  
  636. echo("/home %&home%");
  637. do();
  638. wait();
  639. until((%HITID%=54)||(%HITID%=146));
  640. wait(500ms);
  641.  
  642. else;
  643. //Guardar
  644. do();
  645. if(%#itassado%=1);look(%&right%);look(-48,333);endif;
  646. if(%#itassado%=2);look(%&right%);look(-48,346);endif;
  647. if(%#itassado%=3);look(%&right%);look(-48,);endif;
  648. if(%#itassado%=4);look(%&right%);look(-48,+15);endif;
  649. if(%#itassado%=5);look(%&right%);look(-48,+28);endif;
  650. if(%#itassado%=6);look(%&right%);look(-38,329);endif;
  651. if(%#itassado%=7);look(%&right%);look(-38,343);endif;
  652. if(%#itassado%=8);look(%&right%);look(-38,);endif;
  653. if(%#itassado%=9);look(%&right%);look(-38,+17);endif;
  654. if(%#itassado%=10);look(%&right%);look(-38,+32);endif;
  655. if(%#itassado%=11);look(%&right%);look(-22,325);endif;
  656. if(%#itassado%=12);look(%&right%);look(-22,340);endif;
  657. if(%#itassado%=13);look(%&right%);look(-22,);endif;
  658. if(%#itassado%=14);look(%&right%);look(-22,+20);endif;
  659. if(%#itassado%=15);look(%&right%);look(-22,+36);endif;
  660. if(%#itassado%=16);look(%&right%);look(,322);endif;
  661. if(%#itassado%=17);look(%&right%);look(,340);endif;
  662. if(%#itassado%=18);look(%&right%);endif;
  663. if(%#itassado%=19);look(%&right%);look(,+21);endif;
  664. if(%#itassado%=20);look(%&right%);look(,+38);endif;
  665. if(%#itassado%=21);look(%&right%);look(+21,325);endif;
  666. if(%#itassado%=22);look(%&right%);look(+21,340);endif;
  667. if(%#itassado%=23);look(%&right%);look(+21,);endif;
  668. if(%#itassado%=24);look(%&right%);look(+21,+20);endif;
  669. if(%#itassado%=25);look(%&right%);look(+21,+36);endif;
  670. if(%#itassado%=26);look(%&right%);look(+37,329);endif;
  671. if(%#itassado%=27);look(%&right%);look(+37,343);endif;
  672. if(%#itassado%=28);look(%&right%);look(+37,);endif;
  673. if(%#itassado%=29);look(%&right%);look(+37,+18);endif;
  674. if(%#itassado%=30);look(%&right%);look(+37,+32);endif;
  675. if(%#itassado%=31);look(%&right%);look(+49,333);endif;
  676. if(%#itassado%=32);look(%&right%);look(+49,346);endif;
  677. if(%#itassado%=33);look(%&right%);look(+49,);endif;
  678. if(%#itassado%=34);look(%&right%);look(+49,+15);endif;
  679. if(%#itassado%=35);look(%&right%);look(+49,+28);endif;
  680. if(%#itassado%>35);
  681. unset(@xyassar);
  682. log("&6&l[&5XylicAssar&6&l] &cAcabou &9o espaço para guardar");
  683. log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l] &f&l[&4Editado por &l&9IsauBR&f&l]");
  684. gui();
  685. stop;
  686. endif;
  687.  
  688. wait(120ms);
  689. do();
  690. wait(40ms);
  691. until((%HITID%=54)||(%HITID%=146));
  692. key(use);
  693. do();
  694. wait(30ms);
  695. until(%GUI%="GUICHEST");
  696. wait(150ms);
  697.  
  698. unsafe;
  699. for(#storeslot,64,89);
  700. getslotitem(%#storeslot%,#guardaroun)
  701. if(%#guardaroun%=0);
  702. else;
  703. slotclick(%#storeslot%,l,true);
  704. wait(50ms);
  705. endif;
  706. next;
  707. endunsafe;
  708.  
  709. //Sv lagado da p.....
  710. getslotitem(89,#storeme);
  711. getslotitem(88,#storeme2);
  712. getslotitem(87,#storeme3);
  713. if((%#storeme%=0)&&(#storeme2=0)&&(#storeme3=0));
  714. else;
  715. inc(#itassado,1);
  716. endif;
  717.  
  718. gui();
  719. wait(250ms);
  720.  
  721. until((%#storeme%=0)&&(#storeme2=0)&&(#storeme3=0));
  722. endif;
  723. wait(300ms);
  724. until(#itcru>35);
  725. endif;
  726. endif;
  727.  
  728. //0.2 prompt escolher item. outros itens add.
  729. //0.3 prompt guardar item
  730. //0.3 vender warp vip
  731. }$$
RAW Paste Data