ENTREGUE Macro De Cactos 48 Baus Sem Homes! 29/01/2015

Sergiu · 29 Janeiro 2015

Iae Galera, Hoje trago para Vocês um macro de Cactos com 48 baus duplos!

É Bem Simples, Com 2 sethomes, são elas /home cacto e /home baucacto.

O que ele faz?
Coleta Cactos e Guarda em 48 Baus Duplos.
Lembre-se: Coloque o Macro no Edit Files.

A /home cacto é Bem Simples, Você vai coloca-la na sua plantação de Cactos Conforme a Trap, No meu Caso é ali no meio. Assim:

Bem, Vamos a Trap Dos Baus. Você Vai Fazer uma torre de 4 de autura e 6 de largura, como mostra a print.

Conte 4 Da Esquerda pra direita, virado para o NORTE, coloque um bloco diferente e marque a
/sethome baucacto

O Primeiro Macro (Você vai usar pra verificar os Baús)
O Primeiro macro, aquele de sempre que a gente usa uma vez pra verificar se o steve está olhando para todos os baús corretamente, caso não esteja você tenta andar um pouco pro lado, pra frente, você que sabe, ai vai:

$${
if(testebaus);
log(&fDesligado);
unset(testebaus);
stop();
else;
log(&aLigando);
set(testebaus);
#bau=1;

if(%#bau%=1);wait(100ms);
look(north);wait(100ms);
look(297,-30);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=2);wait(100ms);
look(north);wait(100ms);
look(307,-37);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=3);wait(100ms);
look(north);wait(100ms);
look(325,-45);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=4);wait(100ms);
look(north);wait(100ms);
look(360,-50);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=5);wait(100ms);
look(north);wait(100ms);
look(390,-45);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=6);wait(100ms);
look(north);wait(100ms);
look(410,-35);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=7);wait(100ms);
look(north);wait(100ms);
look(297,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=8);wait(100ms);
look(north);wait(100ms);
look(307,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=9);wait(100ms);
look(north);wait(100ms);
look(325,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=10);wait(100ms);
look(north);wait(100ms);
look(360,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=11);wait(100ms);
look(north);wait(100ms);
look(390,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=12);wait(100ms);
look(north);wait(100ms);
look(410,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=13);wait(100ms);
look(north);wait(100ms);
look(297,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=14);wait(100ms);
look(north);wait(100ms);
look(307,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=15);wait(100ms);
look(north);wait(100ms);
look(325,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=16);wait(100ms);
look(north);wait(100ms);
look(360,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=17);wait(100ms);
look(north);wait(100ms);
look(390,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=18);wait(100ms);
look(north);wait(100ms);
look(410,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=19);wait(100ms);
look(north);wait(100ms);
look(297,20);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=20);wait(100ms);
look(north);wait(100ms);
look(307,20);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=21);wait(100ms);
look(north);wait(100ms);
look(325,30);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=22);wait(100ms);
look(north);wait(100ms);
look(360,30);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=23);wait(100ms);
look(north);wait(100ms);
look(390,30);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=24);wait(100ms);
look(north);wait(100ms);
look(405,30);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=25);wait(100ms);
look(south);wait(100ms);
look(130,-40);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=26);wait(100ms);
look(south);wait(100ms);
look(150,-45);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=27);wait(100ms);
look(south);wait(100ms);
look(180,-45);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=28);wait(100ms);
look(south);wait(100ms);
look(210,-43);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=29);wait(100ms);
look(south);wait(100ms);
look(233,-35);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=30);wait(100ms);
look(south);wait(100ms);
look(244,-32);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=31);wait(100ms);
look(south);wait(100ms);
look(130,-17);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=32);wait(100ms);
look(south);wait(100ms);
look(150,-17);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=33);wait(100ms);
look(south);wait(100ms);
look(180,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=34);wait(100ms);
look(south);wait(100ms);
look(210,-17);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=35);wait(100ms);
look(south);wait(100ms);
look(235,-17);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=36);wait(100ms);
look(south);wait(100ms);
look(244,-15);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=37);wait(100ms);
look(south);wait(100ms);
look(130,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=38);wait(100ms);
look(south);wait(100ms);
look(150,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=39);wait(100ms);
look(south);wait(100ms);
look(180,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=40);wait(100ms);
look(south);wait(100ms);
look(210,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=41);wait(100ms);
look(south);wait(100ms);
look(233,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=42);wait(100ms);
look(south);wait(100ms);
look(245,0);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=43);wait(100ms);
look(south);wait(100ms);
look(130,27);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=44);wait(100ms);
look(south);wait(100ms);
look(150,27);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=45);wait(100ms);
look(south);wait(100ms);
look(180,27);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=46);wait(100ms);
look(south);wait(100ms);
look(211,27);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=47);wait(100ms);
look(south);wait(100ms);
look(232,25);log(&3&l%#bau%);wait(1);endif;inc(#bau);

if(%#bau%=48);wait(100ms);
look(south);wait(100ms);
look(246,22);log(&3&l%#bau%);wait(1);endif;inc(#bau);

log(&aDESLIGADO);
unset(bauteste);
stop();
endif;
}$$

O Segundo Macro (O que você vai usar)
Então, depois de ter feito tudo, seu macro já está olhando para todos os baús corretamente, pronto, você vai pra sua /home cacto e pode ligar esse macro já!

$${
if(vcacto);
log("&6[%PLAYER%] &3 Macro de Cacto &4Desligado!");
unset(vcacto);
stop();
else;
log("&6[%PLAYER%] &3 Macro de Cactos &aLigado!");
ACHIEVEMENTGET(Macro Do Sergiu,81:81)
SET(vcacto);#nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
endif;

&dir = %DIRECTION%;
#bau=1;
#delay=9;
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;
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();
//############Guardando Itens..

}$$
/home baucacto
$${
do;
wait(%#delay%);

if(%#bau%=1);wait(100ms);
look(north);wait(100ms);
look(297,-30);wait(1);endif;

if(%#bau%=2);wait(100ms);
look(north);wait(100ms);
look(307,-37);wait(1);endif;

if(%#bau%=3);wait(100ms);
look(north);wait(100ms);
look(325,-45);wait(1);endif;

if(%#bau%=4);wait(100ms);
look(north);wait(100ms);
look(360,-50);wait(1);endif;

if(%#bau%=5);wait(100ms);
look(north);wait(100ms);
look(390,-45);wait(1);endif;

if(%#bau%=6);wait(100ms);
look(north);wait(100ms);
look(410,-35);wait(1);endif;

if(%#bau%=7);wait(100ms);
look(north);wait(100ms);
look(297,-15);wait(1);endif;

if(%#bau%=8);wait(100ms);
look(north);wait(100ms);
look(307,-15);wait(1);endif;

if(%#bau%=9);wait(100ms);
look(north);wait(100ms);
look(325,-15);wait(1);endif;

if(%#bau%=10);wait(100ms);
look(north);wait(100ms);
look(360,-15);wait(1);endif;

if(%#bau%=11);wait(100ms);
look(north);wait(100ms);
look(390,-15);wait(1);endif;

if(%#bau%=12);wait(100ms);
look(north);wait(100ms);
look(410,-15);wait(1);endif;

if(%#bau%=13);wait(100ms);
look(north);wait(100ms);
look(297,0);wait(1);endif;

if(%#bau%=14);wait(100ms);
look(north);wait(100ms);
look(307,0);wait(1);endif;

if(%#bau%=15);wait(100ms);
look(north);wait(100ms);
look(325,0);wait(1);endif;

if(%#bau%=16);wait(100ms);
look(north);wait(100ms);
look(360,0);wait(1);endif;

if(%#bau%=17);wait(100ms);
look(north);wait(100ms);
look(390,0);wait(1);endif;

if(%#bau%=18);wait(100ms);
look(north);wait(100ms);
look(410,0);wait(1);endif;

if(%#bau%=19);wait(100ms);
look(north);wait(100ms);
look(297,20);wait(1);endif;

if(%#bau%=20);wait(100ms);
look(north);wait(100ms);
look(307,20);wait(1);endif;

if(%#bau%=21);wait(100ms);
look(north);wait(100ms);
look(325,30);wait(1);endif;

if(%#bau%=22);wait(100ms);
look(north);wait(100ms);
look(360,30);wait(1);endif;

if(%#bau%=23);wait(100ms);
look(north);wait(100ms);
look(390,30);wait(1);endif;

if(%#bau%=24);wait(100ms);
look(north);wait(100ms);
look(410,30);wait(1);endif;

if(%#bau%=25);wait(100ms);
look(south);wait(100ms);
look(130,-40);wait(1);endif;

if(%#bau%=26);wait(100ms);
look(south);wait(100ms);
look(150,-45);wait(1);endif;

if(%#bau%=27);wait(100ms);
look(south);wait(100ms);
look(180,-45);wait(1);endif;

if(%#bau%=28);wait(100ms);
look(south);wait(100ms);
look(210,-43);wait(1);endif;

if(%#bau%=29);wait(100ms);
look(south);wait(100ms);
look(233,-37);wait(1);endif;

if(%#bau%=30);wait(100ms);
look(south);wait(100ms);
look(242,-32);wait(1);endif;

if(%#bau%=31);wait(100ms);
look(south);wait(100ms);
look(130,-17);wait(1);endif;

if(%#bau%=32);wait(100ms);
look(south);wait(100ms);
look(150,-17);wait(1);endif;

if(%#bau%=33);wait(100ms);
look(south);wait(100ms);
look(180,-15);wait(1);endif;

if(%#bau%=34);wait(100ms);
look(south);wait(100ms);
look(210,-17);wait(1);endif;

if(%#bau%=35);wait(100ms);
look(south);wait(100ms);
look(235,-17);wait(1);endif;

if(%#bau%=36);wait(100ms);
look(south);wait(100ms);
look(244,-15);wait(1);endif;

if(%#bau%=37);wait(100ms);
look(south);wait(100ms);
look(130,0);wait(1);endif;

if(%#bau%=38);wait(100ms);
look(south);wait(100ms);
look(150,0);wait(1);endif;

if(%#bau%=39);wait(100ms);
look(south);wait(100ms);
look(180,0);wait(1);endif;

if(%#bau%=40);wait(100ms);
look(south);wait(100ms);
look(210,0);wait(1);endif;

if(%#bau%=41);wait(100ms);
look(south);wait(100ms);
look(233,0);wait(1);endif;

if(%#bau%=42);wait(100ms);
look(south);wait(100ms);
look(242,0);wait(1);endif;

if(%#bau%=43);wait(100ms);
look(south);wait(100ms);
look(130,27);wait(1);endif;

if(%#bau%=44);wait(100ms);
look(south);wait(100ms);
look(150,27);wait(1);endif;

if(%#bau%=45);wait(100ms);
look(south);wait(100ms);
look(180,27);wait(1);endif;

if(%#bau%=46);wait(100ms);
look(south);wait(100ms);
look(211,27);wait(1);endif;

if(%#bau%=47);wait(100ms);
look(south);wait(100ms);
look(232,25);wait(1);endif;

if(%#bau%=48);wait(100ms);
look(south);wait(100ms);
look(246,22);wait(1);endif;

//########################################
//########################################

//#### Abrindo Bau e colocando Itens.
wait(2);
key(use);
wait(2);
for(#i,54,80);
wait(40ms);
slotclick(%#i%,l,true);
next;
endif;
//##############Verificar se Bau Está cheio.
wait(500ms);
getslotitem(53,#id,#stack);
if(%#stack%!=0);
wait(100ms);
inc(#bau,1);
endif;

//######Verificar se TODOS os baús estão cheios.
if(%#bau%=48);
unset(baucheq);
wait(100ms);
gui();else;gui();
endif;
//#######Voltando a Coletar.
until(%#stack%=0);
wait(100ms);
}$$
/home cacto
$${
wait(%#delay%);
gui(inventory);
endif;endif;
loop;
}$$

Pronto, Boa Sorte!

-Bem, Gostaria De Deichar Creditos a:
@Phodalao , Usei As Print's Dele e Também O Armazenamento Dos Cactos.
@JimmyFIlips , Pois Peguei A Contagem do Lucro De Uma Macro Dele.

-Deixe Seu Like, Deu Trabalho. :thanks:

NeroWins · 30 Janeiro 2015

Bela Macro parça

Sergiu · 30 Janeiro 2015

Vlw Parça

CounterBR · 1 Fevereiro 2015

boa amr to atrasado ak uhuhu

FantasyGS · 1 Fevereiro 2015

bom macro, mas ja tenho o meu q vende automaticamente

Sergiu · 2 Fevereiro 2015

FantasyGS disse:

bom macro, mas ja tenho o meu q vende automaticamente
Clique para expandir...

Sim, Porém assim como eu quando alguns começam, não querem vender na warp loja, visto que não sao vip's, Vendem em Lojas de Vip's.. Essa Macro é mais especificamente Para quem faz isso. :thumbsup:

Sackser · 10 Fevereiro 2015

Boa cara

hats · 10 Fevereiro 2015

Parabéns ótimo macro

Astral94 · 10 Fevereiro 2015

Vou fazer uma plant e pegar este macro vlw lek :3

SkaiTle · 13 Março 2015

Vlw aé agora q eu to com 1kk pq gastei comprando cactus hu3

[VIP :diamond: ] SkaiTle

Ass:T10Sk41Tl3

bloum · 13 Março 2015

Boa, gostei do macro

Andrew46 · 13 Março 2015

Parabéns, belo macro

Darkeeper · 14 Março 2015

vlw

TPCarrey · 14 Março 2015

Boa macro , vai ajudar bastante

zInter00 · 14 Março 2015

O macro parece ser ótimo , mais mal está caindo cacto

Sergiu · 16 Março 2015

Sim, é uma pena, pois muitos começam a pegar money e etc com cactos, até as plant's enormes davam 1kk por dia e tudo, agora ta meio ruim, mas pra alguem que começa com 0 de money e acha uma plant, digamos que "dá pro gasto"

GR6Fluxos · 9 Maio 2015

Boa lek..

Hoow · 8 Junho 2015

Nossa, bela macro....
porém é bem melhor ir vender diretamente...

ENTREGUE Macro De Cactos 48 Baus Sem Homes! 29/01/2015

Shoutbox (0)

Sergiu Neutro
VIP

NeroWins Neutro
Banido

Sergiu Neutro
VIP

CounterBR Neutro
Banido

FantasyGS Craftlandiano
VIP

Sergiu Neutro
VIP

Sackser Neutro

hats Excelente
Banido

Astral94 Hardcore
VIP

SkaiTle Neutro

bloum Excelente
VIP

Andrew46 Hardcore
VIP

Darkeeper Neutro

TPCarrey Hardcore
VIP

zInter00 Craftlandiano
VIP

Sergiu Neutro
VIP

GR6Fluxos Craftlandiano
VIP

Hoow Neutro

ENTREGUE Macro De Cactos 48 Baus Sem Homes! 29/01/2015

Shoutbox (0)

Sergiu Neutro VIP

NeroWins Neutro Banido

Sergiu Neutro VIP

CounterBR Neutro Banido

FantasyGS Craftlandiano VIP

Sergiu Neutro VIP

Sackser Neutro

hats Excelente Banido

Astral94 Hardcore VIP

SkaiTle Neutro

bloum Excelente VIP

Andrew46 Hardcore VIP

Darkeeper Neutro

TPCarrey Hardcore VIP

zInter00 Craftlandiano VIP

Sergiu Neutro VIP

GR6Fluxos Craftlandiano VIP

Hoow Neutro

Sergiu Neutro
VIP

NeroWins Neutro
Banido

Sergiu Neutro
VIP

CounterBR Neutro
Banido

FantasyGS Craftlandiano
VIP

Sergiu Neutro
VIP

hats Excelente
Banido

Astral94 Hardcore
VIP

bloum Excelente
VIP

Andrew46 Hardcore
VIP

TPCarrey Hardcore
VIP

zInter00 Craftlandiano
VIP

Sergiu Neutro
VIP

GR6Fluxos Craftlandiano
VIP