Advertisement
linknaka

Untitled

Feb 21st, 2018
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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(300ms);
  79. key(use);
  80. wait(1500ms);
  81.  
  82.  
  83. log(Depositando os itens!);
  84. for(#p,54,89);
  85. getslotitem(%#p%,&id,#stack);
  86. ifmatches(%&id%,%&itemid%);
  87. log(Pulou "ficha"!);
  88. next;
  89. endif;
  90. slotclick(%#p%,right,true);
  91. wait(120ms);
  92. next;
  93.  
  94. wait(150ms);
  95. getslotitem(53,&id,#stack);
  96. if(%#stack%>0);
  97. #numerobaudep=#numerobaudep+1;
  98. //set(bauagain);
  99. endif;
  100.  
  101. gui();
  102. wait(1);
  103. //if(!bauagain);
  104. }$$
  105. /home Cassinobaus
  106. $${
  107. log("Chegou na home para sacarr:verificando bau: %#numerobauget%);
  108. #auxbau=#numerobauget/10;
  109. #bxbau=#numerobauget-(#auxbau*10);
  110. look(%&rdire%);
  111. unset(bauagain);
  112. do();
  113. #posx=%XPOS%;
  114. #posz=%ZPOS%;
  115. if(%#auxbau%=0);
  116. log(Chegou1);
  117. break;
  118. endif;
  119. do;
  120. keydown(LEFT);
  121. wait(10ms);
  122. keyup(LEFT);
  123. until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2));
  124. #auxbau=#auxbau-1;
  125. loop;
  126.  
  127. if(%#bxbau%>4);
  128. do;
  129. keydown(RIGHT);
  130. wait(10ms);
  131. keyup(RIGHT);
  132. until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1));
  133. #bxbau=#bxbau-5;
  134. endif;
  135.  
  136. if(%#bxbau%=0);
  137. look(,55);
  138. endif;
  139.  
  140. if(%#bxbau%=1);
  141. look(,35);
  142. endif;
  143.  
  144. if(%#bxbau%=2);
  145. look(,7);
  146. endif;
  147.  
  148. if(%#bxbau%=3);
  149. look(,-24);
  150. endif;
  151.  
  152. if(%#bxbau%=4);
  153. look(,-50);
  154. endif;
  155.  
  156. wait(500ms);
  157. key(use);
  158. wait(300ms);
  159.  
  160. getslotitem(53,&id,#stack);
  161. if(%#stack%=0);
  162. #numerobauget=#numerobauget+1;
  163. set(bauagain);
  164. else;
  165. for(#p,0,53);
  166. slotclick(%#p%,right,true);
  167. // getslotitem(#36,&id,#stack);
  168. // if(%#stack%>1);
  169. // break;
  170. // endif;
  171. wait(80ms);
  172. next;
  173. endif;
  174.  
  175. wait(150ms);
  176. gui();
  177. wait(1);
  178. //endif;
  179. //if(!bauagain);
  180. }$$
  181. /home Cassino
  182. $${
  183. wait(1);
  184. do();
  185. key(attack);
  186. wait(100ms);
  187. while(%@#saida%=0);
  188. //endif;
  189. loop;
  190.  
  191.  
  192.  
  193. endif;
  194. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement