daily pastebin goal
24%
SHARE
TWEET

Untitled

a guest Jun 19th, 2017 50 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. $${
  2. IF(rxoneto);
  3. Log("&2&l[&4&lMACRO&2&l] &4OFF");
  4. Unset(rxoneto);set(@canaon);
  5. keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  6. stop;
  7. Else;
  8. Log("&2&l[&4&lMACRO&2&l] &2ON");set(@canaon);
  9. keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  10. Set(rxoneto);
  11. getidrel(0,-1,0,&bloco);
  12. if(%&bloco% = "stonebrick");else;echo(/home cana);
  13. do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "stonebrick");
  14. endif;wait(500ms);
  15.  
  16. IFMATCHES(%DIRECTION%,N);
  17. &direcao = NORTH;&direcao2 = SOUTH;&direcao3 = WEST;&direcao4 = EAST;
  18. ENDIF;
  19. IFMATCHES(%DIRECTION%,S);
  20. &direcao = SOUTH;&direcao2 = NORTH;&direcao3 = EAST;&direcao4 = WEST;
  21. ENDIF;
  22. IFMATCHES(%DIRECTION%,W);
  23. &direcao = WEST;&direcao2 = EAST;&direcao3 = NORTH;&direcao4 = SOUTH;
  24. ENDIF;
  25. IFMATCHES(%DIRECTION%,E);
  26. &direcao = EAST;&direcao2 = WEST;&direcao3 = SOUTH;&direcao4 = NORTH;
  27. ENDIF;
  28.  
  29. log("&2&l[&4&lMACRO&2&l] &f%&direcao% Salva como Direção da Plantação");
  30.  
  31. do;
  32. wait(600ms);
  33. log("&2&l[&4&lMACRO&2&l] &fColhendo Direita - Esquerda");
  34. keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  35. wait(500ms);
  36. keydown(sneak);do(10);keydown(left);look(%&direcao%);key(attack);wait(1ms);loop;keyup(sneak);
  37. do;
  38. look(%&direcao%);
  39. keydown(left);
  40. if(%HITID% = "reeds");
  41. keyup(left);
  42. keydown(sneak);
  43. do;
  44. key(attack);wait(1ms);
  45. until(%HITID% = "air");
  46. endif;
  47. keyup(sneak);
  48. keydown(left);
  49. getidrel(0,-1,0,&bloco);
  50. until(%&bloco% = "glowstone");
  51. echo(/sethome canatemp);wait(300ms);
  52.  
  53. gui(inventory);#vazio = 0;
  54. for(#inv,9,44);
  55. getslotitem(%#inv%,&id,#stack);
  56. ifmatches(%&id%,"^reeds$|^written_book$");else;
  57. slotclick(%#inv%);wait(100ms);slotclick(-999);
  58. endif;
  59. ifmatches(%#stack%,"0");
  60. inc(#vazio,1);
  61. endif;
  62. next;
  63. gui();
  64.  
  65. if(%#vazio% < 5);keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  66. echo(/clan home);do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "planks");wait(500ms);
  67. keydown(forward);look(SOUTH);do;look(SOUTH);key(use);wait(1ms);ifmatches(%ZPOS%,"120");echo(/clan home);wait(1);endif;until(%GUI% = "GUICHEST");wait(450ms);keyup(forward);
  68. do(5);slotclick(16,r,true);wait(650ms);loop;
  69. echo(/home canatemp);do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "glowstone");
  70. #vazio = 0;
  71. else;
  72. endif;
  73.  
  74. keydown(forward);wait(750ms);keydown(sneak);do;look(%&direcao%);wait(1ms);getidrel(0,-1,0,&bloco);until((%&bloco% = "glowstone") || (%&bloco% = "crafting_table"));keyup(forward);keyup(sneak);wait(500ms);
  75. if(%&bloco% = "crafting_table");echo(/home cana);endif;
  76.  
  77. log("&2&l[&4&lMACRO&2&l] &fColhendo Esquerda - Direita");
  78. keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  79. wait(500ms);
  80. keydown(sneak);do(10);keydown(right);look(%&direcao%);key(attack);wait(1ms);loop;keyup(sneak);
  81. do;
  82. look(%&direcao%);
  83. keydown(right);
  84. if(%HITID% = "reeds");
  85. keyup(right);
  86. keydown(sneak);
  87. do;
  88. key(attack);wait(1ms);
  89. until(%HITID% = "air");
  90. endif;
  91. keydown(right);
  92. keyup(sneak);
  93. getidrel(0,-1,0,&bloco);
  94. until(%&bloco% = "glowstone");
  95. echo(/sethome canatemp);wait(300ms);
  96.  
  97. gui(inventory);#vazio = 0;
  98. for(#inv,9,44);
  99. getslotitem(%#inv%,&id,#stack);
  100. ifmatches(%&id%,"^reeds$|^written_book$");else;
  101. slotclick(%#inv%);wait(100ms);slotclick(-999);
  102. endif;
  103. ifmatches(%#stack%,"0");
  104. inc(#vazio,1);
  105. endif;
  106. next;
  107. gui();
  108.  
  109. if(%#vazio% < 5);keyup(sneak);keyup(left);keyup(right);keyup(back);keyup(forward);
  110. echo(/clan home);do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "planks");wait(500ms);
  111. keydown(forward);look(SOUTH);do;look(SOUTH);key(use);wait(1ms);ifmatches(%ZPOS%,"120");echo(/clan home);wait(1);endif;until(%GUI% = "GUICHEST");wait(450ms);keyup(forward);
  112. do(5);slotclick(16,r,true);wait(650ms);loop;
  113. echo(/home canatemp);do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "glowstone");
  114. #vazio = 0;
  115. else;
  116. endif;
  117.  
  118. keydown(forward);wait(750ms);keydown(sneak);do;look(%&direcao%);wait(1ms);getidrel(0,-1,0,&bloco);until((%&bloco% = "glowstone") || (%&bloco% = "crafting_table"));keyup(forward);keyup(sneak);wait(500ms);
  119. if(%&bloco% = "crafting_table");echo(/home cana);endif;
  120.  
  121.  
  122. loop;
  123. endif;
  124. }$$
RAW Paste Data
Top