Facebook

Untitled safest cryptocurrency exchange

From KANAZAMI, 3 Years ago, written in Plain Text.
URL https://pastebin.pl/view/95785267
Embed
Download Paste or View Raw
Hits: 121
  1. $${
  2. if(cacto);
  3. unset(cacto);
  4. log(&9[%PLAYER%] &bCacto &4OFF);
  5. log(&6ATÉ OUTRO DIA MESTRE);
  6. unsprint;
  7. keyup(forward);
  8. keyup(jump);
  9. keyup(back);
  10. keyup(right);
  11. keyup(left);
  12. keyup(sneak);
  13. @#tempotest=0;
  14. #temporesult=0;
  15. stop;
  16. endif;
  17. else;
  18. set(cacto);
  19. log(&9[%PLAYER%] &bCacto &2ON);
  20.  
  21. #vip=0;
  22. #falta=0;
  23. #antireset=0;
  24. #faltapedra=0;
  25. #feitos=0;
  26. #torres=0;
  27. #inicio=0;
  28. #construir=0;
  29. @#tempotest=0;
  30. #temporesult=0;
  31. #guardaritens=0;
  32. #comprarpedra=0;
  33. #comprarareia=0;
  34. #comprarterra=0;
  35. #comprarcacto=0;
  36. #farmarcacto=0;
  37. #bauareia=0;
  38. #bauterra=0;
  39. #baucacto=0;
  40. #bautudo=0;
  41. #deseja=0;
  42. #comprarpedras=0;
  43. #pedir2=0;
  44. #comprar=0;
  45. #pedir=0;
  46.  
  47. do;
  48. prompt(#vip,$$?,"Você é vip? 1-sim 2-não");
  49. until((%#vip%=1)||(%#vip%=2));
  50.  
  51. do;
  52. prompt(#antireset,$$?,"Deseja usar o anti-reset server? 1-sim 2-não");
  53. until((%#antireset%=1)||(%#antireset%=2));
  54.  
  55. if(%#antireset%=1);
  56. log(");
  57. log("&5&lVOCÊ VAI USAR O ANTIRESET, LEMBRESSE DE USAR O OUTRO SCRIPT");
  58. log(");
  59. endif;
  60.  
  61. do;
  62. prompt(#deseja,$$?,"Deseja comprar algum material quando acabarem? 1-sim 2-não");
  63. until((%#deseja%=1)||(%#deseja%=2));
  64.  
  65. if(#deseja=1);
  66.  
  67. do;
  68. prompt(#comprarpedras,$$?,"Deseja comprar pedras quando acabarem? 1-sim 2-não");
  69. until((%#comprarpedras%=1)||(%#comprarpedras%=2));
  70.  
  71. if(%#comprarpedras%=1);
  72. do;
  73. prompt(#pedir2,$$?,"Deseja pedir money, quando acabar money para as pedras? 1-sim 2-não");
  74. until((%#pedir2%=1)||(%#pedir2%=2));
  75. endif;
  76.  
  77. if(%#pedir2%=1);
  78. prompt(&money2,$$u,"Qual conta enviará money para as pedras? 1-sim 2-não");
  79. endif;
  80.  
  81. do;
  82. prompt(#comprar,$$?,"Deseja comprar materiais quando acabar no armazem? 1-sim 2-não");
  83. until((%#comprar%=1)||(%#comprar%=2));
  84.  
  85. if(%#comprar%=1);
  86. do;
  87. prompt(#pedir,$$?,"Deseja pedir money, quando acabar money para os recursos? 1-sim 2-não");
  88. until((%#pedir%=1)||(%#pedir%=2));
  89. endif;
  90.  
  91. if(%#pedir%=1);
  92. prompt(&money,$$u,"Qual conta enviará money para os recursos?");
  93. endif;
  94.  
  95. endif;
  96.  
  97. do;
  98. log(");
  99. log("Os que atrapalham a macro são: Velocidade, Pressa e Superpulo");
  100. log(");
  101. prompt(#speed,$$?,"Há sinalizadores com efeito em algum lugar que a macro irá? 1-sim 2-não");
  102. until((%#speed%=1)||(%#speed%=2));
  103.  
  104. if(#speed=1);
  105. log(");
  106. log("&9&lLembre a macro ficará mais lenta, para evitar ocorrer bugs");
  107. log(");
  108. endif;
  109.  
  110. prompt(#andares,$$?,"Quantos andares deseja fazer?");
  111.  
  112. if(%#andares%<1);log("O número de andares deve ser igual ou maior que 1");
  113. unset(cacto);stop;
  114. endif;
  115.  
  116. prompt(#torres,$$?,"Quantas torres deseja fazer?");
  117.  
  118. if(%#torres%<1);log("O número de torres deve ser igual ou maior que 1");
  119. unset(cacto);stop;
  120. endif;
  121.  
  122. if(#speed=2);
  123.  
  124. #inicio=%#torres%;
  125. do(%#inicio%);
  126. wait(2);echo(/sethome t1);#vai=0;
  127. //
  128.  
  129. getidrel(+4,-1,0,#westtorre);
  130.     getidrel(-4,-1,0,#easttorre);
  131.     getidrel(0,-1,+4,#northtorre);
  132.     getidrel(0,-1,-4,#southtorre);
  133.    
  134.     if(#westtorre!=0);
  135.         getidrel(+4,0,0,#westpossibilidade);
  136.         if(#westpossibilidade=0);#vai=1;&olhar=WEST;
  137.             look(WEST);wait(30ms);
  138.         endif;
  139.     endif;
  140.    
  141.     if((#westtorre=0)||(#westpossibilidade!=0));
  142.         if(#easttorre!=0);
  143.                 getidrel(-4,0,0,#eastpossibilidade);
  144.                 if(#eastpossibilidade=0);#vai=1;&olhar=EAST;
  145.                     look(EAST);wait(30ms);
  146.                 else;#proximolado=1;
  147.                 endif;
  148.         else;#proximolado=1;
  149.         endif;
  150.     endif;
  151.    
  152.     if(#proximolado=1);
  153.         #proximolado=0;
  154.         if(#northtorre!=0);
  155.             getidrel(0,0,+4,#northpossibilidade);
  156.             if(#northpossibilidade=0);#vai=1;&olhar=NORTH;
  157.                 look(NORTH);wait(30ms);
  158.             else;#sosouth=1;
  159.             endif;
  160.         else;#sosouth=1;
  161.         endif;
  162.     endif;
  163.  
  164.     if(#sosouth=1);
  165.         #sosouth=0;
  166.         if(#southtorre!=0);
  167.             getidrel(0,0,-4,#southpossibilidade);
  168.             if(#southpossibilidade=0);#vai=1;&olhar=SOUTH;
  169.                 look(SOUTH);wait(30ms);
  170.             else;#ultimatorre=1;
  171.             endif;
  172.         else;#ultimatorre=1;
  173.         endif;
  174.     endif;
  175.  
  176.     if(#ultimatorre=1);
  177.     endif;
  178. //
  179.  
  180. pick(1);wait(1ms);
  181. if(#comprarpedras=1);
  182. if((%ITEM%!=1)||(%STACKSIZE%<3));#comprarpedra=1;endif;                                            
  183. if((%#vip%=1)&&(%#comprarpedra%=1));
  184.  
  185. if(%#antireset%=1);
  186. log(verificando hora);
  187. @#resetcacto=1;
  188. do;until(@#resetcacto=0);
  189. prompt(#horinha,$$?,"verificando hora atual,não toque no teclado!");
  190. if((#horinha>0548)&&(#horinha<0559));
  191.     log(esperando server reiniciar);
  192.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  193.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  194.     log(retornando a macro...);wait(3);
  195. elseif((#horinha>1148)&&(#horinha<1159));
  196.     log(esperando server reiniciar);
  197.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  198.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  199.     log(retornando a macro...);wait(3);
  200. elseif((#horinha>2148)&&(#horinha<2159));
  201.     log(esperando server reiniciar);
  202.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  203.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  204.     log(retornando a macro...);wait(3);
  205. endif;
  206. endif;
  207.  
  208. log("Comprando pedra");
  209.                 echo(/warp lojavip);wait(2);do(2);keydown(jump);wait(500ms);keyup(jump);loop;wait(2);    
  210.  
  211.  
  212.                                         #vaiolhary=330;
  213.                                         #vaiolharp=0;
  214.                                          
  215.                                          
  216.                                         look(%#vaiolhary%,%#vaiolharp%);
  217.                                          
  218.                                         //indo até a pedra
  219.                                          
  220.                                         do;
  221.                                         #irpedra=3934;
  222.                                         #irpedra2=1307;
  223.                                         look(%#vaiolhary%,%#vaiolharp%);
  224.                                         sprint;
  225.                                         keydown(forward);
  226.                                         if((%XPOS% = 3681)&&(%ZPOS% = 952));
  227.                                         keydown(jump);wait(250ms);keyup(jump);
  228.                                         endif;
  229.                                         until((%XPOS% = %#irpedra%)&&(%ZPOS% = %#irpedra2%));
  230.                                         unsprint;
  231.                                         keyup(forward);
  232.                                          
  233.                                         look(0,80);
  234.                                         gui(inventory);
  235.                                         do(4);key(use);wait(3);loop;
  236.                                         gui;
  237.                                         log(&f&lPedra comprada com sucesso!);
  238.                                        
  239.                                         wait(1);
  240.                                        
  241.                                         //verificando se a posição X passou e voltando
  242.                                            if(%XPOS% != %#irpedra%);
  243.                                         if(%XPOS% < %#irpedra%);
  244.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  245.                                         do;
  246.                                         look(EAST);
  247.                                         keydown(sneak);
  248.                                         keydown(forward);
  249.                                         until(%XPOS% = %#irpedra%);
  250.                                         keyup(forward);
  251.                                         keyup(sneak);
  252.                                         look(0,335);
  253.                                         gui(inventory);
  254.                                         do(4);key(use);wait(3);loop;
  255.                                         gui;
  256.                                         log(&f&lPedra comprada com sucesso!);
  257.                                         elseif(%XPOS% > %#irpedra%);
  258.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  259.                                         do;
  260.                                         look(WEST);
  261.                                         keydown(sneak);
  262.                                         keydown(forward);
  263.                                         until(%XPOS% = %#irpedra%);
  264.                                         keyup(forward);
  265.                                         keyup(sneak);
  266.                                         look(0,335);
  267.                                         gui(inventory);
  268.                                         do(4);key(use);wait(3);loop;
  269.                                         gui;
  270.                                         log(&f&lPedra comprada com sucesso!);
  271.                                         endif;
  272.                                            endif;
  273.                                        
  274.                                                
  275.                                          
  276.                                         //verificando se a posição Z passou e voltando
  277.                                            if(%ZPOS% != %#irpedra2%);
  278.                                         if(%ZPOS% < %#irpedra2%);
  279.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  280.                                         do;
  281.                                         look(SOUTH);
  282.                                         keydown(forward);
  283.                                         keydown(sneak);
  284.                                         until(%ZPOS% = %#irpedra2%);
  285.                                         keyup(forward);
  286.                                         keyup(sneak);
  287.                                         look(0,335);
  288.                                         gui(inventory);
  289.                                         do(4);key(use);wait(3);loop;
  290.                                         gui;
  291.                                         log(&f&lPedra comprada com sucesso!);                              
  292.                                         elseif(%ZPOS% > %#irpedra2%);
  293.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  294.                                         do;
  295.                                         look(NORTH);
  296.                                         keydown(sneak);
  297.                                         keydown(forward);
  298.                                         until(%ZPOS% = %#irpedra2%);
  299.                                         keyup(forward);
  300.                                         keyup(sneak);
  301.                                         look(0,335);
  302.                                         gui(inventory);
  303.                                         do(4);key(use);wait(3);loop;
  304.                                         gui;
  305.                                         log(&f&lPedra comprada com sucesso!);
  306.                                         endif;
  307.                                            endif;
  308.                                        
  309.                                         wait(1);echo(/home t1);wait(2);#comprarpedra=0;
  310.                            
  311. elseif((%#vip%=2)&&(%#comprarpedra%=1));
  312.  
  313. if(%#antireset%=1);
  314. log(verificando hora);
  315. @#resetcacto=1;
  316. do;until(@#resetcacto=0);
  317. prompt(#horinha,$$?,"verificando hora atual,não toque no teclado!");
  318. if((#horinha>0548)&&(#horinha<0559));
  319.     log(esperando server reiniciar);
  320.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  321.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  322.     log(retornando a macro...);wait(3);
  323. elseif((#horinha>1148)&&(#horinha<1159));
  324.     log(esperando server reiniciar);
  325.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  326.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  327.     log(retornando a macro...);wait(3);
  328. elseif((#horinha>2148)&&(#horinha<2159));
  329.     log(esperando server reiniciar);
  330.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  331.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  332.     log(retornando a macro...);wait(3);
  333. endif;
  334. endif;
  335.  
  336. log("Comprando pedra");
  337.                 echo(/warp loja);wait(2);do(2);keydown(jump);wait(500ms);keyup(jump);loop;wait(2);    
  338.  
  339.  
  340.                                         #vaiolhary=330;
  341.                                         #vaiolharp=0;
  342.                                          
  343.                                          
  344.                                         look(%#vaiolhary%,%#vaiolharp%);
  345.                                          
  346.                                         //indo até a pedra
  347.                                          
  348.                                         do;
  349.                                         #irpedra=3664;
  350.                                         #irpedra2=939;
  351.                                         look(%#vaiolhary%,%#vaiolharp%);
  352.                                         sprint;
  353.                                         keydown(forward);
  354.                                         if((%XPOS% = 3681)&&(%ZPOS% = 952));
  355.                                         keydown(jump);wait(250ms);keyup(jump);
  356.                                         endif;
  357.                                         until((%XPOS% = %#irpedra%)&&(%ZPOS% = %#irpedra2%));
  358.                                         unsprint;
  359.                                         keyup(forward);
  360.                                          
  361.                                         look(0,335);
  362.                                         gui(inventory);
  363.                                         do(4);key(use);wait(3);loop;
  364.                                         gui;
  365.                                         log(&f&lPedra comprada com sucesso!);
  366.                                        
  367.                                         wait(1);
  368.                                          
  369.                                         //verificando se a posição X passou e voltando
  370.                                            if(%XPOS% != %#irpedra%);
  371.                                         if(%XPOS% < %#irpedra%);
  372.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  373.                                         do;
  374.                                         look(EAST);
  375.                                         keydown(sneak);
  376.                                         keydown(forward);
  377.                                         until(%XPOS% = %#irpedra%);
  378.                                         keyup(forward);
  379.                                         keyup(sneak);
  380.                                         look(0,335);
  381.                                         gui(inventory);
  382.                                         do(4);key(use);wait(3);loop;
  383.                                         gui;
  384.                                         log(&f&lPedra comprada com sucesso!);
  385.                                         elseif(%XPOS% > %#irpedra%);
  386.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  387.                                         do;
  388.                                         look(WEST);
  389.                                         keydown(sneak);
  390.                                         keydown(forward);
  391.                                         until(%XPOS% = %#irpedra%);
  392.                                         keyup(forward);
  393.                                         keyup(sneak);
  394.                                         look(0,335);
  395.                                         gui(inventory);
  396.                                         do(4);key(use);wait(3);loop;
  397.                                         gui;
  398.                                         log(&f&lPedra comprada com sucesso!);
  399.                                         endif;
  400.                                            endif;
  401.                                        
  402.                                                
  403.                                          
  404.                                         //verificando se a posição Z passou e voltando
  405.                                            if(%ZPOS% != %#irpedra2%);
  406.                                         if(%ZPOS% < %#irpedra2%);
  407.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  408.                                         do;
  409.                                         look(SOUTH);
  410.                                         keydown(forward);
  411.                                         keydown(sneak);
  412.                                         until(%ZPOS% = %#irpedra2%);
  413.                                         keyup(forward);
  414.                                         keyup(sneak);
  415.                                         look(0,335);
  416.                                         gui(inventory);
  417.                                         do(4);key(use);wait(3);loop;
  418.                                         gui;
  419.                                         log(&f&lPedra comprada com sucesso!);                              
  420.                                         elseif(%ZPOS% > %#irpedra2%);
  421.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  422.                                         do;
  423.                                         look(NORTH);
  424.                                         keydown(sneak);
  425.                                         keydown(forward);
  426.                                         until(%ZPOS% = %#irpedra2%);
  427.                                         keyup(forward);
  428.                                         keyup(sneak);
  429.                                         look(0,335);
  430.                                         gui(inventory);
  431.                                         do(4);key(use);wait(3);loop;
  432.                                         gui;
  433.                                         log(&f&lPedra comprada com sucesso!);
  434.                                         endif;
  435.                                            endif;
  436.                                        
  437.                                         wait(1);echo(/home t1);wait(2);#comprarpedra=0;
  438.  
  439. endif;
  440.  
  441. elseif(#comprarpedras=2);
  442. if((%ITEM%!=1)||(%STACKSIZE%<3));do;log("&1ACABOU PEDRA, PARE A MACRO!);wait(1);loop;endif;
  443. endif;
  444.  
  445. if(%#vai%=1);
  446. look(%&olhar%);
  447.         pick(1);wait(1ms);
  448.         do;look(,80);pick(1);
  449.         look(,80);keydown(sneak);pick(1);keydown(back);pick(1);key(use);until(%HITID%!=3);pick(1);wait(1ms);pick(1);
  450.         look(,80);pick(1);wait(1ms);pick(1)
  451.         do;look(,80);keydown(sneak);pick(1);keydown(back);pick(1);key(use);pick(1);until(%HITID%!=3);pick(1)
  452.         do;look(,80);keydown(sneak);pick(1);keydown(back);pick(1);key(use);pick(1);until(%HITID%=3);pick(1);wait(30ms);pick(1);keyup(back);pick(1)
  453.         echo(/sethome t2);
  454.         pick(278);
  455.         look(,0);
  456.         do;look(,+1);until(%HITID%=1);
  457.         do;key(attack);until(%HITID%!=1);
  458.         do;look(,+1);until(%HITID%=1);
  459.         do;key(attack);until(%HITID%!=1);
  460.         do;look(,+1);until(%HITID%=1);
  461.         do;key(attack);until(%HITID%!=1);
  462.         wait(500ms);
  463.         #xp=%XPOS%;#xz=%ZPOS%;
  464.         echo(/home t1);
  465.         do;until((%XPOS%!=%#xp%)||(%ZPOS%!=%#zp%));wait(1);
  466. elseif(%#vai%!=1);
  467. log("Não há terras ao redor, parando macro..");
  468. unset(cacto);stop;
  469. endif;
  470.  
  471.  
  472. #construir=%#andares%;
  473. //torre
  474. do(%#construir%);
  475. #yp=%YPOS%;
  476. pick(3);look(90,90);keydown(JUMP);wait(200ms);key(use);keyup(JUMP);wait(400ms);
  477. wait(600ms);
  478. //evitar erros
  479. if(%YPOS%=%#yp%);
  480. pick(3);look(90,90);keydown(JUMP);wait(200ms);key(use);keyup(JUMP);wait(400ms);
  481. endif;
  482. echo(/sethome temp2);
  483.  
  484. keydown(sneak);
  485. look(90,80);pick(3);keydown(back);wait(800ms);keyup(back);key(use);wait(400ms);
  486. look(270,80);pick(3);keydown(back);wait(1600ms);keyup(back);wait(100ms);key(use);wait(400ms);
  487. look(90,80);keydown(back);wait(680ms);keyup(back);wait(400ms);
  488. look(0,80);pick(3);keydown(back);wait(800ms);keyup(back);wait(100ms);key(use);wait(400ms);
  489. look(180,80);pick(3);keydown(back);wait(1600ms);keyup(back);key(use);wait(400ms);
  490. look(0,80);keydown(back);wait(680ms);keyup(back);wait(400ms);
  491. keyup(sneak);
  492.  
  493. //parte para evitar erros
  494. getidrel(-1,-1,0,#id);
  495. if(%#id%!=3);
  496. pick(3);
  497. look(90,80);
  498. keydown(sneak);
  499. keydown(back);
  500. wait(1500ms);
  501. keyup(back);
  502. keyup(sneak);
  503. key(use);
  504. keydown(sneak);
  505. keydown(forward);
  506. wait(680ms);
  507. keyup(sneak);
  508. keyup(forward);
  509. endif;
  510. getidrel(0,-1,1,#id);
  511. if(%#id%!=3);
  512. pick(3);
  513. look(0,80);
  514. keydown(sneak);
  515. keydown(back);
  516. wait(1500ms);
  517. keyup(back);
  518. keyup(sneak);
  519. key(use);
  520. keydown(sneak);
  521. keydown(forward);
  522. wait(680ms);
  523. keyup(sneak);
  524. keyup(forward);
  525. endif;
  526. getidrel(+1,-1,0,#id);
  527. if(%#id%!=3);
  528. pick(3);
  529. look(270,80);
  530. keydown(sneak);
  531. keydown(back);
  532. wait(1500ms);
  533. keyup(back);
  534. keyup(sneak);
  535. key(use);
  536. keydown(sneak);
  537. keydown(forward);
  538. wait(680ms);
  539. keyup(sneak);
  540. keyup(forward);
  541. endif;
  542. getidrel(0,-1,-1,#id);
  543. if(%#id%!=3);
  544. pick(3);
  545. look(180,80);
  546. keydown(sneak);
  547. keydown(back);
  548. wait(1500ms);
  549. keyup(back);
  550. keyup(sneak);
  551. key(use);
  552. keydown(sneak);
  553. keydown(forward);
  554. wait(680ms);
  555. keyup(sneak);
  556. keyup(forward);
  557. endif;
  558.  
  559. do(4);pick(12);look(+90,60);wait(100ms);key(use);wait(350ms);loop;
  560. do(3);pick(3);look(90,90);keydown(jump);wait(200ms);key(use);keyup(jump);wait(400ms);loop;
  561. keydown(sneak);look(90,84);keydown(back);wait(1);keyup(back);wait(200ms);keyup(sneak);wait(1);
  562. do;pick(277);key(attack);look(90,84);wait(1);until(%HITID%=0);
  563.  
  564. keydown(sneak);
  565. look(+0,90);pick(81);wait(50ms);key(use);wait(300ms);
  566. look(150,69);pick(81);wait(50ms);key(use);wait(300ms);
  567. look(23,69);pick(81);wait(50ms);key(use);wait(300ms);look(270,90);
  568. keydown(sneak);keydown(back);wait(1300ms);keyup(back);wait(400ms);keyup(sneak);
  569. look(+0,90);pick(81);wait(50ms);key(use);wait(300ms);
  570. keyup(sneak);
  571. look(90,90);
  572. keydown(sneak);keydown(back);wait(600ms);keyup(back);wait(400ms);keyup(sneak);
  573. echo(/fix all);wait(750ms);
  574. log(&aAndar concluido.);
  575. echo(/sethome temp);
  576. wait(750ms);
  577. //verificando se há erros
  578.  
  579. getidrel(-1,-4,0,#id);
  580. if(%#id%!=3);
  581. wait(300ms);
  582. echo(/home temp2);
  583. wait(2);
  584. getidrel(-1,-1,0,#id);
  585. if(%#id%!=3);
  586. pick(3);
  587. look(90,80);
  588. keydown(sneak);
  589. keydown(back);
  590. wait(1500ms);
  591. keyup(back);
  592. keyup(sneak);
  593. key(use);
  594. wait(300ms);
  595. keydown(sneak);
  596. keydown(forward);
  597. wait(680ms);
  598. keyup(sneak);
  599. keyup(forward);
  600. endif;
  601. getidrel(0,-1,1,#id);
  602. if(%#id%!=3);
  603. pick(3);
  604. look(0,80);
  605. keydown(sneak);
  606. keydown(back);
  607. wait(1500ms);
  608. keyup(back);
  609. keyup(sneak);
  610. wait(300ms);
  611. key(use);
  612. keydown(sneak);
  613. keydown(forward);
  614. wait(680ms);
  615. keyup(sneak);
  616. keyup(forward);
  617. endif;
  618. getidrel(+1,-1,0,#id);
  619. if(%#id%!=3);
  620. pick(3);
  621. look(270,80);
  622. keydown(sneak);
  623. keydown(back);
  624. wait(1500ms);
  625. keyup(back);
  626. keyup(sneak);
  627. wait(300ms);
  628. key(use);
  629. keydown(sneak);
  630. keydown(forward);
  631. wait(680ms);
  632. keyup(sneak);
  633. keyup(forward);
  634. endif;
  635. getidrel(0,-1,-1,#id);
  636. if(%#id%!=3);
  637. pick(3);
  638. look(180,80);
  639. keydown(sneak);
  640. keydown(back);
  641. wait(1500ms);
  642. keyup(back);
  643. keyup(sneak);
  644. wait(300ms);
  645. key(use);
  646. keydown(sneak);
  647. keydown(forward);
  648. wait(680ms);
  649. keyup(sneak);
  650. keyup(forward);
  651. endif;
  652. endif;
  653.  
  654. getidrel(0,-4,+1,#id);
  655. if(%#id%!=3);
  656. wait(300ms);
  657. echo(/home temp2);
  658. getidrel(-1,-1,0,#id);
  659. if(%#id%!=3);
  660. pick(3);
  661. look(90,80);
  662. keydown(sneak);
  663. keydown(back);
  664. wait(1500ms);
  665. keyup(back);
  666. keyup(sneak);
  667. wait(300ms);
  668. key(use);
  669. keydown(sneak);
  670. keydown(forward);
  671. wait(680ms);
  672. keyup(sneak);
  673. keyup(forward);
  674. endif;
  675. getidrel(0,-1,1,#id);
  676. if(%#id%!=3);
  677. pick(3);
  678. look(0,80);
  679. keydown(sneak);
  680. keydown(back);
  681. wait(1500ms);
  682. keyup(back);
  683. keyup(sneak);
  684. wait(300ms);
  685. key(use);
  686. keydown(sneak);
  687. keydown(forward);
  688. wait(680ms);
  689. keyup(sneak);
  690. keyup(forward);
  691. endif;
  692. getidrel(+1,-1,0,#id);
  693. if(%#id%!=3);
  694. pick(3);
  695. look(270,80);
  696. keydown(sneak);
  697. keydown(back);
  698. wait(1500ms);
  699. keyup(back);
  700. keyup(sneak);
  701. wait(300ms);
  702. key(use);
  703. keydown(sneak);
  704. keydown(forward);
  705. wait(680ms);
  706. keyup(sneak);
  707. keyup(forward);
  708. endif;
  709. getidrel(0,-1,-1,#id);
  710. if(%#id%!=3);
  711. pick(3);
  712. look(180,80);
  713. keydown(sneak);
  714. keydown(back);
  715. wait(1500ms);
  716. keyup(back);
  717. keyup(sneak);
  718. wait(300ms);
  719. key(use);
  720. keydown(sneak);
  721. keydown(forward);
  722. wait(680ms);
  723. keyup(sneak);
  724. keyup(forward);
  725. endif;
  726. endif;
  727.  
  728. getidrel(+1,-4,0,#id);
  729. if(%#id%!=3);
  730. wait(300ms);
  731. echo(/home temp2);
  732. wait(2);
  733. getidrel(-1,-1,0,#id);
  734. if(%#id%!=3);
  735. pick(3);
  736. look(90,80);
  737. keydown(sneak);
  738. keydown(back);
  739. wait(1500ms);
  740. keyup(back);
  741. keyup(sneak);
  742. wait(300ms);
  743. key(use);
  744. keydown(sneak);
  745. keydown(forward);
  746. wait(680ms);
  747. keyup(sneak);
  748. keyup(forward);
  749. endif;
  750. getidrel(0,-1,1,#id);
  751. if(%#id%!=3);
  752. pick(3);
  753. look(0,80);
  754. keydown(sneak);
  755. keydown(back);
  756. wait(1500ms);
  757. keyup(back);
  758. keyup(sneak);
  759. wait(300ms);
  760. key(use);
  761. keydown(sneak);
  762. keydown(forward);
  763. wait(680ms);
  764. keyup(sneak);
  765. keyup(forward);
  766. endif;
  767. getidrel(+1,-1,0,#id);
  768. if(%#id%!=3);
  769. pick(3);
  770. look(270,80);
  771. keydown(sneak);
  772. keydown(back);
  773. wait(1500ms);
  774. keyup(back);
  775. keyup(sneak);
  776. wait(300ms);
  777. key(use);
  778. keydown(sneak);
  779. keydown(forward);
  780. wait(680ms);
  781. keyup(sneak);
  782. keyup(forward);
  783. endif;
  784. getidrel(0,-1,-1,#id);
  785. if(%#id%!=3);
  786. pick(3);
  787. look(180,80);
  788. keydown(sneak);
  789. keydown(back);
  790. wait(1500ms);
  791. keyup(back);
  792. keyup(sneak);
  793. wait(300ms);
  794. key(use);
  795. keydown(sneak);
  796. keydown(forward);
  797. wait(680ms);
  798. keyup(sneak);
  799. keyup(forward);
  800. endif;
  801. endif;
  802.  
  803. getidrel(0,-4,-1,#id);
  804. if(%#id%!=3);
  805. wait(300ms);
  806. echo(/home temp2);
  807. wait(2);
  808. getidrel(-1,-1,0,#id);
  809. if(%#id%!=3);
  810. pick(3);
  811. look(90,80);
  812. keydown(sneak);
  813. keydown(back);
  814. wait(1500ms);
  815. keyup(back);
  816. keyup(sneak);
  817. wait(300ms);
  818. key(use);
  819. keydown(sneak);
  820. keydown(forward);
  821. wait(680ms);
  822. keyup(sneak);
  823. keyup(forward);
  824. endif;
  825. getidrel(0,-1,1,#id);
  826. if(%#id%!=3);
  827. pick(3);
  828. look(0,80);
  829. keydown(sneak);
  830. keydown(back);
  831. wait(1500ms);
  832. keyup(back);
  833. keyup(sneak);
  834. wait(300ms);
  835. key(use);
  836. keydown(sneak);
  837. keydown(forward);
  838. wait(680ms);
  839. keyup(sneak);
  840. keyup(forward);
  841. endif;
  842. getidrel(+1,-1,0,#id);
  843. if(%#id%!=3);
  844. pick(3);
  845. look(270,80);
  846. keydown(sneak);
  847. keydown(back);
  848. wait(1500ms);
  849. keyup(back);
  850. keyup(sneak);
  851. wait(300ms);
  852. key(use);
  853. keydown(sneak);
  854. keydown(forward);
  855. wait(680ms);
  856. keyup(sneak);
  857. keyup(forward);
  858. endif;
  859. getidrel(0,-1,-1,#id);
  860. if(%#id%!=3);
  861. pick(3);
  862. look(180,80);
  863. keydown(sneak);
  864. keydown(back);
  865. wait(1500ms);
  866. keyup(back);
  867. keyup(sneak);
  868. wait(300ms);
  869. key(use);
  870. keydown(sneak);
  871. keydown(forward);
  872. wait(680ms);
  873. keyup(sneak);
  874. keyup(forward);
  875. endif;
  876. endif;
  877.  
  878. echo(/home temp);
  879. wait(750ms);
  880.  
  881. //verificando se ainda há outros erros
  882. getidrel(1,-3,0,#id);
  883. if(%#id% != 12);keydown(sneak);pick(12);
  884. look(270,80);wait(50ms);keydown(back);wait(1300ms);keyup(back);wait(200ms);key(use);wait(500ms);
  885. look(90,90);keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);keydown(sneak);endif;
  886. getidrel(-1,-3,0,#id);
  887. if(%#id% != 12);keydown(sneak);pick(12);
  888. look(90,80);wait(50ms);keydown(back);wait(1300ms);keyup(back);wait(200ms);key(use);wait(500ms);
  889. look(270,90);keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);keydown(sneak);endif;
  890. getidrel(0,-3,-1,#id);
  891. if(%#id% != 12);keydown(sneak);pick(12);
  892. look(180,80);wait(50ms);keydown(back);wait(1300ms);keyup(back);wait(200ms);key(use);wait(500ms);
  893. look(0,90);keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);keydown(sneak);endif;
  894. getidrel(0,-3,1,#id);
  895. if(%#id% != 12);keydown(sneak);pick(12);
  896. look(0,80);wait(50ms);keydown(back);wait(1300ms);keyup(back);wait(200ms);key(use);wait(500ms);
  897. look(180,90);keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);keydown(sneak);endif;
  898. getidrel(1,-2,0,#id);
  899. if(%#id% != 81);pick(81);
  900. look(90,90);
  901. keydown(sneak);keydown(forward);wait(800ms);key(use);keyup(forward);
  902. keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);endif;
  903. getidrel(-1,-2,0,#id);
  904. if(%#id% != 81);pick(81);
  905. look(270,90);
  906. keydown(sneak);keydown(forward);wait(800ms);key(use);keyup(forward);
  907. keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);endif;
  908. getidrel(0,-2,-1,#id);
  909. if(%#id% != 81);pick(81);
  910. look(0,90);
  911. keydown(sneak);keydown(forward);wait(800ms);key(use);keyup(forward);
  912. keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);endif;
  913. getidrel(0,-2,1,#id);
  914. if(%#id% != 81);pick(81);
  915. look(180,90);
  916. keydown(sneak);keydown(forward);wait(800ms);key(use);keyup(forward);
  917. keydown(back);wait(600ms);keyup(back);keyup(sneak);wait(250ms);
  918. log(&aAndar corrigido.);
  919. endif;
  920.  
  921. wait(750ms);
  922.  
  923. if((%HUNGER%<8)&&(%#vip%=1));wait(500ms);echo(/fome);
  924. elseif((%HUNGER%<8)&&(%#vip%=2));
  925. echo(/sethome temp);wait(2);
  926. echo(/warp loja);
  927. wait(2);
  928. do;until(%HUNGER%=20);
  929. echo(/home temp);
  930. wait(2);
  931. endif;
  932.  
  933.  
  934. //verificando invetário
  935. gui(inventory);wait(1);
  936. //areia repondo
  937. pick(12);
  938. if(%STACKSIZE%<15);
  939. for(#i,9,35);
  940. getslotitem(%#i%,#id);
  941. if(%#id%=12);
  942. slotclick(%#i%,l,true);
  943. wait(40ms);
  944. endif;
  945. next;
  946. wait(100ms);
  947. if(%STACKSIZE%<9);#faltaareia=1;#falta=1;endif;
  948. endif;
  949.  
  950. //terra repondo
  951. pick(3);
  952. if(%STACKSIZE%<15);
  953. for(#i,9,35);
  954. getslotitem(%#i%,#id);
  955. if(%#id%=3);
  956. slotclick(%#i%,l,true);
  957. wait(40ms);
  958. endif;
  959. next;
  960. wait(100ms);
  961. if(%STACKSIZE%<9);#faltaterra=1;#falta=1;endif;
  962. endif;
  963.  
  964. //cacto repondo
  965. pick(81);wait(100ms);
  966. if(%STACKSIZE%<15);
  967. for(#i,9,35);
  968. getslotitem(%#i%,#id);
  969. if(%#id%=81);
  970. slotclick(%#i%,l,true);
  971. wait(40ms);
  972. endif;
  973. next;
  974. wait(100ms);
  975. if(%STACKSIZE%<9);#faltacacto=1;#falta=1;endif;
  976. endif;
  977.  
  978. //pedra repondo
  979. pick(1);wait(100ms);
  980. if(%STACKSIZE%<15);
  981. for(#i,9,35);
  982. getslotitem(%#i%,#id);
  983. if(%#id%=1);
  984. slotclick(%#i%,l,true);
  985. wait(40ms);
  986. endif;
  987. next;
  988. endif;
  989. gui;
  990. echo(/desbugar);
  991.  
  992. if(%#antireset%=1);
  993. log(verificando hora);
  994. @#resetcacto=1;
  995. do;until(@#resetcacto=0);
  996. prompt(#horinha,$$?,"verificando hora atual,não toque no teclado!");
  997. if((#horinha>0548)&&(#horinha<0559));
  998.     log(esperando server reiniciar);
  999.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1000.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1001.     log(retornando a macro...);wait(3);
  1002. elseif((#horinha>1148)&&(#horinha<1159));
  1003.     log(esperando server reiniciar);
  1004.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1005.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1006.     log(retornando a macro...);wait(3);
  1007. elseif((#horinha>2148)&&(#horinha<2159));
  1008.     log(esperando server reiniciar);
  1009.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1010.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1011.     log(retornando a macro...);wait(3);
  1012. endif;
  1013. endif;
  1014.  
  1015. if(#falta=1);
  1016.        
  1017.         log(Indo para o armazem!);
  1018.                 wait(2);
  1019.         echo(/home armazem);
  1020.         wait(2);
  1021.         look(WEST);
  1022.         log(&1EVITANDO BUGS!);
  1023.         do(5);keydown(jump);wait(70ms);keyup(jump);loop;
  1024.         log("&5LEMBRE,SUA HOME DEVE ESTAR OLHANDO PARA WEST&2,&4apenas ignore se já estiver..");
  1025.  
  1026.         getidrel(-2,+1,0,#hitid);
  1027.  
  1028.         if((%#hitid%!=54)&&(%#hitid%!=146));
  1029.         &meliante=%HITNAME%;
  1030.         echo("%&meliante%, por favor saia da frente, você está atrapalhando o funcionamento da macro");
  1031.         echo(/warp loja);wait(60);
  1032.         echo(/home armazem);wait(3);
  1033.         echo(/desbugar);wait(3);
  1034.         look(WEST);
  1035.         log(&1EVINTANDO BUGS!);
  1036.         do(5);keydown(jump);wait(70ms);keyup(jump);loop;
  1037.         log("&5LEMBRE,SUA HOME DEVE ESTAR OLHANDO PARA WEST&2,&4apenas ignore se já estiver..");
  1038.         endif;
  1039.  
  1040.         getidrel(-2,+1,0,#verificandobaus);
  1041.         if((%#verificandobaus%!=54)&&(%#verificandobaus%!=146));
  1042.         log("Armazem não foi encontrado, parando macro");
  1043.         echo(/spawn);
  1044.         unset(cacto);stop;
  1045.         endif;
  1046. //////////////////////////////////////////////
  1047.  
  1048. ////////////////////////////////////////////
  1049.  
  1050. if(#faltaareia=1);
  1051.  
  1052.  
  1053. #bauareia=1;
  1054.  
  1055. do;
  1056.    
  1057. ////////////
  1058.  
  1059. if(#bauareia=1);#bauareiay=145;#bauareiap=30;
  1060. elseif(#bauareia=2);#bauareiay=180;#bauareiap=35;
  1061. elseif(#bauareia=3);#bauareiay=210;#bauareiap=30;
  1062. elseif(#bauareia=4);#bauareiay=145;#bauareiap=5;
  1063. elseif(#bauareia=5);#bauareiay=180;#bauareiap=5;
  1064. elseif(#bauareia=6);#bauareiay=210;#bauareiap=5;
  1065. elseif(#bauareia=7);#bauareiay=145;#bauareiap=340;
  1066. elseif(#bauareia=8);#bauareiay=180;#bauareiap=335;
  1067. elseif(#bauareia=9);#bauareiay=210;#bauareiap=335;
  1068. elseif(#bauareia>9);#comprarareia=1;endif;
  1069.  
  1070. ////////////
  1071.  
  1072.                 log(repondo areia!);wait(2);
  1073.                  
  1074.                
  1075.                 #pegouareia=0;
  1076.                
  1077.                
  1078.                 look(south);wait(5ms);
  1079.                 look(%#bauareiay%,%#bauareiap%);          
  1080.                                    
  1081.                 endif;
  1082.                                
  1083.                 wait(500ms);
  1084.                 pick(277);wait(3ms);do;key(use);wait(300ms);until(%GUI%="GUICHEST");
  1085.                 pick(12);wait(20ms);
  1086.                     for(#i,0,54);
  1087.                         getslotitem(%#i%,#id);
  1088.                         if(#pegouareia>8);break;endif;
  1089.                         if(%#id%=12);
  1090.                             #pegouareia=%#pegouareia%+1;
  1091.                             slotclick(%#i%,l,true);
  1092.                             wait(75ms);
  1093.                            
  1094.                         endif;
  1095.                     next;
  1096.                     gui;
  1097.                     if(%STACKSIZE%<9);gui();wait(20ms);#bauareia=%#bauareia%+1;#faltaareia=1;endif;
  1098.                     if(%STACKSIZE%>9);#faltaareia=0;LOG(AREIA OK);gui();echo(/home temp);wait(2);endif;
  1099.                     if(#bauareia>9);#comprarareia=1;#faltaareia=1;endif;
  1100.            
  1101. //
  1102. if((#comprarareia=1)&&(#vip=1));
  1103.  
  1104. if(%#antireset%=1);
  1105. log(verificando hora);
  1106. @#resetcacto=1;
  1107. do;until(@#resetcacto=0);
  1108. prompt(#horinha,$$?,"verificando hora atual,não toque no teclado!");
  1109. if((#horinha>0548)&&(#horinha<0559));
  1110.     log(esperando server reiniciar);
  1111.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1112.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1113.     log(retornando a macro...);wait(3);
  1114. elseif((#horinha>1148)&&(#horinha<1159));
  1115.     log(esperando server reiniciar);
  1116.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1117.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1118.     log(retornando a macro...);wait(3);
  1119. elseif((#horinha>2148)&&(#horinha<2159));
  1120.     log(esperando server reiniciar);
  1121.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1122.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1123.     log(retornando a macro...);wait(3);
  1124. endif;
  1125. endif;
  1126.  
  1127. log("Comprando areia");
  1128.  
  1129.  
  1130.                 echo(/warp lojavip);wait(2);do(2);keydown(jump);wait(500ms);keyup(jump);loop;wait(2);    
  1131.  
  1132.  
  1133.                                         #vaiolhary=300;
  1134.                                         #vaiolharp=0;
  1135.                                          
  1136.                                          
  1137.                                         look(%#vaiolhary%,%#vaiolharp%);
  1138.                                          
  1139.                                         //indo até a areia
  1140.                                          
  1141.                                         do;
  1142.                                         #irareia=3948
  1143.                                         #irareia2=1330;
  1144.                                         look(%#vaiolhary%,%#vaiolharp%);
  1145.                                         sprint;
  1146.                                         keydown(forward);
  1147.                                         if((%XPOS% = 3948)&&(%ZPOS% = 1326));
  1148.                                         unsprint;keyup(forward);
  1149.                                         do;keydown(sneak);keydown(forward);look(180,0);
  1150.                                         until((%XPOS%=%#irareia%)&&(%ZPOS%=%#irareia2%));
  1151.                                         endif;
  1152.                                         until((%XPOS% = %#irareia%)&&(%ZPOS% = %#irareia2%));
  1153.                                         unsprint;
  1154.                                         keyup(forward);
  1155.                                          
  1156.                                         look(180,305);
  1157.                                         gui(inventory);
  1158.                                         do(7);key(use);wait(3);loop;
  1159.                                         gui;
  1160.                                         log(&f&lAreia comprada com sucesso!);
  1161.                                        
  1162.                                         wait(1);
  1163.                                        
  1164.                                         //verificando se a posição X passou e voltando
  1165.                                            if(%XPOS% != %#irareia%);
  1166.                                         if(%XPOS% < %#irareia%);
  1167.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  1168.                                         do;
  1169.                                         look(EAST);
  1170.                                         keydown(sneak);
  1171.                                         keydown(forward);
  1172.                                         until(%XPOS% = %#irareia%);
  1173.                                         keyup(forward);
  1174.                                         keyup(sneak);
  1175.                                         look(180,305);
  1176.                                         gui(inventory);
  1177.                                         do(7);key(use);wait(3);loop;
  1178.                                         gui;
  1179.                                         log(&f&lAreia comprada com sucesso!);
  1180.                                         elseif(%XPOS% > %#irareia%);
  1181.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  1182.                                         do;
  1183.                                         look(WEST);
  1184.                                         keydown(sneak);
  1185.                                         keydown(forward);
  1186.                                         until(%XPOS% = %#irpedra%);
  1187.                                         keyup(forward);
  1188.                                         keyup(sneak);
  1189.                                         look(180,305);
  1190.                                         gui(inventory);
  1191.                                         do(7);key(use);wait(3);loop;
  1192.                                         gui;
  1193.                                         log(&f&lAreia comprada com sucesso!);
  1194.                                         endif;
  1195.                                            endif;
  1196.                                        
  1197.                                                
  1198.                                          
  1199.                                         //verificando se a posição Z passou e voltando
  1200.                                            if(%ZPOS% != %#irareia2%);
  1201.                                         if(%ZPOS% < %#irareia2%);
  1202.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  1203.                                         do;
  1204.                                         look(SOUTH);
  1205.                                         keydown(forward);
  1206.                                         keydown(sneak);
  1207.                                         until(%ZPOS% = %#irpedra2%);
  1208.                                         keyup(forward);
  1209.                                         keyup(sneak);
  1210.                                         look(180,305);
  1211.                                         gui(inventory);
  1212.                                         do(7);key(use);wait(3);loop;
  1213.                                         gui;
  1214.                                         log(&f&lAreia comprada com sucesso!);
  1215.                                         elseif(%ZPOS% > %#irareia2%);
  1216.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  1217.                                         do;
  1218.                                         look(NORTH);
  1219.                                         keydown(sneak);
  1220.                                         keydown(forward);
  1221.                                         until(%ZPOS% = %#irareia2%);
  1222.                                         keyup(forward);
  1223.                                         keyup(sneak);
  1224.                                         look(180,305);
  1225.                                         gui(inventory);
  1226.                                         do(7);key(use);wait(3);loop;
  1227.                                         gui;
  1228.                                         log(&f&lAreia comprada com sucesso!);
  1229.                                         endif;
  1230.                                            endif;
  1231.                                                      
  1232.                     wait(1);echo(/home temp);wait(2);#comprarareia=0;#faltaareia=0;
  1233.  
  1234.                                        
  1235. elseif((#comprarareia=1)&&(#vip=2));
  1236.  
  1237. if(%#antireset%=1);
  1238. log(verificando hora);
  1239. @#resetcacto=1;
  1240. do;until(@#resetcacto=0);
  1241. prompt(#horinha,$$?,"verificando hora atual,não toque no teclado!");
  1242. if((#horinha>0548)&&(#horinha<0559));
  1243.     log(esperando server reiniciar);
  1244.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1245.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1246.     log(retornando a macro...);wait(3);
  1247. elseif((#horinha>1148)&&(#horinha<1159));
  1248.     log(esperando server reiniciar);
  1249.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1250.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1251.     log(retornando a macro...);wait(3);
  1252. elseif((#horinha>2148)&&(#horinha<2159));
  1253.     log(esperando server reiniciar);
  1254.     #posiqueparou=%XPOS%;#posiqueparou2=%ZPOS%;
  1255.     do;wait(2);log(esperando server reiniciar);until((%XPOS%=1)&&(%ZPOS%=1));do;until((%XPOS%=%#posiqueparou%)&&(%ZPOS%=%#posiqueparou2%));
  1256.     log(retornando a macro...);wait(3);
  1257. endif;
  1258. endif;
  1259.  
  1260. log("Comprando areia");
  1261.  
  1262.                 echo(/warp loja);wait(2);do(2);keydown(jump);wait(500ms);keyup(jump);loop;wait(2);    
  1263.  
  1264.  
  1265.                                         #vaiolhary=195;
  1266.                                         #vaiolharp=0;
  1267.                                          
  1268.                                          
  1269.                                         look(%#vaiolhary%,%#vaiolharp%);
  1270.                                          
  1271.                                         //indo até a areia
  1272.                                          
  1273.                                         do;
  1274.                                         #irareia=3683;
  1275.                                         #irareia2=990;
  1276.                                         look(%#vaiolhary%,%#vaiolharp%);
  1277.                                         sprint;
  1278.                                         keydown(forward);
  1279.                                         if((%XPOS% = 3681)&&(%ZPOS% = 952));
  1280.                                         keydown(jump);wait(250ms);keyup(jump);
  1281.                                         endif;
  1282.                                         until((%XPOS% = %#irareia%)&&(%ZPOS% = %#irareia2%));
  1283.                                         unsprint;
  1284.                                         keyup(forward);
  1285.                                          
  1286.                                         look(180,330);
  1287.                                         gui(inventory);
  1288.                                         do(7);key(use);wait(3);loop;
  1289.                                         gui;
  1290.                                         log(&f&lAreia comprada com sucesso!);
  1291.                                        
  1292.                                         wait(1);
  1293.                                          
  1294.                                         //verificando se a posição X passou e voltando
  1295.                                            if(%XPOS% != %#irareia%);
  1296.                                         if(%XPOS% < %#irareia%);
  1297.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  1298.                                         do;
  1299.                                         look(EAST);
  1300.                                         keydown(sneak);
  1301.                                         keydown(forward);
  1302.                                         until(%XPOS% = %#irareia%);
  1303.                                         keyup(forward);
  1304.                                         keyup(sneak);
  1305.                                         look(180,330);
  1306.                                         gui(inventory);
  1307.                                         do(7);key(use);wait(3);loop;
  1308.                                         gui;
  1309.                                         log(&f&lAreia comprada com sucesso!);
  1310.                                         elseif(%XPOS% > %#irareia%);
  1311.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lX&f."); //voltando pra cord X
  1312.                                         do;
  1313.                                         look(WEST);
  1314.                                         keydown(sneak);
  1315.                                         keydown(forward);
  1316.                                         until(%XPOS% = %#irareia%);
  1317.                                         keyup(forward);
  1318.                                         keyup(sneak);
  1319.                                         look(180,330);
  1320.                                         gui(inventory);
  1321.                                         do(7);key(use);wait(3);loop;
  1322.                                         gui;
  1323.                                         log(&f&lAreia comprada com sucesso!);
  1324.                                         endif;
  1325.                                            endif;
  1326.                                        
  1327.                                                
  1328.                                          
  1329.                                         //verificando se a posição Z passou e voltando
  1330.                                            if(%ZPOS% != %#irareia2%);
  1331.                                         if(%ZPOS% < %#irareia2%);
  1332.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  1333.                                         do;
  1334.                                         look(SOUTH);
  1335.                                         keydown(forward);
  1336.                                         keydown(sneak);
  1337.                                         until(%ZPOS% = %#irareia2%);
  1338.                                         keyup(forward);
  1339.                                         keyup(sneak);
  1340.                                         look(180,330);
  1341.                                         gui(inventory);
  1342.                                         do(7);key(use);wait(3);loop;
  1343.                                         gui;
  1344.                                         log(&f&lAreia comprada com sucesso!);                              
  1345.                                         elseif(%ZPOS% > %#irareia2%);
  1346.                                         log("&bEita, verificamos que ocorreu um erro, &fvoltando para a coordenada &f&lZ&f."); //voltando pra cord Z
  1347.                                         do;
  1348.                                         look(NORTH);
  1349.                                         keydown(sneak);
  1350.                                         keydown(forward);
  1351.                                         until(%ZPOS% = %#irareia2%);
  1352.                                         keyup(forward);
  1353.                                         keyup(sneak);
  1354.                                         look(180,330);
  1355.                                         gui(inventory);
  1356.                                         do(7);key(use);wait(3);loop;
  1357.                                         gui;
  1358.                                         log(&f&lAreia comprada com sucesso!);
  1359.                                         endif;
  1360.                                            endif;
  1361.                                            
  1362.                             wait(1);echo(/home temp);wait(2);#comprarareia=0;#faltaareia=0;
  1363.  
  1364. endif;                                                                              
  1365.  
  1366. if(#faltaareia=1);
  1367. echo(/home armazem);wait(2);
  1368. endif;
  1369.  
  1370. endif;
  1371.  
  1372.                     until(%#faltaareia%=0);
  1373.  
  1374. endif;
  1375.  
  1376. if(#faltaareia!=1);
  1377. echo(/home temp);
  1378. wait(2);
  1379. endif;
  1380.  
  1381.  
  1382. ////////////////////////////////////////////
  1383.  
  1384. //////////////////////////////////////////////
  1385.  
  1386.  
  1387. endif;
  1388.  
  1389.  
  1390. loop;
  1391.  
  1392. wait(2);
  1393. echo(/home t2);
  1394. loop;
  1395.  
  1396. elseif(#speed=1);
  1397. echo(teste);
  1398. wait(3);
  1399. endif;
  1400.  
  1401. }$$

Reply to "Untitled"