Modificação

Alguem pode modifica esse macro para a warp vip do orignes pago $$ lá se for preciso

$${
if(z);
log("&4[Macro] Colheita GoGo Magnata [OFF]");
keyup(FORWARD);
unset(z);
stop();
else;
log("&2[Macro] Colheita GoGo Magnata [ON]");
set(z);
#cont=0;
endif;

&d=%DIRECTION%;
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;

do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
gui(INVENTORY);
for(#i,9,43);
getslotitem(%#i%,#id,#stack);
if((%#id%=372)&&(%#stack%=64));
inc(#cont);
wait(50ms);
endif;
next;
gui();
if(%#cont%<27);
#cont=0;
else;
#cont=0;
}$$/sethome posicao$${
wait(1);
}$$/warp vip$${
wait(3);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+10)|(%XPOS%=%#posx%-10)|(%ZPOS%=%#posz%+10)|(%ZPOS%=%#posz%-10));
wait(100ms);
keyup(FORWARD);
look(-90,);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+19)|(%XPOS%=%#posx%-19)|(%ZPOS%=%#posz%+19)|(%ZPOS%=%#posz%-19));
wait(150ms);
keyup(FORWARD);
look(+90,);
look(,75);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
wait(200ms);
do;
keydown(JUMP);
wait(100ms);
keyup(JUMP);
while(%HITID%=35);
do;
wait(10ms);
until(%HITID%=68);
keyup(FORWARD);
do(6);
key(ATTACK);
wait(500ms);
loop;
}$$/home posicao$${
wait(3);
endif;
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(120ms);
keyup(FORWARD);
else;
}$$/home inicio$${
wait(8);
endif;
loop;
}$$