ENTREGUE Macro escavação lucrosa [Origens/Fênix/Destiny]

Eduarte · 24 Julho 2016

Diferente de outros macros que se adaptam ao jogador, neste macro o jogador que terá que se adaptar ao macro se quiser usar. Mas o que isto quer dizer? Quer dizer que o macro não tem nenhuma pergunta quando ligar, é só ligar e usar.

O objetivo principal do macro, além de livro é provar que da pra lucrar com os itens escavados.

Requisitos para uso do macro:

1- Ser VIP.
2- Ter em mãos uma pá de diamante eficiência 4 toque suave 1 ou mais.
3- Ter em mãos uma picareta eficiência 3 ou mais.
4- Ter em mãos bloco de cascalho. Que é o que a macro irá usar.
5- Ter no mínimo 300 de reparação.
6- Só funciona na nova warp vip, ou seja, os servidores Origens/Fênix e Destiny, pois como não sou vip em outro servidor além do Origens não deu para programar com a warp vip antiga.

Resumo do macro:

A macro irá escavar normalmente, Quando faltar cascalho irá buscar mais em 5 baús duplos, quando os baús de pólvora, osso ou disco encherem a macro irá vender na warp vip, por isto o título, e depois voltar a escavar normalmente, a macro também guarda os itens organizadamente.

Como o inventário deve ficar:

Siga todas as instruções da print

Construção da trap de escavação, /sethomes e armazenamento de itens:

Trap dos baús:

A trap deve ser construída como mostra as imagens:

Os baus na direção WEST são os de armazenamento e os 5 baus na direção NORTH é onde vocês vão encher de cascalho.
O bloco de lã faz parte do sistema antbug

Mais 1 print para facilitar:

Obs: As molduras só mostram onde os itens estarão. Não coloque molduras.
Por fim, de /sethome bausesc em cima da lã azul.
Trap onde você vai escavar

Faça como mostra na print e de /sethome trapesc em cima do bloco de ferro. Você deve construir na direção “WEST” para caso o macro coloque um bolo sem querer simplesmente vai comê-lo.

Instalando o macro:

O macro tem 2 códigos 1 é o código principal e o outro é o código OnChat para economia de blocos e venda.

Macro principal:

$${
if(edu_esc2);
log("&4[MACRO] &2Escavacao lucrosa [&4OFF&2]");
achievementget("Macro feito por Eduarte",277);
unset(edu_esc2);
unset(@economia);
unset(@crazy);
stop();
else;
log("&4[MACRO] &2Escavacao lucrosa [ON]");
set(edu_esc2);
set(@economia);
set(@crazy);
endif;
IFMATCHES(%DIRECTION%,N);&edu_direction = NORTH;ENDIF;
IFMATCHES(%DIRECTION%,S);&edu_direction = SOUTH;ENDIF;
IFMATCHES(%DIRECTION%,W);&edu_direction = WEST;ENDIF;
IFMATCHES(%DIRECTION%,E);&edu_direction = EAST;ENDIF;
//variaveis gerais
#edu_bloco=13;
//variaveis baus
#bau_dima=1;
#bau_bar=1;
#bau_bone1=1;
#bau_bone2=1;
#bau_polvora1=1;
#bau_polvora2=1;
#bau_disco1=1;
#bau_disco2=1;
//variaveis venda
#venda_bone=0;
#venda_polvora=0;
#venda_disco=0;
#last_venda=1;
do;
//primeira etapa
do(40);
do(10);
look(%&edu_direction%);look(,55);
pick(%#edu_bloco%);key(use);wait(1ms);
pick(277);key(attack);
if(@economia2);unset(@economia2);wait(6);
endif
loop;
if(%DURABILITY%<250);
gui();
GETSLOTITEM(8,#idd,#stack);
if(%#idd%=0);
wait(5);echo(/bau);wait(7);gui();wait(2);
endif;
do(10);
look(%&edu_direction%);look(,90);pick(277);key(use);wait(1);
log("&6&lReparando");
until(%DURABILITY%>250);
endif;
if(%HITID%=87);
pick(278);key(attack);wait(3);
endif;
loop;
//primeira etapa
gui(inventory);
wait(800ms);
getslotitem(39,#id);
if(%#id%!=%#edu_bloco%);
#edu_clear=1;
endif;
wait(50ms);
getslotitem(34,#id,#stack);
gui();
wait(200ms);
if((%#stack%=0)&&(%#edu_clear%=0));
else;
//grande else
#edu_clear=0;
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
look(WEST);wait(2ms);
gui(inventory);
wait(600ms);
for(#pes,11,44);
GETSLOTITEM(%#pes%,#id,#stack);
if((%#id%=%#edu_bloco%)||(%#id%=277)||(%#id%=387)||(%#id%=264)||(%#id%=0)||(%#id%=278)||(%#id%=352)||(%#id%=289)||(%#id%=2267));
else;
slotclick(%#pes%);
slotclick(-999);
wait(100ms);
endif;
next;
gui();
wait(1);
//guardando dimas
log("&bGuardando diamantes/livros");
do;
do;
if(%#bau_dima%=1);look(WEST);wait(2ms);look(-35,32);endif;
if(%#bau_dima%=2);look(WEST);wait(2ms);look(-20,36);endif;
if(%#bau_dima%=3);look(WEST);wait(2ms);look(-,38);endif;
if(%#bau_dima%=4);look(WEST);wait(2ms);look(287,36);endif;
if(%#bau_dima%=5);look(WEST);wait(2ms);look(305,32);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=264)||(%#id%=387));
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_dima);
endif;
gui();
if(%#bau_dima%>5);
#bau_dima=1;
endif;
until(%#stack%=0);

//guardando ossos
log("&fGuardando ossos");
do;
do;
if(%#bau_bone1%=1);look(WEST);wait(2ms);look(-35,18);endif;
if(%#bau_bone1%=2);look(WEST);wait(2ms);look(-20,20);endif;
if(%#bau_bone1%=3);look(WEST);wait(2ms);look(-,23);endif;
if(%#bau_bone1%=4);look(WEST);wait(2ms);look(287,20);endif;
if(%#bau_bone1%=5);look(WEST);wait(2ms);look(305,18);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=352);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_bone1);
endif;
gui();
if(%#bau_bone1%>5);
#venda_bone=1;
break;
endif;
until(%#stack%=0);

//guardando polvora
log("&8Guardando polvoras");
do;
do;
if(%#bau_polvora1%=1);look(WEST);wait(2ms);look(-35,3);endif;
if(%#bau_polvora1%=2);look(WEST);wait(2ms);look(-20,3);endif;
if(%#bau_polvora1%=3);look(WEST);wait(2ms);look(-,3);endif;
if(%#bau_polvora1%=4);look(WEST);wait(2ms);look(290,3);endif;
if(%#bau_polvora1%=5);look(WEST);wait(2ms);look(305,3);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=289);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_polvora1);
endif;
gui();
if(%#bau_polvora1%>5);
#venda_polvora=1;
break;
endif;
until(%#stack%=0);

//guardando discos
log("&9Guardando Discos");
do;
do;
if(%#bau_disco1%=1);look(WEST);wait(2ms);look(-38,-15);endif;
if(%#bau_disco1%=2);look(WEST);wait(2ms);look(-20,-15);endif;
if(%#bau_disco1%=3);look(WEST);wait(2ms);look(-,-15);endif;
if(%#bau_disco1%=4);look(WEST);wait(2ms);look(288,-15);endif;
if(%#bau_disco1%=5);look(WEST);wait(2ms);look(305,-13);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=2267);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_disco1);
endif;
gui();
if(%#bau_disco1%>5);
#venda_disco=1;
break;
endif;
until(%#stack%=0);
//vendendo ossos

if(%#venda_bone%=1);
log("&fIniciando vendas dos ossos");
do;
do;
if(%#bau_bone2%=1);look(WEST);wait(2ms);look(-35,18);endif;
if(%#bau_bone2%=2);look(WEST);wait(2ms);look(-20,20);endif;
if(%#bau_bone2%=3);look(WEST);wait(2ms);look(-,23);endif;
if(%#bau_bone2%=4);look(WEST);wait(2ms);look(287,20);endif;
if(%#bau_bone2%=5);look(WEST);wait(2ms);look(305,18);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=352);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_bone2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_bone2);gui();wait(100ms);
else;
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(300);
look(south);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%ZPOS%=685);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
do(550);
look(east);look(,60);keydown(forward);
if((%HITID%=86)||(%HITID%=54));keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%XPOS%=737);wait(300ms);keyup(forward);
look(east);look(,78);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(east);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_bone2%>5);
#venda_bone=0;
#bau_bone2=1;
#bau_bone1=1;
#last_venda=1;
#stack=0;
log("&f&lvenda dos ossos concluida");
break;
endif;
loop;
endif;

//vendendo polvora

if(%#venda_polvora%=1);
log("&8iniciando venda das polvoras");
do;
do;
if(%#bau_polvora2%=1);look(WEST);wait(2ms);look(-35,3);endif;
if(%#bau_polvora2%=2);look(WEST);wait(2ms);look(-20,3);endif;
if(%#bau_polvora2%=3);look(WEST);wait(2ms);look(-,3);endif;
if(%#bau_polvora2%=4);look(WEST);wait(2ms);look(290,3);endif;
if(%#bau_polvora2%=5);look(WEST);wait(2ms);look(305,3);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=289);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_polvora2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_polvora2);gui();wait(100ms);
else;
//venda polvora
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(300);
look(west);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%XPOS%=684);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
do(300);
look(north);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%ZPOS%=636);
wait(300ms);keyup(forward);wait(100ms);
do(100);
look(west);look(,60);keydown(forward);
UNTIL(%XPOS%=681);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
look(north);look(,78);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(north);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_polvora2%>5);
#venda_polvora=0;
#bau_polvora2=1;
#bau_polvora1=1;
#last_venda=1;
#stack=0;
log("&7&lvenda das polvoras concluida");
break;
endif;
loop;
endif;

//vendendo discos

if(%#venda_disco%=1);
log("&9Iniciando venda dos discos");
do;
do;
if(%#bau_disco2%=1);look(WEST);wait(2ms);look(-38,-15);endif;
if(%#bau_disco2%=2);look(WEST);wait(2ms);look(-20,-15);endif;
if(%#bau_disco2%=3);look(WEST);wait(2ms);look(-,-15);endif;
if(%#bau_disco2%=4);look(WEST);wait(2ms);look(288,-15);endif;
if(%#bau_disco2%=5);look(WEST);wait(2ms);look(305,-13);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=2267);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_disco2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_disco2);gui();wait(100ms);
else;
//venda disco
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(120);keydown(forward);look(EAST);look(,60);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
if(%XPOS%=714);keydown(sneak);endif;until(%XPOS%=715);wait(350ms);
keyup(sneak);keyup(forward);
do(300);keydown(forward);look(NORTH);look(,60);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
if(%ZPOS%=633);keydown(sneak);endif;until(%ZPOS%=632);wait(350ms);
keyup(sneak);keyup(forward);
look(west);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(west);look(,-63);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_disco2%>5);
#venda_disco=0;
#bau_disco2=1;
#bau_disco1=1;
#last_venda=1;
#stack=0;
log("&1&lvenda dos discos concluida");
break;
endif;
loop;
endif;
do;}$$/home trapesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
key(attack);wait(500ms);gui(inventory);wait(100ms);
gui(inventory);
wait(600ms);
for(#slot,11,35);
GETSLOTITEM(%#slot%,#id,#stack);
if(%#id%=%#edu_bloco%);
slotclick(%#slot%,l,true);wait(70ms);
endif;
next;
getslotitem(39,#id,#stack);
if(%#id%!=%#edu_bloco%);
log("Sem barro. indo pegar mais");
#pack_bar=0;
for(#slot,36,42);
getslotitem(%#slot%,#id,#stack);
if(%#stack%=0);
inc(#pack_bar,1);
log(%#pack_bar%);
endif;
next;
do;}$$/home bausesc$${gui();wait(4);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
do;
do;
if(%#bau_bar%=1);;look(north);wait(100ms);look(-38,32);endif;
if(%#bau_bar%=2);look(north);wait(100ms);look(-20,37);endif;
if(%#bau_bar%=3);look(north);wait(100ms);look(0,39);endif;
if(%#bau_bar%=4);look(north);wait(100ms);look(20,37);endif;
if(%#bau_bar%=5);look(north);wait(100ms);look(38,32);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=%#edu_bloco%);
slotclick(%#slot%,l,true);wait(100ms);
dec(#pack_bar,1);
log(%#pack_bar%);
endif;
if(%#pack_bar%<1);
break;
endif;
next;
if(%#slot%!=53);
break;
else;
gui();wait(1);
inc(#bau_bar,1);
if(%#bau_bar%>5);
#bau_bar=1;
endif;
endif;
loop;
log("Barro reposto");
do;}$$/home trapesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
endif;
gui();
endif;
loop;
}$$

Macro OnChat:

$${
if(@economia);
ifmatches(%CHAT%,"Limpando itens/mobs do chao em 5s");
set(@economia2);
endif;
endif;
if(@crazy);
ifmatches(%CHATCLEAN%,"tem itens suficientes para vender!");
@#crazy2=1;
endif;
endif;
}$$|

Bom, não vou ensinar como instalar, pois acho que todos sabem. Quem não souber pesquise na área macro que tem vários tutoriais sobre isto.

Por fim, qualquer bug/duvida poste aqui ou mande mp que irei tentar resolver

iGT · 25 Julho 2016

tuts tuts boa macro

Eduarte · 25 Julho 2016

Golden Twist disse:

tuts tuts boa macro
Clique para expandir...

Vlw!!!

KingPvP · 26 Julho 2016

Boa!, vo Usar aqui

Claudio Vinicius · 27 Julho 2016

Bom macro quero saber se tem como eu conf para outro bloco ?

DHerediaa · 27 Julho 2016

Prefiro só pescar msm.. Mas boa macro ;-;

ramos367 · 6 Agosto 2016

Bela macro Eduarte <3

Eduarte · 6 Agosto 2016

ramos367 disse:

Bela macro Eduarte <3
Clique para expandir...

vlw

DET0NA · 6 Agosto 2016

Eduarte disse:

Diferente de outros macros que se adaptam ao jogador, neste macro o jogador que terá que se adaptar ao macro se quiser usar. Mas o que isto quer dizer? Quer dizer que o macro não tem nenhuma pergunta quando ligar, é só ligar e usar.

O objetivo principal do macro, além de livro é provar que da pra lucrar com os itens escavados.

Requisitos para uso do macro:

1- Ser VIP.
2- Ter em mãos uma pá de diamante eficiência 4 toque suave 1 ou mais.
3- Ter em mãos uma picareta eficiência 3 ou mais.
4- Ter em mãos bloco de cascalho. Que é o que a macro irá usar.
5- Ter no mínimo 300 de reparação.
6- Só funciona na nova warp vip, ou seja, os servidores Origens/Fênix e Destiny, pois como não sou vip em outro servidor além do Origens não deu para programar com a warp vip antiga.

Resumo do macro:

A macro irá escavar normalmente, Quando faltar cascalho irá buscar mais em 5 baús duplos, quando os baús de pólvora, osso ou disco encherem a macro irá vender na warp vip, por isto o título, e depois voltar a escavar normalmente, a macro também guarda os itens organizadamente.

Como o inventário deve ficar:

Siga todas as instruções da print

Construção da trap de escavação, /sethomes e armazenamento de itens:

Trap dos baús:

A trap deve ser construída como mostra as imagens:

Os baus na direção WEST são os de armazenamento e os 5 baus na direção NORTH é onde vocês vão encher de cascalho.
O bloco de lã faz parte do sistema antbug

Mais 1 print para facilitar:

Obs: As molduras só mostram onde os itens estarão. Não coloque molduras.
Por fim, de /sethome bausesc em cima da lã azul.
Trap onde você vai escavar

Faça como mostra na print e de /sethome trapesc em cima do bloco de ferro. Você deve construir na direção “WEST” para caso o macro coloque um bolo sem querer simplesmente vai comê-lo.

Instalando o macro:

O macro tem 2 códigos 1 é o código principal e o outro é o código OnChat para economia de blocos e venda.

Macro principal:

$${
if(edu_esc2);
log("&4[MACRO] &2Escavacao lucrosa [&4OFF&2]");
achievementget("Macro feito por Eduarte",277);
unset(edu_esc2);
unset(@economia);
unset(@crazy);
stop();
else;
log("&4[MACRO] &2Escavacao lucrosa [ON]");
set(edu_esc2);
set(@economia);
set(@crazy);
endif;
IFMATCHES(%DIRECTION%,N);&edu_direction = NORTH;ENDIF;
IFMATCHES(%DIRECTION%,S);&edu_direction = SOUTH;ENDIF;
IFMATCHES(%DIRECTION%,W);&edu_direction = WEST;ENDIF;
IFMATCHES(%DIRECTION%,E);&edu_direction = EAST;ENDIF;
//variaveis gerais
#edu_bloco=13;
//variaveis baus
#bau_dima=1;
#bau_bar=1;
#bau_bone1=1;
#bau_bone2=1;
#bau_polvora1=1;
#bau_polvora2=1;
#bau_disco1=1;
#bau_disco2=1;
//variaveis venda
#venda_bone=0;
#venda_polvora=0;
#venda_disco=0;
#last_venda=1;
do;
//primeira etapa
do(40);
do(10);
look(%&edu_direction%);look(,55);
pick(%#edu_bloco%);key(use);wait(1ms);
pick(277);key(attack);
if(@economia2);unset(@economia2);wait(6);
endif
loop;
if(%DURABILITY%<250);
gui();
GETSLOTITEM(8,#idd,#stack);
if(%#idd%=0);
wait(5);echo(/bau);wait(7);gui();wait(2);
endif;
do(10);
look(%&edu_direction%);look(,90);pick(277);key(use);wait(1);
log("&6&lReparando");
until(%DURABILITY%>250);
endif;
if(%HITID%=87);
pick(278);key(attack);wait(3);
endif;
loop;
//primeira etapa
gui(inventory);
wait(800ms);
getslotitem(39,#id);
if(%#id%!=%#edu_bloco%);
#edu_clear=1;
endif;
wait(50ms);
getslotitem(34,#id,#stack);
gui();
wait(200ms);
if((%#stack%=0)&&(%#edu_clear%=0));
else;
//grande else
#edu_clear=0;
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
look(WEST);wait(2ms);
gui(inventory);
wait(600ms);
for(#pes,11,44);
GETSLOTITEM(%#pes%,#id,#stack);
if((%#id%=%#edu_bloco%)||(%#id%=277)||(%#id%=387)||(%#id%=264)||(%#id%=0)||(%#id%=278)||(%#id%=352)||(%#id%=289)||(%#id%=2267));
else;
slotclick(%#pes%);
slotclick(-999);
wait(100ms);
endif;
next;
gui();
wait(1);
//guardando dimas
log("&bGuardando diamantes/livros");
do;
do;
if(%#bau_dima%=1);look(WEST);wait(2ms);look(-35,32);endif;
if(%#bau_dima%=2);look(WEST);wait(2ms);look(-20,36);endif;
if(%#bau_dima%=3);look(WEST);wait(2ms);look(-,38);endif;
if(%#bau_dima%=4);look(WEST);wait(2ms);look(287,36);endif;
if(%#bau_dima%=5);look(WEST);wait(2ms);look(305,32);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=264)||(%#id%=387));
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_dima);
endif;
gui();
if(%#bau_dima%>5);
#bau_dima=1;
endif;
until(%#stack%=0);

//guardando ossos
log("&fGuardando ossos");
do;
do;
if(%#bau_bone1%=1);look(WEST);wait(2ms);look(-35,18);endif;
if(%#bau_bone1%=2);look(WEST);wait(2ms);look(-20,20);endif;
if(%#bau_bone1%=3);look(WEST);wait(2ms);look(-,23);endif;
if(%#bau_bone1%=4);look(WEST);wait(2ms);look(287,20);endif;
if(%#bau_bone1%=5);look(WEST);wait(2ms);look(305,18);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=352);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_bone1);
endif;
gui();
if(%#bau_bone1%>5);
#venda_bone=1;
break;
endif;
until(%#stack%=0);

//guardando polvora
log("&8Guardando polvoras");
do;
do;
if(%#bau_polvora1%=1);look(WEST);wait(2ms);look(-35,3);endif;
if(%#bau_polvora1%=2);look(WEST);wait(2ms);look(-20,3);endif;
if(%#bau_polvora1%=3);look(WEST);wait(2ms);look(-,3);endif;
if(%#bau_polvora1%=4);look(WEST);wait(2ms);look(290,3);endif;
if(%#bau_polvora1%=5);look(WEST);wait(2ms);look(305,3);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=289);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_polvora1);
endif;
gui();
if(%#bau_polvora1%>5);
#venda_polvora=1;
break;
endif;
until(%#stack%=0);

//guardando discos
log("&9Guardando Discos");
do;
do;
if(%#bau_disco1%=1);look(WEST);wait(2ms);look(-38,-15);endif;
if(%#bau_disco1%=2);look(WEST);wait(2ms);look(-20,-15);endif;
if(%#bau_disco1%=3);look(WEST);wait(2ms);look(-,-15);endif;
if(%#bau_disco1%=4);look(WEST);wait(2ms);look(288,-15);endif;
if(%#bau_disco1%=5);look(WEST);wait(2ms);look(305,-13);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%=0);
for(#slotn,56,87);
GETSLOTITEM(%#slotn%,#id,#stack);
if(%#id%=2267);
slotclick(%#slotn%,l,true);
wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(100ms);
if(%#stack%!=0);
inc(#bau_disco1);
endif;
gui();
if(%#bau_disco1%>5);
#venda_disco=1;
break;
endif;
until(%#stack%=0);
//vendendo ossos

if(%#venda_bone%=1);
log("&fIniciando vendas dos ossos");
do;
do;
if(%#bau_bone2%=1);look(WEST);wait(2ms);look(-35,18);endif;
if(%#bau_bone2%=2);look(WEST);wait(2ms);look(-20,20);endif;
if(%#bau_bone2%=3);look(WEST);wait(2ms);look(-,23);endif;
if(%#bau_bone2%=4);look(WEST);wait(2ms);look(287,20);endif;
if(%#bau_bone2%=5);look(WEST);wait(2ms);look(305,18);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=352);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_bone2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_bone2);gui();wait(100ms);
else;
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(300);
look(south);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%ZPOS%=685);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
do(550);
look(east);look(,60);keydown(forward);
if((%HITID%=86)||(%HITID%=54));keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%XPOS%=737);wait(300ms);keyup(forward);
look(east);look(,78);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(east);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_bone2%>5);
#venda_bone=0;
#bau_bone2=1;
#bau_bone1=1;
#last_venda=1;
#stack=0;
log("&f&lvenda dos ossos concluida");
break;
endif;
loop;
endif;

//vendendo polvora

if(%#venda_polvora%=1);
log("&8iniciando venda das polvoras");
do;
do;
if(%#bau_polvora2%=1);look(WEST);wait(2ms);look(-35,3);endif;
if(%#bau_polvora2%=2);look(WEST);wait(2ms);look(-20,3);endif;
if(%#bau_polvora2%=3);look(WEST);wait(2ms);look(-,3);endif;
if(%#bau_polvora2%=4);look(WEST);wait(2ms);look(290,3);endif;
if(%#bau_polvora2%=5);look(WEST);wait(2ms);look(305,3);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=289);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_polvora2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_polvora2);gui();wait(100ms);
else;
//venda polvora
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(300);
look(west);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%XPOS%=684);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
do(300);
look(north);look(,60);keydown(forward);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
UNTIL(%ZPOS%=636);
wait(300ms);keyup(forward);wait(100ms);
do(100);
look(west);look(,60);keydown(forward);
UNTIL(%XPOS%=681);
keydown(sneak);wait(20ms);keyup(sneak);keyup(forward);wait(100ms);
look(north);look(,78);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(north);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_polvora2%>5);
#venda_polvora=0;
#bau_polvora2=1;
#bau_polvora1=1;
#last_venda=1;
#stack=0;
log("&7&lvenda das polvoras concluida");
break;
endif;
loop;
endif;

//vendendo discos

if(%#venda_disco%=1);
log("&9Iniciando venda dos discos");
do;
do;
if(%#bau_disco2%=1);look(WEST);wait(2ms);look(-38,-15);endif;
if(%#bau_disco2%=2);look(WEST);wait(2ms);look(-20,-15);endif;
if(%#bau_disco2%=3);look(WEST);wait(2ms);look(-,-15);endif;
if(%#bau_disco2%=4);look(WEST);wait(2ms);look(288,-15);endif;
if(%#bau_disco2%=5);look(WEST);wait(2ms);look(305,-13);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
getslotitem(53,#id,#stack);
if(%#stack%!=0)
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=2267);
slotclick(%#slot%,l,true);wait(100ms);
endif;
next;
endif;
getslotitem(53,#id,#stack);
wait(500ms);
if((%#bau_disco2%=5)&&(%#stack%=0)&&(%#last_venda%=1));
#stack=1;
#last_venda=0;
endif;
if(%#stack%=0);
inc(#bau_disco2);gui();wait(100ms);
else;
//venda disco
echo(/warp vip);
wait(5);
do(1000);
if(%YPOS%=4);echo(/warp vip);wait(7);endif;if(%YPOS%=5);break();wait(5);endif;loop;
do(120);keydown(forward);look(EAST);look(,60);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
if(%XPOS%=714);keydown(sneak);endif;until(%XPOS%=715);wait(350ms);
keyup(sneak);keyup(forward);
do(300);keydown(forward);look(NORTH);look(,60);
if(%HITID%=54);keydown(jump);wait(400ms);keyup(jump);wait(200ms);endif;
if(%ZPOS%=633);keydown(sneak);endif;until(%ZPOS%=632);wait(350ms);
keyup(sneak);keyup(forward);
look(west);@#crazy2=0;
do(20);key(attack);wait(200ms);until(%@#crazy2%=1);look(west);look(,-63);wait(1);@#crazy2=0;
do(30);key(attack);wait(200ms);until(%@#crazy2%=1);
do;}$$/home bausesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
endif;
if(%#bau_disco2%>5);
#venda_disco=0;
#bau_disco2=1;
#bau_disco1=1;
#last_venda=1;
#stack=0;
log("&1&lvenda dos discos concluida");
break;
endif;
loop;
endif;
do;}$$/home trapesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
key(attack);wait(500ms);gui(inventory);wait(100ms);
gui(inventory);
wait(600ms);
for(#slot,11,35);
GETSLOTITEM(%#slot%,#id,#stack);
if(%#id%=%#edu_bloco%);
slotclick(%#slot%,l,true);wait(70ms);
endif;
next;
getslotitem(39,#id,#stack);
if(%#id%!=%#edu_bloco%);
log("Sem barro. indo pegar mais");
#pack_bar=0;
for(#slot,36,42);
getslotitem(%#slot%,#id,#stack);
if(%#stack%=0);
inc(#pack_bar,1);
log(%#pack_bar%);
endif;
next;
do;}$$/home bausesc$${gui();wait(4);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
do;
do;
if(%#bau_bar%=1);;look(north);wait(100ms);look(-38,32);endif;
if(%#bau_bar%=2);look(north);wait(100ms);look(-20,37);endif;
if(%#bau_bar%=3);look(north);wait(100ms);look(0,39);endif;
if(%#bau_bar%=4);look(north);wait(100ms);look(20,37);endif;
if(%#bau_bar%=5);look(north);wait(100ms);look(38,32);endif;
wait(100ms);
key(use);
wait(3);
ifmatches(%GUI%,Chest);break;endif;
loop;
for(#slot,0,53);
getslotitem(%#slot%,#id,#stack);
if(%#id%=%#edu_bloco%);
slotclick(%#slot%,l,true);wait(100ms);
dec(#pack_bar,1);
log(%#pack_bar%);
endif;
if(%#pack_bar%<1);
break;
endif;
next;
if(%#slot%!=53);
break;
else;
gui();wait(1);
inc(#bau_bar,1);
if(%#bau_bar%>5);
#bau_bar=1;
endif;
endif;
loop;
log("Barro reposto");
do;}$$/home trapesc$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
endif;
gui();
endif;
loop;
}$$

Macro OnChat:

$${
if(@economia);
ifmatches(%CHAT%,"Limpando itens/mobs do chao em 5s");
set(@economia2);
endif;
endif;
if(@crazy);
ifmatches(%CHATCLEAN%,"tem itens suficientes para vender!");
@#crazy2=1;
endif;
endif;
}$$|

Bom, não vou ensinar como instalar, pois acho que todos sabem. Quem não souber pesquise na área macro que tem vários tutoriais sobre isto.

Por fim, qualquer bug/duvida poste aqui ou mande mp que irei tentar resolver
Clique para expandir...

bom macro cara mais eu tenho 1 pergunta. praque upar escavação e os livros não existem la?. conta ae .

gabriel195 · 6 Agosto 2016

Vou testa-la, parabéns pela macro

Eduarte · 7 Agosto 2016

gabkil194 disse:

bom macro cara mais eu tenho 1 pergunta. praque upar escavação e os livros não existem la?. conta ae .
Clique para expandir...

A mano, muitos gostam de upar para competir no /mctop, com a macro não vai ser 100% preju rs

DET0NA · 7 Agosto 2016

Eduarte disse:

A mano, muitos gostam de upar para competir no /mctop, com a macro não vai ser 100% preju rs
Clique para expandir...

hmm okay ne a escolha e deles

Tonykiller · 8 Agosto 2016

É bom só para o Destiny
Mais eu nem jogo lá...
Mais gostei do Macro [emoji51]

Enviado do meu iPhone usando Tapatalk

cicerosr · 8 Agosto 2016

boa

Eduarte · 8 Agosto 2016

Tonykiller disse:

É bom só para o Destiny
Mais eu nem jogo lá...
Mais gostei do Macro [emoji51]

Enviado do meu iPhone usando Tapatalk
Clique para expandir...

é no destiny pode ser mt bom o macro, vlw

XnD · 8 Agosto 2016

Mto bom ^^

mas tava procurando umas macro pro propano ;-;

Eduarte · 10 Agosto 2016

zYellow disse:

Mto bom ^^

mas tava procurando umas macro pro propano ;-;
Clique para expandir...

é, no propano eu não jogo ai fica maio difícil

iDonTaiN · 10 Agosto 2016

eu usaria se fosse vip e tivesse desbanido

Pito · 25 Agosto 2016

boa macro

lllllillllilllill · 25 Agosto 2016

Ótima Macro Parabéns.

ENTREGUE Macro escavação lucrosa [Origens/Fênix/Destiny]

Shoutbox (0)

Eduarte Craftlandiano
VIP

iGT Razoavel
VIP

Eduarte Craftlandiano
VIP

KingPvP Neutro
VIP

Claudio Vinicius Neutro
VIP

DHerediaa Craftlandiano
VIP

ramos367 Neutro
VIP

Eduarte Craftlandiano
VIP

DET0NA Hardcore
VIP

gabriel195 Excelente
VIP

Eduarte Craftlandiano
VIP

DET0NA Hardcore
VIP

Tonykiller Bom
VIP

cicerosr Neutro

Eduarte Craftlandiano
VIP

XnD Excelente
VIP

Eduarte Craftlandiano
VIP

iDonTaiN Excelente
Banido

Pito Neutro
Banido

lllllillllilllill Craftlandiano
VIP

ENTREGUE Macro escavação lucrosa [Origens/Fênix/Destiny]

Shoutbox (0)

Eduarte Craftlandiano VIP

iGT Razoavel VIP

Eduarte Craftlandiano VIP

KingPvP Neutro VIP

Claudio Vinicius Neutro VIP

DHerediaa Craftlandiano VIP

ramos367 Neutro VIP

Eduarte Craftlandiano VIP

DET0NA Hardcore VIP

gabriel195 Excelente VIP

Eduarte Craftlandiano VIP

DET0NA Hardcore VIP

Tonykiller Bom VIP

cicerosr Neutro

Eduarte Craftlandiano VIP

XnD Excelente VIP

Eduarte Craftlandiano VIP

iDonTaiN Excelente Banido

Pito Neutro Banido

lllllillllilllill Craftlandiano VIP

Eduarte Craftlandiano
VIP

iGT Razoavel
VIP

Eduarte Craftlandiano
VIP

KingPvP Neutro
VIP

Claudio Vinicius Neutro
VIP

DHerediaa Craftlandiano
VIP

ramos367 Neutro
VIP

Eduarte Craftlandiano
VIP

DET0NA Hardcore
VIP

gabriel195 Excelente
VIP

Eduarte Craftlandiano
VIP

DET0NA Hardcore
VIP

Tonykiller Bom
VIP

Eduarte Craftlandiano
VIP

XnD Excelente
VIP

Eduarte Craftlandiano
VIP

iDonTaiN Excelente
Banido

Pito Neutro
Banido

lllllillllilllill Craftlandiano
VIP