FUNCIONA NA VERSÃO: 1.5.2 - 1.7.2 (inclui o region 2.0) - macro descontinuado
COLOQUE OBRIGATORIAMENTE ESTE MACRO NO "EDIT FILES" E NÃO DIRETO NO BOTÃO!!
Como usar
Antes de usar você precisa fazer isso:
- Dê /sethome cacto onde coleta cacto
- Dê /sethome wloja em frente a placa de cacto da warp loja (faça isso olhando para a placa de venda)
IMPORTANTE: NÃO FAÇA ISSO EM LOJAS DE PLAYER, NÃO ESQUEÇA QUE BAÚS ENCHEM, JÁ A WARP LOJA NÃO TEM LIMITES
Para usar é simples:
- Vá até sua home de cacto e ative a macro
- Não feche o inventário (a macro também pede isso na tela)
Como ele funciona
ele irá abrir o inventário e ficará verificando o mesmo, fazendo a leitura completa dele, quando ele estiver completamente ocupado, irá para a /home wloja e venderá tudo!! Após isso, ele retorna a /home cacto e começa tudo de novo!
Complementos
Se você segurar o shift por alguns segundos, o macro te mostra o quanto de lucro você terá com o que está em seu inventário
VÍDEO
Infelizmente ainda não pude gravá-lo, mas em breve virá ao ar
CÓDIGO
1.5.2
$${
IF(vcacto);
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)
if(%#id%!=0);
if(%#id%=81);
if(%#stack%=64);
INC(#sok,1);
INC(#cct,64);
else;
INC(#cct,%#stack%);
endif;
else;
INC(#sok2,1);
endif;
else;
INC(#svazio,1);
endif;
INC(#nslot,1);
until(%#nslot% = 45);
#lucro=%#sok%*30;
#lucro2=%#sok%*20;
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)
if(%#id%!=0);
if(%#id%=81);
if(%#stack%=64);
INC(#sok,1);
INC(#cct,64);
else;
INC(#cct,%#stack%);
INC(#svazio,1);
endif;
endif;
else;
INC(#svazio,1);
endif;
INC(#nslot,1);
until(%#nslot% = 45);
#lucro=%#sok%*30;
#lucro2=%#sok%*20;
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(40);
key(attack);
wait(600ms);
loop;
}$$
/home cacto
$${
wait(2);
endif;
LOOP;
}$$
1.7.2
$${
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(40);
key(attack);
wait(600ms);
loop;
}$$
/home cacto
$${
wait(2);
endif;
LOOP;
}$$
