$${
if(RSeller);
log("&6[Macro] RCompactar &2&lOFF");
unset(RSeller);
stop;
else;
log("&6[Macro] RCompactar &2lON");
set(RSeller);
clearchat;
log("&6[Macro]  RCompactar ");
log("&6[Macro]  Desenvolvido pelo &cRafaelloMC ");
log("");


prompt(#produto,$$?,"[Macro] Selecione a tecla 1 ");
if(%#produto%!=1);
log("&6[Macro] &4&l[OFF] &l[Opção de escolha inválida.]");
unset(RSeller);
stop;
endif;
endif;
endif;
endif;
endif;

if(%#produto%=1);
prompt(#baut,$$?,"Quantos baús você quer compactar?");
endif;

prompt(#baui,$$?,"Por qual baú deseja começar a compactar?");
endif;

if(%#produto%=1);
do;
if(%#baui%>%#baut%);
gui(chat);
wait(1);
type(/g &cAuto Venda terminada com sucesso!);
wait(2);
press(return);
log("&6[Macro] Auto Venda &4&l[OFF] &a[Acabaram os baús ^-^.]");
}$$/home$${
unset(RSeller);
stop;
endif;

do;
gui(chat);
type(/home compactar%#baui%);
wait(300ms);
press(return);
wait(1500ms);
key(use);
wait(100ms);
key(use);
wait(200ms);
for(#w,0,30);
slotclick(%#w%,l,true);
INC(#baui);
wait(15ms);
endif;
next;
wait(1);
gui();
//
echo(/compactar -a)
wait(1)
key(use)
wait(1)
FOR(#w,54,89);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
for(#w,31,53);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
wait(11)
echo(/compactar -a)
wait(1)
key(use)
wait(1)
FOR(#w,54,89);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
loop;
loop;
endif;

}$$