$${
if(x);
log("&d[&a%PLAYER%&d] &aMelancia &4OFF");
unset(x);
stop;
else;
log("&d[&a%PLAYER%&d] &aMelancia &2ON");
set(x);
IFMATCHES(%DIRECTION%,N);
&dir = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&dir = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&dir = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&dir = EAST;
ENDIF;
do;
gui(inventory);
wait(250ms);
getslotitem(35,#id,#stack);
if(%#stack%=0);
else;
wait(1);
}$$
/home vm
$${
wait(5);
gui();
do(2);
key(attack);
wait(500ms);
key(attack);
loop;
}$$/home melancia$${
wait(2);
gui(inventory);
endif;
loop;
loop;
endif;
}$$