ENTREGUE Pesca Vip e não vip propano

LukaaaaH · Nov 17, 2015

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

israel000 · Nov 17, 2015

macro inovador pra mim , parabens vo usa

LukaaaaH · Nov 17, 2015

israel000 disse:
macro inovador pra mim , parabens vo usa

OBG.

wMichelSZ · Nov 17, 2015

Ai sim mano gg, tu tem um que troca de vara? seria ótimo para pescar na warp vip do propano

itzcheeeck · Nov 17, 2015

Post mei desorganizado , mais parece ser bom vou testa !

DET0NA · Nov 17, 2015

gostei do macro mais eu gosto do que eu uso normal.

NickTtesla · Nov 17, 2015

Bom Macro

NickTtesla · Nov 17, 2015

Bom Macro

Otherside · Nov 17, 2015

Boa Macro

LukaaaaH · Nov 17, 2015

yMichelH1T4T1 disse:
Ai sim mano gg, tu tem um que troca de vara? seria ótimo para pescar na warp vip do propano

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

itzcheeeck disse:
Post mei desorganizado , mais parece ser bom vou testa !

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

Gabriel197 disse:
gostei do macro mais eu gosto do que eu uso normal.

Vc nao é obrigado a usar esse man.

NickTtesla disse:
Bom Macro

obg.

NickTtesla disse:
Bom Macro

Otherside disse:
Boa Macro

Vlw pessoal.

Inkubi · Nov 17, 2015

Macro inovador

zSamucaGotter · Nov 17, 2015

Vou usar, like like..

DET0NA · Nov 17, 2015

LukaaaaH disse:
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.

eu sei cara eu sempre vou usar o da pesca organizada

LukaaaaH · Nov 17, 2015

Gabriel197 disse:
eu sei cara eu sempre vou usar o da pesca organizada

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

DET0NA · Nov 17, 2015

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

hmmm mais nao e so agente copiar o codigo do macro e fazer outros bagulhos?.

LukaaaaH · Nov 18, 2015

Gabriel197 disse:
hmmm mais nao e so agente copiar o codigo do macro e fazer outros bagulhos?.

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.

Erasus · Nov 18, 2015

Que macro gigante

Enviado do meu iPhone usando Tapatalk

zSh4rKz · Nov 18, 2015

Até pegaria mas já tenho o meu macro :/

♕ByStarS♕ · Dez 22, 2015

Bom macro.

ENTREGUE Pesca Vip e não vip propano

Bem-vindo!

Neutro

Craftlandiano

Neutro

Hardcore

Craftlandiano

Hardcore

Excelente

Excelente

Excelente

Neutro

Craftlandiano

Razoavel

Hardcore

Neutro

Hardcore

Neutro

Excelente

Craftlandiano

Excelente

Users who are viewing this thread