ENTREGUE [MACRO] Venda de cacto automática (WARP LOJA)

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Inscreva-se agora!
Status
Não está aberto para novas respostas.
jimmyfilips disse:
FUNCIONA NA VERSÃO: 1.5.2 - 1.7.2 (inclui o region 2.0)
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;
}$$
Qual é o codigo dos cifrao que se mete ? :/
 
Otimo macro como todos sem erros
Porem : eu achei tua macro de vender cacto na warp vip e ela esta com um erro
quando vai para /warp vip ela n passa pela cerca, ela vai ´´MEIO´´ bloco adiante , vc poderia arrumar este arro e me passar?
Vlw
 
Amei esse macro , como sou novo no mundo do minecraft to tentando me adaptar ao forum que tem muitas macros boas e tutoriais!! TOPTOPTOP
 
jimmyfilips disse:
FUNCIONA NA VERSÃO: 1.5.2 - 1.7.2 (inclui o region 2.0)
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;
}$$
Jimmy muda os 40 hits na placa pra 6 e pede pro pessoal setar a home na placa de 576.

Eu acho q ia ser mais rapido.( Foi oq eu fiz).
 
E MUITO BOM MAS SERIA MELHOR SE VOCÊ FAZER UM DE CANA DE AÇÚCAR,MAS UMA QUE NÃO PARASSE TIPO, VOCÊ CRIA ELA DE UM CERTO TIPO E TAMANHO UM TAMANHO BEM GRANDE PARA QUE O ALTO_CLICK FUNCIONE AI ELE FICA DIRETO DIA E NOITE COLECTANDO SEM PARAR,E QUANDO O INVENTARIO LOTAR ELE GUARDA NO BAÚ, SE O BAÚ LOTAR ELE VIRA PARA O LADO ONDE TERÁ OUTRO BAÚ,AI ELE RETORNA A SUA POSIÇÃO E COMEÇA DE NOVO (NÃO PRECISA SER TÃO CERTO EU TO DIZENDO UM QUE FIQUE APENAS BATENDO MESMO TENDO NASCIDO OU NÃO CANAS DE AÇÚCAR.) (NÃO ME IGNOREM MUITOS NÃO TEM DINHEIRO PARA PAGAR (VIP)


{[(MAGNETO_SCRIPT)]}

http://www.nerdingow.com/2011/04/faca-seu-capacete-de-magneto.html


--------------------------------------------------------------
https://www.google.com.br/url?sa=i&rct=j&q=&esrc=s&source=images&cd=&cad=rja&uact=8&docid=XkiezH35bPbQiM&tbnid=uukJFYeROa4MwM:&ved=0CAUQjRw&url=http%3A%2F%2Fwww.comicvine.com%2Fforums%2Fbattles-7%2Femperor-palpatine-vs-magneto-pre-m-day-1488049%2F&ei=2w-NU9KjFpWhsAT784GQCw&bvm=bv.68191837,d.b2k&psig=AFQjCNH22_koroq06e8zDdeLcgsS3s_b4A&ust=1401839921857830


:enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman: :enderman:
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo