arrumar macro de vender peixe Destiny

Macro de vender peixe na /warp vip do destiny, o macro esta com erro, fica dando home no mesmo lugar sem parar , ele vende 30 baus de peixe com sethome /sethome peixe1.... /sethome peixe30




$${
if(yoda);log("");
log("&3&4&l » &3&lVendedor de Peixe &6&lInteligente &4&l[OFF]");log("");
unset(yoda);stop();else;log("");
log("&3&4&l » &3&lVendedor de Peixe &6&lInteligente &2&l[ON]");achievementget(zRyjo - Macros,322:1);log("");
set(yoda);if(yoda);&var=vrau;&home=vrau;#ryjo=0;
do;log("");log("&5&lDIGITE peixe.");log("&6Macro guillebon vender peixe Warp vip serv &5fenix ");log("&3home guillebom: &6loja.");log("");log("");prompt(&home,$$?,Digite peixe);
while(%&home%,%&var%);
gui(chat);type(/home %&home%1);wait(300ms);press(return);wait(3);
gui(chat);type(/home %&home%1);wait(300ms);press(return);wait(100ms);
#xpos=%XPOS%;#ypos=%YPOS%;#zpos=%ZPOS%;do;
INC(#ryjo,1);wait(2);gui(chat);
type(/home %&home%%#ryjo%);wait(500ms);press(return);
wait(3);if(%XPOS%%YPOS%%ZPOS%!=%#xpos%%#ypos%%#zpos%);do;
type(/home %&home%%#ryjo%);wait(300ms);press(return);wait(1);
while(%XPOS%%YPOS%%ZPOS%!=%#xpos%%#ypos%%#zpos%);
else;key(use);wait(1);getslotitem(53,#id);getslotitem(0,#id2);
if(%#id%=349);wait(500ms);getslot(349,#slot1);wait(500ms);
for(#bau,%#slot1%,53);wait(15ms);slotclick(%#bau%,l,true);
wait(15ms);next;wait(100ms);gui();wait(100ms);
gui(inventory);getslotitem(9,#peixe);wait(500ms);gui();
if(%#peixe%=349);wait(500ms);}$$/warp vip$${
wait(3);do;look(east);keydown(forward);until(%XPOS%==718);
keyup(forward);wait(1);do;look(south);keydown(forward);
until(%ZPOS%==667);do;keydown(jump);until(%ZPOS%==670);
keyup(jump);do;until(%ZPOS%==672);keyup(forward);do;
look(east);keydown(forward);until(%XPOS%==736);keyup(forward);
look(east);look(EAST);look(,70);wait(750ms);
key(attack);wait(1);key(attack);wait(1);
key(attack);wait(1);key(attack);wait(1);
if(%#slot1%<=17);gui(chat);
type(/home %&home%%#ryjo%);wait(500ms);press(return);
wait(3);if(%XPOS%%YPOS%%ZPOS%!=%#xpos%%#ypos%%#zpos%);do;
type(/home %&home%%#ryjo%);wait(300ms);press(return);wait(1);
while(%XPOS%%YPOS%%ZPOS%!=%#xpos%%#ypos%%#zpos%);
endif;wait(2);key(use);wait(500ms);getslot(349,#slot2);wait(500ms);
for(#bau,%#slot2%,53);wait(15ms);slotclick(%#bau%,l,true);
wait(15ms);next;getslotitem(53,#pexe);wait(100ms);gui();
wait(100ms);gui(inventory);getslotitem(9,#peixe2);wait(500ms);
gui();if(%#peixe2%=349);wait(500ms);}$$/warp vip$${
wait(3);do;look(east);keydown(forward);until(%XPOS%==718);
keyup(forward);wait(1);do;look(south);keydown(forward);
until(%ZPOS%==667);do;keydown(jump);until(%ZPOS%==670);
keyup(jump);do;until(%ZPOS%==672);keyup(forward);do;
look(east);keydown(forward);until(%XPOS%==736);keyup(forward);
look(east);look(EAST);look(,70);wait(750ms);
key(attack);wait(1);key(attack);wait(1);key(attack);wait(1);
key(attack);wait(1);else;endif;if(%#pexe%=349);
dec(#ryjo,1);else;endif;else;endif;else;endif;
else;endif;endif;until(%#ryjo%=30);
endif;endif;log("");log(" &3&lProcesso de Venda Terminado.");log("");
}$$

alguem conseguie arrumar ae pfvr?