Ola.
Vim postar esse macro pois eu usei ele por algum tempo sem vip e me ajudou bastante estou quase cumprindo minha meta :3
Link do macro original: http://forum.craftlandia.com.br/ipb/index.php?/topic/359860-macro-espadas-arqueiro-e-machado-vip-ou-n%C3%A3o/
Macro Nao Vip:
$${
if(escravo);
log("&a[MACRO] &6Desligado");
unset(escravo);
stop;
else;
set(escravo);
&arco="^261$";
&sword="^276$|^267$|^272$|^268$|^283$";
&axe="^279$|^258$|^275$|^271$|^286$";
&diamante="^276$|^279$";
&ferro="^267$|^258$";
&pedra="^272$|^275$";
&madeira="^268$|^271$";
&ouro="^283$|^286$";
slot(1);
#slot1=%ITEM%;
ifmatches(%#slot1%,%&sword%|%&axe%|%&arco%);
ifmatches(%#slot1%,%&arco%);&resposta1="Arqueiro";#dur=10;endif;
ifmatches(%#slot1%,%&sword%|%&axe%);&resposta1="Espada";endif;
ifmatches(%#slot1%,%&diamante%);#dur=50;endif;
ifmatches(%#slot1%,%&ferro%|%&pedra%);#dur=20;endif;
ifmatches(%#slot1%,%&madeira%|%&ouro%);#dur=10;endif;
ifmatches(%DIRECTION%,S);&direction=SOUTH;&costas=NORTH;endif;
ifmatches(%DIRECTION%,N);&direction=NORTH;&costas=SOUTH;endif;
ifmatches(%DIRECTION%,E);&direction=EAST;&costas=WEST;endif;
ifmatches(%DIRECTION%,W);&direction=WEST;&costas=EAST;endif;
#baun=1;
#pack=0;
#slot=1;
else;
log("&4[ERROR] &3Coloque sua arma no slot &61");
log("&a[MACRO] &6Desligado");unset(escravo);stop;
endif;
&per2="Onde você vai guardar?,Nos baus DA TRAP,Nos Baus COM HOMES,Nao vou guardar";
&per3="Você é VIP?,Sim,Nao";
PROMPT(&resposta3,"$$[Escolha[%&per3%]]");
PROMPT(&resposta2,"$$[Escolha[%&per2%]]");
ifmatches(%&resposta3%,Sim);#tempo=4;endif;
ifmatches(%&resposta3%,Nao);#tempo=7;endif;
log("&a[MACRO] &6Trabalhando");
endif;
do;
do(100);
if(%#slot%>9);
log("&3Suas armas acabaram");
unset(escravo);
stop;
endif;
slot(%#slot%);
ifmatches(%GUI%,Inventory);gui;endif;
look(%&direction%);
look(,-20);
ifmatches(%&resposta1%,Arqueiro);
do(24);key(use);loop;
if(%DURABILITY%<%#dur%);inc(#slot,1);endif;
endif;
ifmatches(%&resposta1%,Espada);
key(ATTACK);wait(250ms);
if(%DURABILITY%<%#dur%);inc(#slot,1);endif;
endif;
loop;
ifmatches(%GUI%,None);gui(INVENTORY);endif;
wait(100ms);
getslotitem(35,#id,#stack);
if(%#stack%!=0);
log("&3Jogando espadas fora");
look(%&costas%);
#vazio=0;
wait(100ms);
for(#i,9,44);
getslotitem(%#i%,#id,#stack);
if(%#id%=283);
slotclick(%#i%);
slotclick(-999);
IF(%#i%!=35);#vazio=%#i%;ENDIF;
endif;
wait(250ms);
next;
GETSLOTITEM(35,#id,#stack);
IF(%#stack%!=0);
IF(%#vazio%!=0);
SLOTCLICK(35);SLOTCLICK(%#vazio%);
ELSE;
ifmatches(%&resposta2%,Nao vou guardar);endif;
ifmatches(%&resposta2%,Nos Baus COM HOMES);
do;
if(%#baun%=1);}$$/home bau1$${endif;if(%#baun%=2);}$$/home bau2$${endif;
if(%#baun%=3);}$$/home bau3$${endif;if(%#baun%=4);}$$/home bau4$${endif;
if(%#baun%=5);}$$/home bau5$${endif;if(%#baun%=6);}$$/home bau6$${endif;
if(%#baun%=7);}$$/home bau7$${endif;if(%#baun%=8);}$$/home bau8$${endif;
if(%#baun%=9);}$$/home bau9$${endif;if(%#baun%=10);}$$/home bau10$${endif;
if(%#baun%=11);}$$/home bau11$${endif;if(%#baun%=12);}$$/home bau12$${endif;
wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
wait(100ms);
key(use);wait(4);
for(#i,54,80);
getslotitem(%#i%,#id,#stack);
if(%#stack%=64);inc(#pack,1);endif;
slotclick(%#i%,l,true);wait(70ms);
next;getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#baun,1);endif;
GUI;
until(%#stack%=0);
}$$/home meumob$${wait(%#tempo%);
wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
endif;
ifmatches(%&resposta2%,Nos baus DA TRAP);
}$$/home mobtrap$${wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
wait(500ms);
do;
if(%#baun%=1);look(150,00);endif;if(%#baun%=2);look(180,00);endif;if(%#baun%=3);look(210,00);endif;
if(%#baun%=4);look(150,30);endif;if(%#baun%=5);look(180,30);endif;if(%#baun%=6);look(210,30);endif;
if(%#baun%=7);look(240,00);endif;if(%#baun%=8);look(270,00);endif;if(%#baun%=9);look(300,00);endif;
if(%#baun%=10);look(240,30);endif;if(%#baun%=11);look(270,30);endif;if(%#baun%=12);look(300,30);endif;
if(%#baun%=13);look(330,00);endif;if(%#baun%=14);look(360,00);endif;if(%#baun%=15);look(30,00);endif;
if(%#baun%=16);look(330,30);endif;if(%#baun%=17);look(360,30);endif;if(%#baun%=18);look(30,30);endif;
if(%#baun%=19);look(60,00);endif;if(%#baun%=20);look(90,00);endif;if(%#baun%=21);look(120,00);endif;
if(%#baun%=22);look(60,30);endif;if(%#baun%=23);look(90,30);endif;if(%#baun%=24);look(120,30);endif;
wait(100ms);key(USE);wait(3);
for(#i,54,80);
getslotitem(%#i%,#id,#stack);
if(%#stack%=64);inc(#pack,1);endif;
slotclick(%#i%,l,true);wait(70ms);
next;getslotitem(53,#id,#stack);
wait(70ms);if(%#stack%!=0);inc(#baun,1);endif;
GUi;wait(500ms);
until(%#stack%=0);
}$$/home meumob$${wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
endif;
endif;
endif;
gui;
endif;
loop;
}$$
vip:
$${
if(escravo);
log("&a[MACRO] &6Desligado");
unset(escravo);
stop;
else;
set(escravo);
endif;
&arco="^261$";
&sword="^276$|^267$|^272$|^268$|^283$";
&axe="^279$|^258$|^275$|^271$|^286$";
&diamante="^276$|^279$";
&ferro="^267$|^258$";
&pedra="^272$|^275$";
&madeira="^268$|^271$";
&ouro="^283$|^286$";
slot(1);#slot1=%ITEM%;
ifmatches(%#slot1%,%&sword%|%&axe%|%&arco%);
ifmatches(%#slot1%,%&arco%);&resposta1="Arqueiro";#dur=20;endif;
ifmatches(%#slot1%,%&sword%|%&axe%);&resposta1="Espada";endif;
ifmatches(%#slot1%,%&diamante%);#dur=50;endif;
ifmatches(%#slot1%,%&ferro%|%&pedra%);#dur=20;endif;
ifmatches(%#slot1%,%&madeira%|%&ouro%);#dur=10;endif;
ifmatches(%DIRECTION%,S);&direction=SOUTH;endif;
ifmatches(%DIRECTION%,N);&direction=NORTH;endif;
ifmatches(%DIRECTION%,E);&direction=EAST;endif;
ifmatches(%DIRECTION%,W);&direction=WEST;endif;
#baun=1;#pack=0;#slot=1;
else;
log("&4[ERROR] &3Coloque sua arma no slot &61");
log("&a[MACRO] &6Desligado");unset(escravo);stop;
endif;
&per2="Onde você vai guardar?,Nos baus DA TRAP,Nos Baus COM HOMES,Nao vou guardar";
&per3="Você é VIP?,Sim,Nao";
PROMPT(&resposta3,"$$[Escolha[%&per3%]]");
PROMPT(&resposta2,"$$[Escolha[%&per2%]]");
ifmatches(%&resposta3%,Sim);#tempo=4;endif;
ifmatches(%&resposta3%,Nao);#tempo=7;endif;
log("&a[MACRO] &6Trabalhando");
do;
slot(%#slot%);
ifmatches(%HIT%,Entity);ifmatches(%GUI%,Inventory);gui;endif;look(%&direction%);look(,-20);
ifmatches(%&resposta1%,Arqueiro);
do(24);if(%DURABILITY%<%#dur%);do;look(%&direction%);look(,+90);wait(1ms);key(use);until(%DURABILITY%>%#dur%);endif;key(use);loop;
endif;
ifmatches(%&resposta1%,Espada);key(ATTACK);wait(150ms);
if(%DURABILITY%<%#dur%);do;look(%&direction%);look(,+90);wait(1ms);key(use);until(%DURABILITY%>%#dur%);endif;
endif;
else;
look(%&direction%);look(,-20);
ifmatches(%GUI%,None);gui(INVENTORY);endif;
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%!=0);
LOOK(+180,);
WAIT(1);
FOR(#i,9,44);
GETSLOTITEM(%#i%,#id,#stack);
IFMATCHES(%#id%,^371$|^266$|^276$|^264$|^367$);
ELSE;
SLOTCLICK(%#i%);
SLOTCLICK(-999);
WAIT(80ms);
ENDIF;
NEXT;
#ver=0
FOR(#i,33,35);
GETSLOTITEM(%#i%,#id,#stack);
IF(%#id%>0);#ver=1;BREAK;ENDIF;
NEXT;
IF(%#ver%=1);
GUI;
ifmatches(%&resposta2%,Nao vou guardar);endif;
ifmatches(%&resposta2%,Nos Baus COM HOMES);
do;
if(%#baun%=1);}$$/home bau1$${endif;if(%#baun%=2);}$$/home bau2$${endif;
if(%#baun%=3);}$$/home bau3$${endif;if(%#baun%=4);}$$/home bau4$${endif;
if(%#baun%=5);}$$/home bau5$${endif;if(%#baun%=6);}$$/home bau6$${endif;
if(%#baun%=7);}$$/home bau7$${endif;if(%#baun%=8);}$$/home bau8$${endif;
if(%#baun%=9);}$$/home bau9$${endif;if(%#baun%=10);}$$/home bau10$${endif;
if(%#baun%=11);}$$/home bau11$${endif;if(%#baun%=12);}$$/home bau12$${endif;
wait(%#tempo%);
keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);wait(500ms);
key(use);wait(3);
for(#i,54,80);
getslotitem(%#i%,#id,#stack);
if(%#stack%=64);inc(#pack,1);endif;
slotclick(%#i%,l,true);wait(70ms);
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#baun,1);endif;
GUI;
until(%#stack%=0);
}$$/home meumob$${wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
endif;
ifmatches(%&resposta2%,Nos baus DA TRAP);
}$$/home mobtrap$${wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);wait(100ms);
do;
if(%#baun%=1);look(150,00);endif;if(%#baun%=2);look(180,00);endif;if(%#baun%=3);look(210,00);endif;
if(%#baun%=4);look(150,30);endif;if(%#baun%=5);look(180,30);endif;if(%#baun%=6);look(210,30);endif;
if(%#baun%=7);look(240,00);endif;if(%#baun%=8);look(270,00);endif;if(%#baun%=9);look(300,00);endif;
if(%#baun%=10);look(240,30);endif;if(%#baun%=11);look(270,30);endif;if(%#baun%=12);look(300,30);endif;
if(%#baun%=13);look(330,00);endif;if(%#baun%=14);look(360,00);endif;if(%#baun%=15);look(30,00);endif;
if(%#baun%=16);look(330,30);endif;if(%#baun%=17);look(360,30);endif;if(%#baun%=18);look(30,30);endif;
if(%#baun%=19);look(60,00);endif;if(%#baun%=20);look(90,00);endif;if(%#baun%=21);look(120,00);endif;
if(%#baun%=22);look(60,30);endif;if(%#baun%=23);look(90,30);endif;if(%#baun%=24);look(120,30);endif;
wait(100ms);key(USE);wait(3);
for(#i,54,80);
getslotitem(%#i%,#id,#stack);
if(%#stack%=64);inc(#pack,1);endif;
slotclick(%#i%,l,true);wait(70ms);
next;
getslotitem(53,#id,#stack);wait(70ms);
if(%#stack%!=0);inc(#baun,1);endif;
GUI;wait(500ms);
until(%#stack%=0);
}$$/home meumob$${wait(%#tempo%);keydown(JUMP);wait(100ms);keydown(JUMP);wait(100ms);keyup(JUMP);
endif;
endif;
endif;
endif;
loop;
}$$
/pvp off
para os nao vips aconselho a trap de baus, que está no link original da macro logo acima /\ :3
ambos jogam as espadas para traz e guardam com homes ou na trap de 24 baus
Créditos ao lindo :3 Substituto que editou pra mim, e ao Phodalao que fez o macro
