Ta ae galera o novo macro de vender cacto na warp vip 1.7 Marquem /sethome cacto na sua plant para ele ir ate la quando acabar de vende ! Coloquem $$<cacto.txt> $${ IF(vcacto); LOG("&3[%PLAYER%] &6Coleta e venda VIP de Cactos &7v2.2 &c[OFF]"); LOG("&3[%PLAYER%] &6Lucro Total: &f%#lucrototal% coins"); UNSET(vcacto); GUI(); STOP(); ELSE; LOG("&3[%PLAYER%] &6Coleta e venda VIP de Cactos &7v2.2 &a[ON]"); LOG("&3[%PLAYER%] &3Para desligar pressione &b%KEYNAME%"); LOG("&6Mantenha seu inventário &faberto!"); }$$/home cacto$${ SET(vcacto); #nslot=9; #sok=0; #svazio=0; #lucrototal=0; ENDIF; DO; gui(inventory); wait(500ms); #nslot=9; #sok=0; #svazio=0; do; getslotitem(%#nslot%,&id,#stack); if(&id!="air"); if(&id="cactus"); if(#stack=64); INC(#sok,1); else; INC(#svazio,1); endif; endif; else; INC(#svazio,1); endif; INC(#nslot,1); until(%#nslot%=45); if(#svazio=0); #lucro=%#sok%*30; #lucrototal=%#lucro%+%#lucrototal%; log("Itens prontos para venda!"); log("&6Packs de cactos completos: &f%#sok%"); log("&6Lucro na Warp VIP: &f%#lucro% coins"); GUI(); #px=%XPOS%; wait(500ms); }$$/warp vip$${ $${ wait(4200ms); do; sprint(); look(east); keydown(forward); until(%XPOS%==724); keydown(sneak); do; until(%XPOS%==726); keyup(sneak); keyup(forward) do; look(south); keydown(forward); until(%ZPOS%==667); do; keydown(jump); until(%ZPOS%==670); keyup(jump); do; until(%ZPOS%==673); keyup(forward); do; look(east); keydown(forward); until(%XPOS%==727); keyup(forward); looks(+47); look(,38); do(8); key(attack); wait(600ms); loop; gui(); until(%#nvc%=0); wait(100ms); }$$ /clear -a $${ }$$/home cacto $${ LOG(&a ESSE É O SEU &c MONEY ATUAL; wait(300ms); }$$/money $${ wait(2); endif; LOOP; }$$ TENHAO UM BOM JOGO !
