API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Dec 15th, 2019
112
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 21.59 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9. ////////// desligamento ////////////
  10. if(cacto);
  11. log(&9Andares feitos: &a%#feitos%);
  12. unset(cacto);
  13.  
  14. keyup(sneak);keyup(forward);keyup(left);keyup(right);keyup(back);keyup(jump);
  15. LOG("&8%PLAYER% &bCacto &4[Off]");
  16. LOG("&6&l ATÉ OUTRO DIA MESTRE");
  17. @#tempotest=0;
  18. temporesult=0;
  19. SENSITIVITY(200);
  20. stop;
  21. else;
  22. set(cacto);
  23. LOG("&8%PLAYER% &bCacto &a[On]");
  24.  
  25. SENSITIVITY(0);
  26.  
  27. @#tempotest=0;
  28. #temporesult=0;
  29. @#tempotest=0;
  30. #temporesult=0;
  31. #vip=0;
  32. prompt(#vip,$$?,voce é vip? se não for digite 1);
  33. prompt(&reset,$$?,§l§4deseja usar o §5ANTI RESET SERVER§4? digite sim ou apenas de enter se não);
  34. if(&reset="sim");echo(/sethome temp);do(4);log(&lVERIFICANDO POSIÇÃO DO SPAWN &4 NÃO SE MOVA!);loop;wait(2000ms);
  35. #posix=%XPOS%;#posiz=%ZPOS%;
  36. echo(/spawn);
  37. do;until((%XPOS%!=%#posix%)||(%ZPOS%!=%#posiz%));wait(1);echo(/desbugar);wait(1);
  38. #posispawnx=%XPOS%;#posispawnz=%ZPOS%
  39. do(3);wait(500ms);log(POSIÇÃO VERIFICADA COM SUCESSO! OBRIGADO POR ESPERAR! VOLTANDO PARA A TORRE);loop;
  40. echo(/home temp);do;until((%XPOS%=%#posix%)||(%ZPOS%=%#posiz%));wait(1);keydown(jump);wait(200ms);keyup(jump);wait(100ms);
  41. echo(/desbugar);wait(1);
  42. endif;
  43. #faltaareia=0;
  44. #faltaterra=0;
  45. #faltacacto=0;
  46. #feitos=0;
  47. #torres=0;
  48. prompt(#andares,$$?,"Quantos andares vão ter cada torre?");
  49. prompt(#torres,$$?,"qual o numero de torre?(coloca qualquer numero grande aqui,a macro é infinita)");
  50. #temptorre=1;
  51. /// inicio de tudo //////
  52.  
  53. do;wait(1);
  54. echo(/sethome t1);wait(300ms);
  55. #initialposx=%XPOS%;#initialposz=%ZPOS%
  56. //////procurando blocos para a proxima torre////
  57. #vai=0;
  58. wait(2);
  59. getidrel(+4,-1,0,#westtorre);
  60. getidrel(-4,-1,0,#easttorre);
  61. getidrel(0,-1,+4,#northtorre);
  62. getidrel(0,-1,-4,#southtorre);
  63.  
  64. if(#westtorre!=0);
  65. getidrel(+4,0,0,#westpossibilidade);
  66. if(#westpossibilidade=0);#vai=1;
  67. look(WEST);wait(30ms);
  68. endif;
  69. endif;
  70.  
  71. if((#westtorre=0)||(#westpossibilidade!=0));
  72. if(#easttorre!=0);
  73. getidrel(-4,0,0,#eastpossibilidade);
  74. if(#eastpossibilidade=0);#vai=1;
  75. look(EAST);wait(30ms);
  76. else;#proximolado=1;
  77. endif;
  78. else;#proximolado=1;
  79. endif;
  80. endif;
  81. if(#proximolado=1);
  82. #proximolado=0;
  83. if(#northtorre!=0);
  84. getidrel(0,0,+4,#northpossibilidade);
  85. if(#northpossibilidade=0);#vai=1;
  86. look(NORTH);wait(30ms);
  87. else;#sosouth=1;
  88. endif;
  89. else;#sosouth=1;
  90. endif;
  91. endif;
  92. if(#sosouth=1);
  93. #sosouth=0;
  94. if(#southtorre!=0);
  95. getidrel(0,0,-4,#southpossibilidade);
  96. if(#southpossibilidade=0);#vai=1;
  97. look(SOUTH);wait(30ms);
  98. else;#ultimatorre=1;
  99. endif;
  100. else;#ultimatorre=1;
  101. endif;
  102. endif;
  103.  
  104. if(#ultimatorre=1);
  105. endif;
  106. if(#vai=1);
  107. pick(5);wait(30ms);if(%ITEM%!=5);do;log(&1ACABOU AS TABUAS,PARE A MACRO!);wait(1);loop;endif;
  108. look(,90);wait(30ms);
  109. do;keydown(sneak);keydown(back);until(%HITID%!=3);wait(400ms);
  110. look(,80);wait(100ms);
  111. do;keydown(sneak);pick(5);keydown(back);key(use);until(%HITID%!=3);
  112. do;keydown(sneak);pick(5);keydown(back);key(use);until(%HITID%=3);wait(30ms);keyup(back);
  113. echo(/sethome t2);
  114. pick(279);wait(20ms);
  115. look(,0);wait(30ms);
  116. do;look(,+2);wait(3ms);until(%HITID%=5);
  117. do;key(attack);until(%HITID%!=5);wait(30ms);
  118. do;look(,+2);wait(3ms);until(%HITID%=5);
  119. do;key(attack);until(%HITID%!=5);wait(30ms);
  120. do;look(,+2);wait(3ms);until(%HITID%=5);
  121. do;key(attack);until(%HITID%!=5);wait(30ms);
  122. wait(500ms);
  123. #xp=%XPOS%;#xz=%ZPOS%;
  124. echo(/home t1);
  125. do;until((%XPOS%!=%#xp%)||(%ZPOS%!=%#zp%));wait(1);
  126. endif;
  127.  
  128.  
  129.  
  130.  
  131. #andarfeito=0;
  132. do;
  133.  
  134. gui(INVENTORY);wait(1t);
  135.  
  136. look(90,90);wait(1t);
  137. if(%HITID%!=3);log(arrumando posição devido a bugs);
  138. do;
  139. random(#randin,100,20);
  140. if(%HITID%!=3);
  141. do(5);keydown(sneak);look(90,90);keydown(left);wait(%#randin%ms);until(%HITID%=3);keyup(left);
  142. endif;
  143. if(%HITID%!=3);
  144. do(5);keydown(sneak);look(90,90);keydown(right);wait(%#randin%ms);until(%HITID%=3);keyup(right);
  145. endif;
  146. if(%HITID%!=3);
  147. do(5);keydown(sneak);look(90,90);keydown(back);wait(%#randin%ms);until(%HITID%=3);keyup(back);
  148. endif;
  149. if(%HITID%!=3);
  150. do(5);keydown(sneak);look(90,90);keydown(forward);wait(%#randin%ms);until(%HITID%=3);keyup(forward);
  151. endif;
  152. until(%HITID%=3);wait(10ms);keyup(right);keyup(left);keyup(forward);keyup(back);
  153. endif;
  154.  
  155.  
  156.  
  157.  
  158.  
  159.  
  160.  
  161.  
  162.  
  163.  
  164.  
  165. look(90,72);wait(1t);
  166. do(4);
  167. look(+90,76);wait(2t);
  168. if(%HITID%!=3);
  169. do;keydown(sneak);keydown(back);
  170. until(%HITID%=3);
  171. keyup(back);wait(1t);
  172. endif;
  173. loop;
  174. wait(5t);
  175.  
  176.  
  177. pick(3);
  178. #xpin=%XPOS%;#ypin=%YPOS%;#zpin=%ZPOS%;
  179. #bloquin=%#xpin%-1;#bloquiny=%#ypin%-1;
  180. #bloquiny2=%#ypin%+1;
  181. look(90,80);wait(300ms);
  182. echo(/sethome temp);wait(300ms);
  183. do;look(90,80);keydown(sneak);keydown(back);getid(%#bloquin%,%#bloquiny%,%#zpin%,#idbloquin);key(use);
  184. until(%#idbloquin%=3);keyup(back);wait(1t);
  185. look(90,64);wait(1t);clearchat;
  186. do;look(90,64);keydown(sneak);keydown(back);getid(%#xpin%,%#ypin%,%#zpin%,#idbloquin2);key(use);
  187. until(%#idbloquin2%=3);keyup(back);wait(1t);
  188. pick(12);wait(1t);
  189. look(90,23);wait(1t);key(use);wait(1t);
  190. if(%HITID%!=12);look(,68);do;pick(12);look(,-2);key(use);until(%HITID%=12);endif;
  191. echo(/warp loja);echo(/home temp);
  192. do;until(%XPOS%=%#xpin%);clearchat;
  193.  
  194.  
  195. #bugou2=0;
  196. ///desbugando de dentro do bloco//
  197. if(%YPOS%!=%#ypin%+2);
  198. do;
  199. wait(2);
  200. log(tentando desbugar);
  201. echo(/warp loja);echo(/home temp);
  202. do;until(%XPOS%=%#xpin%);
  203. #bugou2=%#bugou2%+1;
  204. until((%YPOS%=%#ypin%+2)||(%#bugou2%=5));
  205. endif;
  206.  
  207.  
  208.  
  209. if(#bugou2=5);
  210. echo(/desbugar);wait(2);
  211. #bugou2=0;
  212. log(a torre bugou,procurando solução para o bug);
  213. getidrel(0,-1,0,#idsecterra);
  214. if(#idsecterra=3);
  215. if(%YPOS%=%#ypin%+1);
  216. look(,90);pick(12);keydown(jump);wait(200ms);key(use);keyup(jump);
  217. elseif(%YPOS%=%#ypin%+2);
  218. do;look(,90);key(attack);until(%YPOS%=%ypin+1);wait(1);
  219. look(,90);pick(12);keydown(jump);wait(200ms);key(use);keyup(jump);
  220. elseif(%YPOS%=%#ypin%);
  221. look(,90);pick(3);keydown(jump);wait(200ms);key(use);keyup(jump);wait(1);
  222. look(,90);pick(12);keydown(jump);wait(200ms);key(use);keyup(jump);wait(1);
  223. endif;
  224. elseif(#idsecterra!=3);
  225. if((%XPOS%!=%#xpin%||(%ZPOS%!=%#zpin%));
  226. log(voce saiu da torre,ela bugou!,pulando de torre);
  227. #andarfeito=%#andares%
  228. else;
  229. log(não consegui achar o problema,tentando reiniciar esse andar);
  230. #ypin=%YPOS%;#zpin=%ZPOS%;#xpin=%XPOS%;
  231. look(,90);pick(3);keydown(jump);wait(200ms);key(use);keyup(jump);wait(1);
  232. look(,90);pick(12);keydown(jump);wait(200ms);key(use);keyup(jump);wait(1);
  233. endif;
  234. endif;
  235. endif;
  236.  
  237.  
  238.  
  239.  
  240.  
  241.  
  242.  
  243. if(%GUI%!="INVENTORY");gui(INVENTORY);wait(1t);endif;
  244. echo(/sethome temp);wait(500ms);
  245.  
  246.  
  247. look(270,78);wait(1t);
  248. do;keydown(sneak);keydown(forward);look(270,78);until(%HITID%=3);wait(1t);keyup(forward);
  249. gui();wait(1t);
  250. do;do;look(270,78);key(attack);until(%HITID%!=3);until(%HITID%!=3);wait(1t);
  251. gui(INVENTORY);wait(1t);
  252. look(90,90);wait(1t);
  253.  
  254.  
  255.  
  256. look(135,90);wait(1t);
  257. do;keydown(sneak);look(135,90);keydown(back);
  258. until(%HITID%!=12);wait(1);keyup(back);clearchat;
  259. pick(3);wait(1t);
  260.  
  261.  
  262.  
  263. do;
  264.  
  265. look(111,74);wait(3t);
  266. do;if(%HITID%!=3);#erro=1;look(-1,);pick(3);endif;
  267. until(%HITID%=3);if(#erro=1);look(-1,);wait(1t);endif;#erro=0;wait(3t);key(use);wait(3t);
  268.  
  269.  
  270. look(90,77);wait(2t);if(%HITID%!=3);#erro2=1;elseif(%HITID%=12);#erro2=1;do;key(attack);until(%HITID!=12);else;#erro2=0;endif;
  271.  
  272. until(%#erro2=0);
  273.  
  274.  
  275.  
  276. pick(12);wait(2t);
  277. look(111,74);wait(2t);
  278. do;key(use);wait(2t);
  279. until(%HITID%=12);wait(3t);
  280. pick(3);wait(2t);
  281. look(147,79);wait(2t);
  282. do;if(%HITID%!=3);#erro=1;look(+1,);pick(3);endif;
  283. until(%HITID%=3);if(#erro=1);look(+1,);wait(1t);endif;#erro=0;wait(2t);key(use);wait(3t);
  284. pick(12);wait(3t);
  285. look(147,79);wait(2t);
  286. do;key(use);wait(2t);
  287. until(%HITID%=12);wait(3t);
  288.  
  289.  
  290.  
  291. look(315,90);wait(1t);
  292. do;keydown(sneak);look(315,90);keydown(back);until(%HITID%=12);
  293. do;keydown(sneak);look(315,90);keydown(back);until(%HITID%!=12);wait(450ms);keyup(back);
  294. pick(3);wait(3t);
  295. look(304,79);wait(3t);
  296. do;if(%HITID%!=3);#erro=1;look(-1,);pick(3);endif;
  297. until(%HITID%=3);if(#erro=1);look(+1,);wait(1t);endif;#erro=0;wait(3t);key(use);wait(1t);
  298.  
  299.  
  300. pick(12);wait(2t);
  301. look(304,79);wait(2t);
  302. do;key(use);wait(2t);
  303. until(%HITID%=12);wait(2t);
  304. pick(3);wait(3t);
  305. look(326,79);wait(3t);
  306. do;if(%HITID%!=3);#erro=1;look(+1,);pick(3);endif;
  307. until(%HITID%=3);if(#erro=1);look(+1,);wait(1t);endif;#erro=0;wait(3t);key(use);wait(1t);
  308.  
  309.  
  310.  
  311. pick(12);wait(2t);
  312. look(326,79);wait(3t)
  313. do;key(use);wait(2t);
  314. until(%HITID%=12);wait(2t);
  315.  
  316.  
  317. pick(3);wait(1t);
  318. look(315,62);wait(1t);
  319. #ypin3=%#ypin%+2;
  320. do;keydown(left);key(use);getid(%#xpin%,%#ypin3%,%#zpin%,#bloquin3);log(%#bloquin3%);
  321. until(%#bloquin3%=3);keyup(left);
  322. look(336,36);wait(1t);
  323. key(use);wait(1t);
  324. echo(/warp loja);echo(/home temp);do;until((%XPOS%=%#xpin%)&&(%ZPOS%=%#zpin%));clearchat;
  325. if(%GUI%!="INVENTORY");gui(INVENTORY);wait(1t);endif;
  326.  
  327.  
  328.  
  329.  
  330. #deuruim=0;
  331. ///desbugando de dentro do bloco//
  332. if(%YPOS%!=%#ypin%+4);
  333. do;
  334. wait(2);
  335. echo(/warp loja);echo(/home temp);
  336. do;until(%XPOS%=%#xpin%);
  337. #deuruim=%#deuruim%+1
  338. until((%YPOS%=%#ypin%+4)||(%#deuruim%=10));
  339. endif;
  340. if(#deuruim=10);log(&eVISH!!!! &4DEU RUIM!!!!&e PULANDO DE TORRE!);
  341. #idbloquin=0;
  342. #idbloquin2=0;
  343. #idbloquin3=0;
  344. #bloquin3=0;#deuruim=0;#andarfeito=%#andares%;endif;
  345.  
  346.  
  347.  
  348.  
  349.  
  350. look(90,90);wait(1t);
  351. do;look(90,90);keydown(back);keydown(sneak);
  352. until(%HITID%=12);wait(600ms);keyup(back);
  353. pick(277);wait(1t);
  354. look(90,85);wait(1t);
  355. gui();wait(1t);
  356. do(3);
  357. do;key(attack);
  358. until(%HITID%!=3);wait(1t);
  359. loop;
  360. gui(INVENTORY);
  361. pick(81);wait(1t);
  362. look(90,90);wait(1t);
  363. do(5);key(use);wait(1t);
  364. loop;
  365. look(160,73);wait(1t);
  366. do(5);key(use);wait(1t);
  367. loop;
  368. look(20,73);wait(1t);
  369. do(5);key(use);wait(1t);
  370. loop;
  371. look(90,75);wait(1t);
  372. #bugareia=0;
  373. do;look(90,75);keydown(sneak);keydown(forward);#bugareia=%#bugareia%+1;if(#bugareia=40);break;endif;
  374. until(%HITID%=12);wait(1t);keyup(forward);
  375.  
  376. if(#bugareia=40);getidrel(0,-4,0,#concerto1);
  377. if(#concerto1=3);pick(12);look(270,80);wait(2t);
  378. if(%HITID%=3);log(talvez consiga concertar);key(use);wait(1);
  379. getidrel(0,-3,0#concerto2);
  380. if(#concerto2=12);pick(81);look(,90);wait(2t);key(use);wait(1t);
  381. endif;
  382. endif;
  383. endif;
  384. endif;
  385.  
  386. do(5);key(use);wait(1t);
  387. loop;
  388. #idbloquin=0;
  389. #idbloquin2=0;
  390. #idbloquin3=0;
  391. #bloquin3=0;
  392.  
  393.  
  394.  
  395.  
  396.  
  397.  
  398. //////////// repondo inventario ///////////
  399.  
  400. log(verificando inventario);wait(1);
  401. gui(inventory);wait(1);
  402. ////////////////// terra repondo ////////////
  403. pick(3);wait(100ms);
  404. if(%STACKSIZE%<15);
  405. for(#i,9,35);
  406. getslotitem(%#i%,#id);
  407. if(%#id%=3);
  408. slotclick(%#i%,l,true);
  409. wait(75ms);
  410. endif;
  411. next;
  412. wait(400ms);
  413. if(%STACKSIZE%<9);#faltaterra=1;#falta=1;endif;
  414. endif;
  415. ///////////////// areia repondo ///////////
  416. pick(12);wait(100ms);
  417. if(%STACKSIZE%<15);
  418. for(#i,9,35);
  419. getslotitem(%#i%,#id);
  420. if(%#id%=12);
  421. slotclick(%#i%,l,true);
  422. wait(75ms);
  423. endif;
  424. next;
  425. wait(400ms);
  426. if(%STACKSIZE%<9);#faltaareia=1;#falta=1;endif;
  427. endif;
  428. ////////////// cacto repondo /////////////
  429. pick(81);wait(100ms);
  430. if(%STACKSIZE%<15);
  431. for(#i,9,35);
  432. getslotitem(%#i%,#id);
  433. if(%#id%=81);
  434. slotclick(%#i%,l,true);
  435. wait(75ms);
  436. endif;
  437. next;
  438. wait(400ms);
  439. if(%STACKSIZE%<9);#faltacacto=1;#falta=1;endif;
  440. endif;
  441. gui();
  442.  
  443.  
  444. wait(300ms);echo(/sethome temp);wait(100ms);
  445.  
  446.  
  447.  
  448. /////////////VERIFICANDO SE PRECISA IR NO ARMAZEM///////////
  449.  
  450. if(#falta=1);
  451. #posix=%XPOS%;#posiz=%ZPOS%;
  452. wait(1600ms);echo(/warp loja);echo(/home armazem);
  453. do;until((%XPOS%!=%#posix%)||(%ZPOS%!=%#posiz%));wait(200ms);
  454. log(&1EVINTANDO BUGS!);do(5);keydown(jump);wait(70ms);loop;keyup(jump);wait(200ms);
  455. log(&5LEMBRE,SUA HOME DEVE ESTAR OLHANDO PARA WEST&2,&4apenas ignore se já estiver..);
  456. getidrel(-2,0,0,#verificandobaus);
  457. if(#verificandobaus!=54);if(#verificandobaus!=146);log(&4macro parou por não encontrar armazem);
  458. unset(cacto);stop;endif;endif;
  459.  
  460.  
  461.  
  462.  
  463. ////////TERRA BAUS/////////
  464.  
  465.  
  466. if(#faltaterra=1);keyup(sneak);
  467. log(repondo terra!);wait(2);
  468.  
  469. #pegouterra=0;
  470. #bauterra=1;
  471.  
  472. do;
  473. look(west);wait(5ms);
  474.  
  475. if(#bauterra=1);look(-35,35);elseif(#bauterra=2);look(,35);elseif(#bauterra=3);look(+35,35);
  476. elseif(#bauterra=4);look(-35,0);elseif(#bauterra=5);look(,0);elseif(#bauterra=6);look(+35,0);
  477. elseif(#bauterra=7);look(-35,331);elseif(#bauterra=8);look(,331);elseif(#bauterra=9);look(+35,331);
  478. endif;
  479.  
  480. wait(500ms);
  481. pick(277);wait(3ms);do;key(use);wait(300ms);until(%GUI%="GUICHEST");
  482. pick(3);wait(20ms);
  483. for(#i,0,54);
  484. getslotitem(%#i%,#id);
  485. if(#pegouterra>7);break;endif;
  486. if(%#id%=3);
  487. #pegouterra=%#pegouterra%+1;
  488. slotclick(%#i%,l,true);
  489. wait(75ms);
  490.  
  491. endif;
  492. next;
  493. if(%STACKSIZE%<9);gui();wait(20ms);#bauterra=%#bauterra%+1;endif;
  494. if(#bauterra>9);log(&1&lACABOU RECURSO! PARANDO MACRO..);unset(cacto);stop;endif;
  495. if(%STACKSIZE%>9);#faltaterra=0;LOG(TERRA OK);gui();endif;
  496. until(#faltaterra!=1);
  497. endif;
  498.  
  499.  
  500.  
  501.  
  502. ////////AREIA BAUS/////////
  503.  
  504.  
  505. if(#faltaareia=1);keyup(sneak);
  506. log(repondo areia!);wait(2);
  507.  
  508. #pegouareia=0;
  509. #bauterra=1;
  510.  
  511. do;
  512. look(south);wait(5ms);
  513.  
  514. if(#bauterra=1);look(-35,35);elseif(#bauterra=2);look(,35);elseif(#bauterra=3);look(+35,35);
  515. elseif(#bauterra=4);look(-35,0);elseif(#bauterra=5);look(,0);elseif(#bauterra=6);look(+35,0);
  516. elseif(#bauterra=7);look(-35,331);elseif(#bauterra=8);look(,331);elseif(#bauterra=9);look(+35,331);
  517. endif;
  518.  
  519. wait(500ms);
  520. pick(277);wait(3ms);do;key(use);wait(300ms);until(%GUI%="GUICHEST");
  521. pick(12);wait(20ms);
  522. for(#i,0,54);
  523. getslotitem(%#i%,#id);
  524. if(#pegouareia>7);break;endif;
  525. if(%#id%=12);
  526. #pegouareia=%#pegouareia%+1;
  527. slotclick(%#i%,l,true);
  528. wait(75ms);
  529.  
  530. endif;
  531. next;
  532. if(%STACKSIZE%<9);gui();wait(20ms);#bauterra=%#bauterra%+1;endif;
  533. if(#bauterra>9);log(&1&lACABOU RECURSO! PARANDO MACRO..);unset(cacto);stop;endif;
  534. if(%STACKSIZE%>9);#faltaareia=0;LOG(AREIA OK);gui();endif;
  535. until(#faltaareia!=1);
  536. endif;
  537.  
  538.  
  539.  
  540.  
  541. ////////CACTO BAUS/////////
  542.  
  543.  
  544. if(#faltacacto=1);keyup(sneak);
  545. log(repondo cacto!);wait(2);
  546.  
  547. #pegoucacto=0;
  548. #bauterra=1;
  549.  
  550. do;
  551. look(north);wait(5ms);
  552.  
  553. if(#bauterra=1);look(-35,35);elseif(#bauterra=2);look(,35);elseif(#bauterra=3);look(+35,35);
  554. elseif(#bauterra=4);look(-35,0);elseif(#bauterra=5);look(,0);elseif(#bauterra=6);look(+35,0);
  555. elseif(#bauterra=7);look(-35,331);elseif(#bauterra=8);look(,331);elseif(#bauterra=9);look(+35,331);
  556. endif;
  557.  
  558. wait(500ms);
  559. pick(277);wait(3ms);do;key(use);wait(300ms);until(%GUI%="GUICHEST");
  560. pick(81);wait(20ms);
  561. for(#i,0,54);
  562. getslotitem(%#i%,#id);
  563. if(#pegoucacto>7);break;endif;
  564. if(%#id%=81);
  565. #pegoucacto=%#pegoucacto%+1;
  566. slotclick(%#i%,l,true);
  567. wait(75ms);
  568.  
  569. endif;
  570. next;
  571. if(%STACKSIZE%<9);gui();wait(20ms);#bauterra=%#bauterra%+1;endif;
  572. if(#bauterra>9);log(&1&lACABOU RECURSO! PARANDO MACRO..);unset(cacto);stop;endif;
  573. if(%STACKSIZE%>9);#faltacacto=0;LOG(CACTO OK);gui();endif;
  574. until(#faltacacto!=1);
  575. endif;
  576.  
  577.  
  578.  
  579.  
  580.  
  581.  
  582.  
  583. ////////////// VOLTANDO PARA A TORRE ////////////
  584.  
  585. #posix=%XPOS%;#posiz=%ZPOS%;
  586. echo(/home temp);
  587. do;until((%XPOS%!=%#posix%)||(%ZPOS%!=%#posiz%));wait(1);echo(/desbugar);wait(1);
  588. #falta=0;
  589.  
  590. endif;
  591.  
  592. LOG(&aAndar concluido.);
  593. INC(#feitos);
  594. LOG(&9Andares: &f%#feitos%/%#andares%);
  595. if(%HUNGER%<2);if(#vip!=1);echo(/fome);elseif(#vip=1);#posix=%XPOS%;#posiz=%ZPOS%;
  596. echo(/warp loja);
  597. do;until((%XPOS%!=%#posix%)||(%ZPOS%!=%#posiz%));wait(2);#posix=%XPOS%;#posiz=%ZPOS%;
  598. echo(/home temp);
  599. do;until((%XPOS%!=%#posix%)||(%ZPOS%!=%#posiz%));wait(1);echo(/desbugar);wait(1);endif;endif;
  600.  
  601.  
  602.  
  603.  
  604.  
  605.  
  606.  
  607. ////////////// verificando horario atual sobre reset /////////////12:00 22:00 06:00/////
  608.  
  609. if(&reset="sim");
  610. time(&temposerver,HHmm);@#tempotest=1;type( %&temposerver%);
  611. prompt(#temporesult,$$?,gambiarra loca para reset);
  612.  
  613. if(#temporesult>1153);if(#temporesult<1200);#posix=%XPOS%;#posiz=%ZPOS%;
  614. do;log(ACHO QUE O SERVER VAI RESETAR,VOU ESPERAR..);wait(2);
  615. until((%XPOS%=%#posispawnx%)&&(%ZPOS%=%#posispawnz%))
  616. do;log(CACTO ESPERANDO LOGIN!)wait(500ms);until((%XPOS%=%#posix%)&&(%ZPOS%=%#posiz%));
  617. wait(900ms);echo(/desbugar);wait(2);
  618. endif;endif;
  619. if(#temporesult>2153);if(#temporesult<2240);#posix=%XPOS%;#posiz=%ZPOS%;
  620. do;log(ACHO QUE O SERVER VAI RESETAR,VOU ESPERAR..);wait(2);
  621. until((%XPOS%=%#posispawnx%)&&(%ZPOS%=%#posispawnz%))
  622. do;log(CACTO ESPERANDO LOGIN!)wait(500ms);until((%XPOS%=%#posix%)&&(%ZPOS%=%#posiz%));
  623. wait(900ms);echo(/desbugar);wait(2);
  624. endif;endif;
  625. if(#temporesult>0553);if(#temporesult<0600);#posix=%XPOS%;#posiz=%ZPOS%;
  626. do;log(ACHO QUE O SERVER VAI RESETAR,VOU ESPERAR..);wait(2);
  627. until((%XPOS%=%#posispawnx%)&&(%ZPOS%=%#posispawnz%))
  628. do;log(CACTO ESPERANDO LOGIN!)wait(500ms);until((%XPOS%=%#posix%)&&(%ZPOS%=%#posiz%));
  629. wait(900ms);echo(/desbugar);wait(2);
  630. endif;endif;
  631. endif;
  632.  
  633.  
  634.  
  635.  
  636.  
  637.  
  638. #andarfeito=%#andarfeito%+1;
  639. until(%#andarfeito%=%#andares%);
  640. LOG(&aAndar concluido,indo para o proximo.);
  641.  
  642. ////////pulando de torre/////////////
  643.  
  644.  
  645. #temptorre=%#temptorre%+1;
  646. #xp=%XPOS%;#xz=%ZPOS%
  647. echo(/home t%#temptorre%);
  648. do;until((%XPOS%!=%#xp%)||(%ZPOS%!=%#zp%));wait(1);
  649. echo(/desbugar);wait(1);
  650. #temptorre=1;
  651. playsound(mob.cat.meow);log(&5MOD BY IAN >;3);
  652. until(%#temptorre%=%#torres%+999);
  653.  
  654. /////////////// FIM /// UFA ;-; ///
  655. endif;
  656.  
  657.  
  658. }$$
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!