$${
IF(vcacto);
//////////////////////////
// VALOR WARP VIP
#wvv=30
// VALOR WARP LOJA
#wlv=20
//////////////////////////
LOG("&3[%PLAYER%] &6Coleta e venda &4[OFF]");
UNSET(vcacto);GUI();
STOP();
ELSE;
LOG("&3[%PLAYER%] &6Coleta e venda &2[ON]");
LOG("&3[%PLAYER%] &3Para desligar pressione %KEYNAME%");
SET(vcacto);#nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
ENDIF;
////////////////////////////////////////////
gui(inventory);wait(500ms);
log("&6Mantenha seu inventário &faberto!");
log("&6Preparando relatório, &faguarde...");
////////////////////////////////////////////
do;
getslotitem(%#nslot%,&id,#stack)
ifmatches(%&id%,air);
  INC(#svazio,1);
else;
  if(%&id%=cactus);
    if(%#stack%=64);
      INC(#sok,1);
      INC(#cct,64);
    else;
      INC(#cct,%#stack%);
    endif;
  else;
      INC(#sok2,1);
  endif;
endif;
INC(#nslot,1);
until(%#nslot% = 45);
#lucro=%#sok%*%#wvv%;
#lucro2=%#sok%*%#wlv%;

log("----------------------------");
log("&6Packs de cactos completos: &f%#sok%");
log("&6Slots com outros itens: &f%#sok2%");
log("&6Quantidade atual de cactos: &f%#cct%");
log("&6Lucro na warp vip: &f%#lucro%");
log("&6Lucro na warp loja: &f%#lucro2%");
log("----------------------------");
////////////////////////////////////////////
}$$
$${
////////////////////////////////////////////
 log("&6Mantenha seu inventário &faberto!");
DO;
 gui(inventory);wait(500ms);
 #nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
 do;
 getslotitem(%#nslot%,&id,#stack)
 ifmatches(%&id%,air);
  INC(#svazio,1);
 else;
  ifmatches(%&id%,cactus);
    if(%#stack%=64);
      INC(#sok,1);
      INC(#cct,64);
    else;
      INC(#cct,%#stack%);
      INC(#svazio,1);
    endif;
  endif;
 endif;
 INC(#nslot,1);
 until(%#nslot% = 45);

 #lucro=%#sok%*%#wvv%;
 #lucro2=%#sok%*%#wlv%;

if(SHIFT);
 log("----------------------------");
 log("&6Quantidade atual de cactos: &f%#cct%");
 log("&6Lucro na warp vip (somente packs): &f%#lucro%");
 log("&6Lucro na warp loja (somente packs): &f%#lucro2%");
 log("----------------------------");
endif;

if(%#svazio%=0);
 log("----------------------------");
 log("Itens prontos para venda!");
 log("&6Quantidade atual de cactos: &f%#cct%");
 log("&6Lucro na warp vip (somente packs): &f%#lucro%");
 log("&6Lucro na warp loja (somente packs): &f%#lucro2%");
 log("----------------------------");
 GUI();

}$$
/home wloja
$${
wait(10);
 do(10);
  key(use);
  wait(600ms);
 loop;
}$$
/home cacto
$${
wait(2);
endif;
LOOP;
}$$