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: ---------------------------------------------------------------------------------------------------------------------------------------------- Segue as prints da trep de baus : ------------------------------------------------------------------------------------------------------------------------------------------------ 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
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
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..