Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2017
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.64 KB | None | 0 0
  1. $${IF(pesca);
  2. LOG("&3[Minecraftxd] &6Pesca &4[OFF]");
  3. IF(%#peixe%=1);&peixes =;
  4. ELSE;&peixes = s;
  5. ENDIF;
  6. IF(%#item%=1);&itens = m;
  7. ELSE;&itens = ns;
  8. ENDIF;
  9. LOG("&6Você pescou: &3%#peixe% &6peixe%&peixes% e &3%#item% &6ite%&itens%);
  10. IF(pescando);
  11. KEY(Use);
  12. ENDIF;
  13. UNSET(pesca);
  14. STOP();
  15. ELSE;
  16. LOG("&3[Minecraftxd] &6Pesca &a[ON]");
  17. LOG("&3[Minecraftxd] &4Para desligar pressione %KEYNAME%");
  18. SET(pesca); #item = 0;#peixe = 0;@#pickupid =;
  19. IFMATCHES(%DIRECTION%,N);&frente = NORTH;&direita = EAST;&atras = SOUTH;&esquerda = WEST;
  20. ENDIF;
  21. IFMATCHES(%DIRECTION%,S);&frente = SOUTH;&direita = WEST;&atras = NORTH;&esquerda = EAST;
  22. ENDIF;
  23. IFMATCHES(%DIRECTION%,W);&frente = WEST;&direita = NORTH;&atras = EAST;&esquerda = SOUTH;
  24. ENDIF;
  25. IFMATCHES(%DIRECTION%,E);&frente = EAST;&direita = SOUTH;&atras = WEST;&esquerda = NORTH;
  26. ENDIF;
  27. DO;
  28. LOOK(%&frente%);
  29. LOOK(,-90);
  30. DO;
  31. IF((%@#pickupid% != 349)&&(%@#pickupid% != 0));
  32. GUI(Inventory);
  33. WAIT(500ms);
  34. GETSLOT(%@#pickupid%,#slotinv);
  35. GUI();
  36. LOG("&6Item PESCADO! &3(%@&pickupitem%)");#slotbau = %#slotinv%+45;
  37. LOOK(%&esquerda%);
  38. KEY(Use);
  39. WAIT(15ms);
  40. GETSLOTITEM(53,#baucheck);
  41. IF(%#baucheck% != 0);
  42. GUI();
  43. LOOK(%&direita%);
  44. KEY(Use);
  45. WAIT(500ms);
  46. SLOTCLICK(%#slotbau%,l,true);
  47. GUI();
  48. ELSE;
  49. WAIT(500ms)
  50. SLOTCLICK(%#slotbau%,l,true);
  51. GUI();
  52. ENDIF;
  53. INC(#item);@#pickupid = 0;
  54. LOOK(%&frente%);
  55. LOOK(,-90);
  56. ENDIF;
  57. IFMATCHES(%@#pickupid%,349)
  58. LOG("&6Peixe PESCADO! &3(%@&pickupitem%)");
  59. INC(#peixe);@#pickupid = 0;
  60. ENDIF;
  61. KEY(Use);
  62. SET(pescando);
  63. WAIT(15ms);
  64. KEY(Use);
  65. UNSET(pescando);
  66. UNTIL(%DURABILITY% < 10);
  67. LOOK(%&frente%);
  68. LOOK(,+90);
  69. DO(3);
  70. KEY(Use);
  71. LOOP;
  72. LOOP;
  73. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement