ENTREGUE Pesca Vip e não vip propano

Pessoal essa macro não é minha e do ROGROOTE - do region 2.0 eu apenas a alterei para ela pescar para frente e não para cima.Não lembro onde eu peguei a macro mais si eu achar o tópico eu mando aqui.

$${
if(rogroote);
log("&4[Macro] &6Pesca desativada.");
log("&4[Macro] &2Macro ASS: &bROGROOTE - REGION 2.0 Editado by abrisqui classic.");
unset(rogroote);
stop();
else;
log("&4[Macro] &6Pesca ativado.");
set(rogroote);
set(nf);
&dir = %DIRECTION%;
#bau=1;
#rod=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;

prompt(&vip,$$?,Você é vip? (pesque somente com varas encantadas.)' (im ou [N]ao ?);
do;
ifmatches(%&vip%,^[a|b|c|d|e|f|g|h|i|j|k|l|m|o|p|q|r|t|u|v|x|y|w|z|A|B|C|D|E|F|G|H|I|J|K|L|M|O|P|Q|R|T|U|V|X|Y|W|Z|1|2|3|4|5|6|7|8|9|0]);
log("&2Preste &6ATENÇÃO &2no que digita, digite &6S &2ou &6N&2 ");
log("&4[Macro] &6Pesca desativada.");
unset(rogroote);
stop();

elseif;

ifmatches(%&vip%,^[S|s|SIM|sim|N|n|NAO|nao]);

PROMPT(&tempo,$$?, (Se você não usa auto fish digite 18 se você usa auto fish digite 60 );

do;
ifmatches(%&vip%,^[S|s|SIM|sim]);

log("&f Para se ter resultado na pesca devese usar varas com encantamento &a Sorte do mar &63 &a e Sedução &63&a.")

do;
&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;

// PESCAR

look(%&dir%);
look(,3);
slot(8);
keydown(sneak);
wait(200ms);
key(use);
Wait(%&tempo%);
key(use);
Wait(200ms);
keyup(sneak);
slot(8);


// REPARAR
if(%DURABILITY%<20);
look(,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(200ms);
key(use);
wait(200ms);
key(use);
log("&4[Macro] &6 Vara reparada!");
endif;

// OLHAR INVENTÁRIO

if(nf);
wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;

// IR PARA OS BAUS

}$$/home guardar$${
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á pescar agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);

// VOLTANDO PARA A HOME PESCA

}$$/home mar$${
wait(3)
endif;endif;

loop;loop;loop;
endif;

ifmatches(%&vip%,^[N|n|NAO|nao]);

log("&f Para se ter resultado na pesca devese usar varas com encantamento &a sorte do mar &63 &a e Sedução &63&a.");

do;
&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;



// PESCANDO E TROCANDO DE VARA

slot(%#rod%);
look(%&dir%);
look(,-90);
keydown(sneak);
if(DURABILITY<10);
inc(#rod);
endif;
if(%#rod%=10);
log("&2Todas as varas estão no &4red &2repareas ou as troque.");
log("&4[Macro] &6Pesca desativada.");
unset(rogroote);
stop();
endif;
wait(200ms);
key(use);
wait(%&tempo%);
key(use);
wait(200ms);
keyup(sneak);
endif;

// OLHAR INVENTÁRIO

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();

else;


// IR PARA OS BAUS

echo(/home baupesca)
wait(7);
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;
do;


// OLHANDO PARA OS BAUS

look(%&dir%);
if(%#bau%=1);look(-26,-40);endif;
if(%#bau%=2);look(+26,-40);endif;
if(%#bau%=3);look(+65,-40);endif;
if(%#bau%=4);look(+116,-40);endif;
if(%#bau%=5);look(+155,-40);endif;
if(%#bau%=6);look(+206,-40);endif;
if(%#bau%=7);look(-26,-20);endif;
if(%#bau%=8);look(+26,-20);endif;
if(%#bau%=9);look(+65,-20);endif;
if(%#bau%=10);look(+116,-20);endif;
if(%#bau%=11);look(+155,-20);endif;
if(%#bau%=12);look(+206,-20);endif;
if(%#bau%=13);look(-26,-0);endif;
if(%#bau%=14);look(+26,-0);endif;
if(%#bau%=15);look(+65,-0);endif;
if(%#bau%=16);look(+116,-0);endif;
if(%#bau%=17);look(+155,-0);endif;
if(%#bau%=18);look(+206,-0);endif;
if(%#bau%=19);look(-26,+25);endif;
if(%#bau%=20);look(+26,+25);endif;
if(%#bau%=21);look(+65,+25);endif;
if(%#bau%=22);look(+116,+25);endif;
if(%#bau%=23);look(+155,+25);endif;
if(%#bau%=24);look(+206,+25);endif;
wait(1);



// DEPOSITANDO AS COISAS NOS BAUS


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


// VOLTANDO PARA O HOME PESCA

echo(/home mar);
wait(8);
loop;loop;loop;

endif;
loop;




loop;

endif;
}$$

Bom vamos lá.

A macro irá olhar para frente e joga o anzol na água e esperar não tenho certeza si ela funciona sem o mod auto fish mais si nao funcional é só vcs baixarem.

As Homes usadas são apenas 2 a /sethome mar e a /sethome guardar. Boa pesca

http://imgur.com/a/9rrqV





Dar /sethome mar olhando para o bloco de ferro (lembrando que tem que ter 100 de rep e que só vip repara sem perder enchant).



Trap Baus

A trap é bem simples

Espero ter ajudado deixe seu like sou novo nesse negocio de macros mais qualquer erro me contate por mp.​

​

Créditos a ROGROOTE - REGION 2.0 me parece que a macro também não é dele mais créditos a ele e a o verdadeiro dono que eu não sei quem é.​

 

OBG.

 

nao tenho mais vou ver si fasso uma ai posto aqui.

desculpe o post meio desorganizado mais o que vale é a macro o resto e resto.

Vc nao é obrigado a usar esse man.

obg.

Vlw pessoal.

 

mais é ai que tá o propano ainda nao tem o pesca organizada que funciona.

 

Não meu amigo.a não ser que a macro seja da 1.7.4 mais si for mesmo assim não fusiona no propano por que la não pesca como nos outros servidores que olha para cima e fica tacando o anzol na água no propano vc deve tacar o anzol e esperar.