$${

log(&6[&f%PLAYER%&6] &aMacro editado e aprimorado por &fZeDaFarofa);



 if(macrodcacto);

  log("&6[&f%PLAYER%&6] &aParando venda de cactos");

  unset(macrodcacto);

  stop();

 else;

  wait(1);

  log("&6[&f%PLAYER%&6] &aIniciando venda de cactos");

}$$/g &a&lMacro venda de fungos &f&l!&5&lzedafarofa &4&ls2$${

//Porfavor nao edite os creditos

//Vai editar mesmo cabaço do krl?

//Coisa de lixo que tira os creditos do cara que sofre

//pra trazer um macro pra um bando de mau agradecido!

  set(macrodcacto);



endif;

PROMPT(#fxv,$$?,"Quantos baus são?");

PROMPT(#cacto,$$?,"Começar em qual bau?");

if(%#cacto>%#fxv%);

log(&6[&f%PLAYER%&6] &aNumero invalido!);

stop;

endif;

do;

  do;

   if(%#cacto%<%#fxv%+1);

    gui(CHAT);

    type(/home cacto%#cacto%);

    press(return);

   endif;

   if(%#cacto%=%#fxv%+1);

    log("&6[&f%PLAYER%&6] &aReiniciando venda de cactos");

    #cacto=1

    gui(CHAT);

    type(/home cacto%#cacto%);

    press(return);

   endif;

   wait(5);

   key(use);

   wait(5);

   for(#bau132,0,53);

    slotclick(%#bau132%,l,true);

    wait(50ms);

   next;

   getslotitem(53,#id,#stack1);

   getslotitem(54,#ie,#ste);

   wait(300ms);

   gui();

   if(%#ste%!=0);

   #return=1;

   else;

   if(%#stack1%=0);

    inc(#cacto);

    #return=0;

   else;

    #return=1;

   endif;

   endif;

   if(%#cacto%>%#fxv%+1);

    #return=1;

   endif;

  until(%#return%);

 }$$/warp lojavip$${

wait(3);

do;

look(west);

keydown(forward);

until(%XPOS%=-288);

keyup(forward);

do;

look(359,0);

keydown(forward);

until(%ZPOS%=-1025);

keyup(forward);

look(91,0);

wait(100ms);

look(91,0,22);

wait(100ms);

key(attack);

wait(1100ms);

key(attack);


loop;

endif;

}$$