JesusPot 1 [JesusMacros]

$${
if(epot);
unset(epot);
log(&6&lJesusPot &c&lOff);
stop;
else;
set(epot);
log(&6&lJesusPot &a&lOn);
look(90,30);
do(8);
do(3);
pick(374);
look(+0,90);
wait(350ms);
key(use);
loop;
wait(500ms);
look(+0,22);
wait(350ms);
key(use);
wait(1);
slotclick(35);
slotclick(0);
wait(350ms);
slotclick(36);
slotclick(1);
wait(350ms);
slotclick(37);
slotclick(2);
wait(350ms);
slotclick(32);
wait(350ms);
slotclick(3,r);
wait(350ms);
slotclick(32);
wait(350ms);
gui;
wait(250ms);
look(+45,22);
loop;
wait(1);
do(8);
wait(500ms);
key(use);
wait(1);
slotclick(33);
wait(350ms);
slotclick(3,r);
wait(350ms);
slotclick(33);
wait(350ms);
gui;
wait(250ms);
look(+45,22);
loop;
wait(1);
do(8);
wait(500ms);
key(use);
wait(1);
slotclick(34);
wait(350ms);
slotclick(3,r);
wait(350ms);
slotclick(34);
wait(350ms);
gui;
wait(250ms);
look(+45,22);
loop;
wait(1);
do(8);
wait(500ms);
key(use);
wait(1);
slotclick(0,l,true);
wait(350ms);
slotclick(1,l,true);
wait(350ms);
slotclick(2,l,true);
wait(350ms);
gui;
wait(250ms);
look(+45,22);
loop;
wait(500ms);
look(90,0);
wait(500ms);
key(use);
for(#inv,54,80);
slotclick(%#inv%,l,true);
wait(100ms);
next;
for(#inv,85,89);
slotclick(%#inv%,l,true);
wait(100ms);
next;
wait(500ms);
gui;
unset(pot);
log(&6&lTudo pronto);
log(&6&lJesusPot&c&lOff);
stop;
endif;
loop;
}$$