Advertisement
linknaka

Untitled

Feb 21st, 2018
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.04 KB | None | 0 0
  1. $${
  2. #maxbausdep=20;
  3. #maxbausget=20;
  4. if(getxu);
  5. unset(getxu);
  6. log(&5 parou a macro de cassino);
  7. stop();
  8. else;
  9. set(getxu);
  10. &itemid=spawn_egg;
  11. #numerobaudep=0;
  12. #numerobauget=0;
  13. #auxbau=0;
  14. #bxbau=0;
  15. #numeroBauGet=0;
  16. do();
  17. @#saida=0;
  18. }$$
  19. /home Cassinobaus
  20. $${
  21. wait(5);
  22. &dire=%DIRECTION%;
  23. &rdire=%DIRECTION%;
  24. ifmatches(%&dire%,N);&dire=NORTH;;&rdire=SOUTH;endif;
  25. ifmatches(%&dire%,S);&dire=SOUTH;;&rdire=NORTH;endif;
  26. ifmatches(%&dire%,E);&dire=EAST;;&rdire=WEST;endif;
  27. ifmatches(%&dire%,W);&dire=WEST;&rdire=EAST;endif;
  28.  
  29. log("Chegou na home para depositar:verificando bau: %#numerobaudep%);
  30. #auxbau=#numerobaudep/10;
  31. #bxbau=#numerobaudep-(#auxbau*10);
  32. look(%&dire%);
  33. unset(bauagain);
  34. do();
  35. #posx=%XPOS%;
  36. #posz=%ZPOS%;
  37. if(%#auxbau%=0);
  38. log(Chegou1);
  39. break;
  40. endif;
  41. do;
  42. keydown(RIGHT);
  43. wait(10ms);
  44. keyup(RIGHT);
  45. until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2));
  46. #auxbau=#auxbau-1;
  47. loop;
  48.  
  49. if(%#bxbau%>4);
  50. do;
  51. keydown(RIGHT);
  52. wait(10ms);
  53. keyup(RIGHT);
  54. until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1));
  55. #bxbau=#bxbau-5;
  56. endif;
  57.  
  58. if(%#bxbau%=0);
  59. look(,55);
  60. endif;
  61.  
  62. if(%#bxbau%=1);
  63. look(,35);
  64. endif;
  65.  
  66. if(%#bxbau%=2);
  67. look(,7);
  68. endif;
  69.  
  70. if(%#bxbau%=3);
  71. look(,-24);
  72. endif;
  73.  
  74. if(%#bxbau%=4);
  75. look(,-50);
  76. endif;
  77.  
  78. wait(500ms);
  79. key(use);
  80. wait(300ms);
  81.  
  82.  
  83. log(Depositando os itens!);
  84. for(#p,54,89);
  85. getslotitem(%#p%,&id,#stack);
  86. ifmatches(%&id%,%&itemid%);
  87. next;
  88. endif;
  89. slotclick(%#p%,right,true);
  90. wait(80ms);
  91. next;
  92.  
  93. wait(150ms);
  94. getslotitem(53,&id,#stack);
  95. if(%#stack%>0);
  96. #numerobaudep=#numerobaudep+1;
  97. set(bauagain);
  98. endif;
  99.  
  100. gui();
  101. wait(1);
  102. if(!bauagain);
  103. }$$
  104. /home Cassinobaus
  105. $${
  106. log("Chegou na home para sacarr:verificando bau: %#numerobauget%);
  107. #auxbau=#numerobauget/10;
  108. #bxbau=#numerobauget-(#auxbau*10);
  109. look(%&dire%);
  110. unset(bauagain);
  111. do();
  112. #posx=%XPOS%;
  113. #posz=%ZPOS%;
  114. if(%#auxbau%=0);
  115. log(Chegou1);
  116. break;
  117. endif;
  118. do;
  119. keydown(LEFT);
  120. wait(10ms);
  121. keyup(LEFT);
  122. until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2));
  123. #auxbau=#auxbau-1;
  124. loop;
  125.  
  126. if(%#bxbau%>4);
  127. do;
  128. keydown(RIGHT);
  129. wait(10ms);
  130. keyup(RIGHT);
  131. until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1));
  132. #bxbau=#bxbau-5;
  133. endif;
  134.  
  135. if(%#bxbau%=0);
  136. look(,55);
  137. endif;
  138.  
  139. if(%#bxbau%=1);
  140. look(,35);
  141. endif;
  142.  
  143. if(%#bxbau%=2);
  144. look(,7);
  145. endif;
  146.  
  147. if(%#bxbau%=3);
  148. look(,-24);
  149. endif;
  150.  
  151. if(%#bxbau%=4);
  152. look(,-50);
  153. endif;
  154.  
  155. wait(500ms);
  156. key(use);
  157. wait(300ms);
  158.  
  159. getslotitem(53,&id,#stack);
  160. if(%#stack%=0);
  161. #numerobauget=#numerobauget+1;
  162. set(bauagain);
  163. else;
  164. for(#p,0,53);
  165. slotclick(%#p%,right,true);
  166. // getslotitem(#36,&id,#stack);
  167. // if(%#stack%>1);
  168. // break;
  169. // endif;
  170. wait(80ms);
  171. next;
  172. endif;
  173.  
  174. wait(150ms);
  175. gui();
  176. wait(1);
  177. endif;
  178. if(!bauagain);
  179. }$$
  180. /home Cassino
  181. $${
  182. wait(1);
  183. do();
  184. key(attack);
  185. wait(100ms);
  186. while(%@#saida%=0);
  187. endif;
  188. loop;
  189.  
  190.  
  191.  
  192. endif;
  193. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement