Guest User

dsad

a guest
Jun 8th, 2019
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.51 KB | None | 0 0
  1. $${
  2.  
  3. IF(vcacto);
  4. LOG("&3[%PLAYER%] &6Coleta e venda &4[OFF]");
  5. UNSET(vcacto);GUI();
  6. STOP();
  7. ELSE;
  8. LOG("&3[%PLAYER%] &6Coleta e venda &2[ON]");
  9. LOG("&3[%PLAYER%] &3Para desligar pressione %KEYNAME%");
  10. SET(vcacto);#nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
  11. ENDIF;
  12. ////////////////////////////////////////////
  13. gui(inventory);wait(500ms);
  14. log("&6Mantenha seu inventário &faberto!");
  15. log("&6Preparando relatório, &faguarde...");
  16. ////////////////////////////////////////////
  17. do;
  18. getslotitem(%#nslot%,#id,#stack)
  19. if(%#id%!=0);
  20. if(%#id%=81);
  21. if(%#stack%=64);
  22. INC(#sok,1);
  23. INC(#cct,64);
  24. else;
  25. INC(#cct,%#stack%);
  26. endif;
  27. else;
  28. INC(#sok2,1);
  29. endif;
  30. else;
  31. INC(#svazio,1);
  32. endif;
  33. INC(#nslot,1);
  34. until(%#nslot% = 45);
  35. #lucro=%#sok%*30;
  36. #lucro2=%#sok%*20;
  37.  
  38. log("----------------------------");
  39. log("&6Packs de cactos completos: &f%#sok%");
  40. log("&6Slots com outros itens: &f%#sok2%");
  41. log("&6Quantidade atual de cactos: &f%#cct%");
  42. log("&6Lucro na warp vip: &f%#lucro%");
  43. log("&6Lucro na warp loja: &f%#lucro2%");
  44. log("----------------------------");
  45. ////////////////////////////////////////////
  46. }$$
  47. $${
  48. ////////////////////////////////////////////
  49. log("&6Mantenha seu inventário &faberto!");
  50. DO;
  51. gui(inventory);wait(500ms);
  52. #nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
  53. do;
  54. getslotitem(%#nslot%,#id,#stack)
  55. if(%#id%!=0);
  56. if(%#id%=81);
  57. if(%#stack%=64);
  58. INC(#sok,1);
  59. INC(#cct,64);
  60. else;
  61. INC(#cct,%#stack%);
  62. INC(#svazio,1);
  63. endif;
  64. endif;
  65. else;
  66. INC(#svazio,1);
  67. endif;
  68. INC(#nslot,1);
  69. until(%#nslot% = 45);
  70.  
  71. #lucro=%#sok%*1100;
  72. #lucro2=%#sok%*2400;
  73.  
  74. if(SHIFT);
  75. log("----------------------------");
  76. log("&6Quantidade atual de cactos: &f%#cct%");
  77. log("&6Lucro na warp vip (somente packs): &f%#lucro%");
  78. log("&6Lucro na warp loja (somente packs): &f%#lucro2%");
  79. log("----------------------------");
  80. endif;
  81.  
  82. if(%#svazio%=0);
  83. log("----------------------------");
  84. log("Itens prontos para venda!");
  85. log("&6Quantidade atual de cactos: &f%#cct%");
  86. log("&6Lucro na warp vip (somente packs): &f%#lucro%");
  87. log("&6Lucro na warp loja (somente packs): &f%#lucro2%");
  88. log("----------------------------");
  89. GUI();
  90.  
  91. }$$
  92. /loja
  93. $${
  94. wait(6000ms);do;look(north);keydown(forward);until(%ZPOS%=-14);wait(50ms);do;look(east);keydown(forward);until(%XPOS%=220);wait(300ms)
  95. keydown(sneak);look(north);look(0,30);if(%YPOS%=40);
  96. key(attack);
  97. endif;
  98. loop;
  99. }$$
  100. /home cactos
  101. $${
  102. wait(2);
  103. endif;
  104. LOOP;
  105. }$$
Advertisement
Add Comment
Please, Sign In to add comment