ENTREGUE [MACRO]Upar espadas propano 1.8 2 homes apenas =p.

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.
abrisqui

abrisqui

Excelente
VIP
Entrou
Fev 24, 2013
Mensagens
365
Cubos
0
Olá abrisqui aqui estou aqui para postar um macro para upar espadas para o servidor propano 1.8 ele últiliza apenas 2 homes e guarda em 94 baus =p são 2 homes /sethome matarmobs na trep e /sethome baumobs
--------------------------------------------------------------------------------------------------------------------------------------------------A trap é normal aquela com meia laje e com ferro em baixo a macro bate para frente na diagonal só tem um detalhe a home na trap tem que ser salva olhando para o south(sul) segue as prints:

3MN8OFA.png



j3WlkCh.png



----------------------------------------------------------------------------------------------------------------------------------------------
Segue as prints da trep de baus :

LV4rVVI.png


ymr52WQ.png


------------------------------------------------------------------------------------------------------------------------------------------------
Segue a macro *.*

$${
if(sword1);
log("&4[Macro] &6Matar mobs &4off.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs &2on.");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

do;
pick(276);
if(%DURABILITY%<100);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);
}$$/pvp off$${
log("&4[Macro] &6 Espada reparada!");
endif;

do(200);
look(%&dir%);
look(,-30);
wait(200ms);
key(attack);
loop;
if(nf);
wait(1);
gui(inventory);
wait(1);
LOOK(+180,);
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=283);
SLOTCLICK(%#u%);
SLOTCLICK(-999);
ENDIF;
NEXT;
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
// IR PARA OS BAUS
}$$/home baumobs$${
wait(3);
do;
until((%XPOS%!=%#nposx1%)|(%ZPOS%!=%#nposx2%));wait(3);
keydown(jump);wait(100ms);keyup(jump);wait(1);
&dir=%DIRECTION%;
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

// OLHANDO PARA OS BAUS

do;
look(%&dir%);
if(%#bau%=1);look(-50,-24);endif;
if(%#bau%=2);look(-39,-28);endif;
if(%#bau%=3);look(-23,-32);endif;
if(%#bau%=4);look(+1,-34);endif;
if(%#bau%=5);look(+23,-32);endif;
if(%#bau%=6);look(+39,-28);endif;
if(%#bau%=7);look(+50,-24);endif;
if(%#bau%=8);look(+61,-23);endif;
if(%#bau%=9);look(+74,-24);endif;
if(%#bau%=10);look(+91,-26);endif;
if(%#bau%=11);look(+104,-25);endif;
if(%#bau%=12);look(+120,-23);endif;
if(%#bau%=13);look(+130,-24);endif;
if(%#bau%=14);look(+141,-28);endif;
if(%#bau%=15);look(+158,-32);endif;
if(%#bau%=16);look(-179,-34);endif;
if(%#bau%=17);look(-159,-32);endif;
if(%#bau%=18);look(-143,-27);endif;
if(%#bau%=19);look(-131,-24);endif;
if(%#bau%=20);look(-120,-23);endif;
if(%#bau%=21);look(-106,-24);endif;
if(%#bau%=22);look(-89,-26);endif;
if(%#bau%=23);look(-75,-25);endif;
if(%#bau%=24);look(-61,-23);endif;
if(%#bau%=25);look(-50,-10);endif;
if(%#bau%=26);look(-39,-12);endif;
if(%#bau%=27);look(-23,-14);endif;
if(%#bau%=28);look(+1,-16);endif;
if(%#bau%=29);look(+23,-14);endif;
if(%#bau%=30);look(+39,-12);endif;
if(%#bau%=31);look(+50,-10);endif;
if(%#bau%=32);look(+61,-10);endif;
if(%#bau%=33);look(+74,-11);endif;
if(%#bau%=34);look(+91,-11);endif;
if(%#bau%=35);look(+104,-11);endif;
if(%#bau%=36);look(+120,-10);endif;
if(%#bau%=37);look(+130,-10);endif;
if(%#bau%=38);look(+141,-12);endif;
if(%#bau%=39);look(+158,-14);endif;
if(%#bau%=40);look(-179,-16);endif;
if(%#bau%=41);look(-159,-14);endif;
if(%#bau%=42);look(-143,-12);endif;
if(%#bau%=43);look(-131,-10);endif;
if(%#bau%=44);look(-120,-10);endif;
if(%#bau%=45);look(-106,-11);endif;
if(%#bau%=46);look(-89,-11);endif;
if(%#bau%=47);look(-75,-11);endif;
if(%#bau%=48);look(-61,-10);endif;
if(%#bau%=49);look(-50,+4);endif;
if(%#bau%=50);look(-39,+4);endif;
if(%#bau%=51);look(-23,+4);endif;
if(%#bau%=52);look(+23,+4);endif;
if(%#bau%=53);look(+39,+4);endif;
if(%#bau%=54);look(+50,+4);endif;
if(%#bau%=55);look(+61,+4);endif;
if(%#bau%=56);look(+74,+4);endif;
if(%#bau%=57);look(+91,+4);endif;
if(%#bau%=58);look(+104,+4);endif;
if(%#bau%=59);look(+120,+4);endif;
if(%#bau%=60);look(+130,+4);endif;
if(%#bau%=61);look(+141,+4);endif;
if(%#bau%=62);look(+158,+4);endif;
if(%#bau%=63);look(-179,+4);endif;
if(%#bau%=64);look(-159,+4);endif;
if(%#bau%=65);look(-143,+4);endif;
if(%#bau%=66);look(-131,+4);endif;
if(%#bau%=67);look(-120,+4);endif;
if(%#bau%=68);look(-106,+4);endif;
if(%#bau%=69);look(-89,+4);endif;
if(%#bau%=70);look(-75,+4);endif;
if(%#bau%=71);look(-61,+4);endif;
if(%#bau%=72);look(-50,+16);endif;
if(%#bau%=73);look(-39,+20);endif;
if(%#bau%=74);look(-23,+22);endif;
if(%#bau%=75);look(+23,+22);endif;
if(%#bau%=76);look(+39,+20);endif;
if(%#bau%=77);look(+50,+16);endif;
if(%#bau%=78);look(+61,+16);endif;
if(%#bau%=79);look(+74,+18);endif;
if(%#bau%=80);look(+91,+18);endif;
if(%#bau%=81);look(+104,+18);endif;
if(%#bau%=82);look(+120,+16);endif;
if(%#bau%=83);look(+130,+16);endif;
if(%#bau%=84);look(+141,+20);endif;
if(%#bau%=85);look(+158,+22);endif;
if(%#bau%=86);look(-179,+24);endif;
if(%#bau%=87);look(-159,+22);endif;
if(%#bau%=88);look(-143,+20);endif;
if(%#bau%=89);look(-131,+16);endif;
if(%#bau%=90);look(-120,+17);endif;
if(%#bau%=91);look(-106,+18);endif;
if(%#bau%=92);look(-89,+19);endif;
if(%#bau%=93);look(-75,+18);endif;
if(%#bau%=94);look(-61,+17);endif;
// DEPOSITANDO AS COISAS NOS BAUS

wait(3);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=94);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas irá matarmobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);

// VOLTANDO PARA A HOME MATARMOBS

}$$/home matarmobs$${
endif;endif;


loop;
endif;
}$$

----------------------------------------------------------------------------------------------------------------------------------------------

Bom up =p.
 
Só queria perguntar se vc poderia fazer uma modificação na macro para quem tem internet lenta?
Por exemplo, na hora que o macro enche meu inv e vai para a home dos baus, minha net tem um deley de mais ou menos 10 segundos para abrir os baus...
queria que vc colocasse um delay de 10 segundos antes de guardar os itens. Obrigadão e bela macro, pena que minha net não ajuda :(
 
zRockStar disse:
Só queria perguntar se vc poderia fazer uma modificação na macro para quem tem internet lenta?
Por exemplo, na hora que o macro enche meu inv e vai para a home dos baus, minha net tem um deley de mais ou menos 10 segundos para abrir os baus...
queria que vc colocasse um delay de 10 segundos antes de guardar os itens. Obrigadão e bela macro, pena que minha net não ajuda :(
Clique para expandir...
Teste ele assim como deixei pra ver se vai =p

$${
if(sword1);
log("&4[Macro] &6Matar mobs &4off.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs &2on.");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

do;
pick(276);
if(%DURABILITY%<100);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);
}$$/pvp off$${
log("&4[Macro] &6 Espada reparada!");
endif;

do(200);
look(%&dir%);
look(,-30);
wait(200ms);
key(attack);
loop;
if(nf);
wait(1);
gui(inventory);
wait(1);
LOOK(+180,);
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=283);
SLOTCLICK(%#u%);
SLOTCLICK(-999);
ENDIF;
NEXT;
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
// IR PARA OS BAUS
}$$/home baumobs$${
wait(8);
do;
until((%XPOS%!=%#nposx1%)|(%ZPOS%!=%#nposx2%));wait(8);
keydown(jump);wait(100ms);keyup(jump);wait(8);
&dir=%DIRECTION%;
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

// OLHANDO PARA OS BAUS

do;
look(%&dir%);
if(%#bau%=1);look(-50,-24);endif;
if(%#bau%=2);look(-39,-28);endif;
if(%#bau%=3);look(-23,-32);endif;
if(%#bau%=4);look(+1,-34);endif;
if(%#bau%=5);look(+23,-32);endif;
if(%#bau%=6);look(+39,-28);endif;
if(%#bau%=7);look(+50,-24);endif;
if(%#bau%=8);look(+61,-23);endif;
if(%#bau%=9);look(+74,-24);endif;
if(%#bau%=10);look(+91,-26);endif;
if(%#bau%=11);look(+104,-25);endif;
if(%#bau%=12);look(+120,-23);endif;
if(%#bau%=13);look(+130,-24);endif;
if(%#bau%=14);look(+141,-28);endif;
if(%#bau%=15);look(+158,-32);endif;
if(%#bau%=16);look(-179,-34);endif;
if(%#bau%=17);look(-159,-32);endif;
if(%#bau%=18);look(-143,-27);endif;
if(%#bau%=19);look(-131,-24);endif;
if(%#bau%=20);look(-120,-23);endif;
if(%#bau%=21);look(-106,-24);endif;
if(%#bau%=22);look(-89,-26);endif;
if(%#bau%=23);look(-75,-25);endif;
if(%#bau%=24);look(-61,-23);endif;
if(%#bau%=25);look(-50,-10);endif;
if(%#bau%=26);look(-39,-12);endif;
if(%#bau%=27);look(-23,-14);endif;
if(%#bau%=28);look(+1,-16);endif;
if(%#bau%=29);look(+23,-14);endif;
if(%#bau%=30);look(+39,-12);endif;
if(%#bau%=31);look(+50,-10);endif;
if(%#bau%=32);look(+61,-10);endif;
if(%#bau%=33);look(+74,-11);endif;
if(%#bau%=34);look(+91,-11);endif;
if(%#bau%=35);look(+104,-11);endif;
if(%#bau%=36);look(+120,-10);endif;
if(%#bau%=37);look(+130,-10);endif;
if(%#bau%=38);look(+141,-12);endif;
if(%#bau%=39);look(+158,-14);endif;
if(%#bau%=40);look(-179,-16);endif;
if(%#bau%=41);look(-159,-14);endif;
if(%#bau%=42);look(-143,-12);endif;
if(%#bau%=43);look(-131,-10);endif;
if(%#bau%=44);look(-120,-10);endif;
if(%#bau%=45);look(-106,-11);endif;
if(%#bau%=46);look(-89,-11);endif;
if(%#bau%=47);look(-75,-11);endif;
if(%#bau%=48);look(-61,-10);endif;
if(%#bau%=49);look(-50,+4);endif;
if(%#bau%=50);look(-39,+4);endif;
if(%#bau%=51);look(-23,+4);endif;
if(%#bau%=52);look(+23,+4);endif;
if(%#bau%=53);look(+39,+4);endif;
if(%#bau%=54);look(+50,+4);endif;
if(%#bau%=55);look(+61,+4);endif;
if(%#bau%=56);look(+74,+4);endif;
if(%#bau%=57);look(+91,+4);endif;
if(%#bau%=58);look(+104,+4);endif;
if(%#bau%=59);look(+120,+4);endif;
if(%#bau%=60);look(+130,+4);endif;
if(%#bau%=61);look(+141,+4);endif;
if(%#bau%=62);look(+158,+4);endif;
if(%#bau%=63);look(-179,+4);endif;
if(%#bau%=64);look(-159,+4);endif;
if(%#bau%=65);look(-143,+4);endif;
if(%#bau%=66);look(-131,+4);endif;
if(%#bau%=67);look(-120,+4);endif;
if(%#bau%=68);look(-106,+4);endif;
if(%#bau%=69);look(-89,+4);endif;
if(%#bau%=70);look(-75,+4);endif;
if(%#bau%=71);look(-61,+4);endif;
if(%#bau%=72);look(-50,+16);endif;
if(%#bau%=73);look(-39,+20);endif;
if(%#bau%=74);look(-23,+22);endif;
if(%#bau%=75);look(+23,+22);endif;
if(%#bau%=76);look(+39,+20);endif;
if(%#bau%=77);look(+50,+16);endif;
if(%#bau%=78);look(+61,+16);endif;
if(%#bau%=79);look(+74,+18);endif;
if(%#bau%=80);look(+91,+18);endif;
if(%#bau%=81);look(+104,+18);endif;
if(%#bau%=82);look(+120,+16);endif;
if(%#bau%=83);look(+130,+16);endif;
if(%#bau%=84);look(+141,+20);endif;
if(%#bau%=85);look(+158,+22);endif;
if(%#bau%=86);look(-179,+24);endif;
if(%#bau%=87);look(-159,+22);endif;
if(%#bau%=88);look(-143,+20);endif;
if(%#bau%=89);look(-131,+16);endif;
if(%#bau%=90);look(-120,+17);endif;
if(%#bau%=91);look(-106,+18);endif;
if(%#bau%=92);look(-89,+19);endif;
if(%#bau%=93);look(-75,+18);endif;
if(%#bau%=94);look(-61,+17);endif;
// DEPOSITANDO AS COISAS NOS BAUS

wait(3);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=94);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas irá matarmobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);

// VOLTANDO PARA A HOME MATARMOBS

}$$/home matarmobs$${
endif;endif;


loop;
endif;
}$$
 
Vou testar aqui...
E desculpe abusar da sua boa vontade kkk, mas como eu sou pobre no servidor eu upo espadas com espada de pedra e só um pack de pedra vai acabar mt rápido... teria como deixar a horbar inteira de pedra sem que o macro guarde no bau?

@Edit: Sua modificação deu certinho :) vlw msm
 
irei usar !
Clique para expandir...
Valeu =p.


Vou testar aqui...
E desculpe abusar da sua boa vontade kkk, mas como eu sou pobre no servidor eu upo espadas com espada de pedra e só um pack de pedra vai acabar mt rápido... teria como deixar a horbar inteira de pedra sem que o macro guarde no bau?

@Edit: Sua modificação deu certinho :) vlw msm
Clique para expandir...
=p.
 
Boa macro, não sou VIP até usaria ela, mas nem to ligando pros lucros agora rsrs... Quer uma dica para próxima versão? Que tal quando pegar 39 de XP, ele encanta 3 partes de armadura..​
 
MatheusSLO disse:
ótima macro irá ajudar muito , vou usar ela
Clique para expandir...
Valeu . :thumbsup:
iVitinXDD disse:
Boa macro, não sou VIP até usaria ela, mas nem to ligando pros lucros agora rsrs... Quer uma dica para próxima versão? Que tal quando pegar 39 de XP, ele encanta 3 partes de armadura..​
Clique para expandir...
Até que é uma idéia boa \o.
BigMikeGRR disse:
Boa!
Clique para expandir...

The Dude disse:
Muito Dahora Man,Boa !
Clique para expandir...
Obrigado.=p

iMrGuuH disse:
Olha eu la na print xD
Clique para expandir...
*,*
PauloPlay disse:
Bom macro .
Clique para expandir...
Valeu (8'.
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Total: 1 (membros: 0, visitantes: 1)

Estatísticas online

Membros online
1
Visitantes online
1
Total de visitantes
2
Os totais podem incluir visitantes ocultos.

Em alta

Novos membros

Stay Connected

Voltar
Topo