AJUDA MACRO

Discussão em 'Botecolandia' iniciado por xxXGuili21Xxx, 22 Agosto 2017.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. xxXGuili21Xxx

    xxXGuili21Xxx Razoavel
    VIP

    Afiliado:
    2 Abril 2015
    Mensagens:
    405
    Curtidas Recebidas:
    64
    Curtiu:
    136
    Sexo:
    Masculino
    Cubos:
    459.00
    Nick:
    xxXGuili21Xxx
    Preciso de ajuda com o auto-reconect de uma macro.
    Quando eu uso meu macro do autologin + ativar macro:
    $${
    ifmatches(%CHATCLEAN%,"Bem vindo de volta. Por favor digite /login sua-senha.");
    wait(800ms);
    }$$
    /login não-é-essa
    $${
    stop(all);
    endif;
    ifmatches(%CHATCLEAN%, "Agora você está logado");
    wait(1);
    echo(/pvp off);
    echo(/convites off);
    wait(1);
    endif;
    ifmatches(%CHATCLEAN%,"Você desativou todos os convites.");
    wait(700ms);
    exec(pesca.txt);
    endif;
    $${
    ifmatches(%CHATCLEAN%,"Limpando itens/mobs do chao em 5s");
    stop(all);

    wait(6);
    exec(pesca.txt);
    endif;
    }$$
    Ela apenas religa a macro, porém a macro tem algumas perguntas. Como:
    Voce é vip ou não vip.
    São duas perguntas e as respostas são:
    S
    22
    Como eu faço para que assim que eu me reconecte e quando a macro se religa após o chão limpar essas duas perguntam sejam respondidas, mesmo sem eu estar no pc?

    A macro que eu uso é a seguinte:
    $${
    if(rogroote);
    log("&4[Macro] &6Pesca desativada.");
    log("&4[Macro] &2Obrigado por usar meu macro ASS: &bROGROOTE - REGION 2.0.");
    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,$$?, Qual tempo em segundos de espera para fisgar?( recomendo de dia 22 e a noite 15 segundos );





    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(,352);
    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 baupesca$${
    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 pesca$${
    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(,352);
    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(-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;
    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%=94);
    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 pesca);
    wait(8);
    loop;loop;loop;

    endif;
    loop;




    loop;

    endif;
    }$$

    Talvez, seja possivel alterar a macro que eu uso para que essas perguntas já tenham a minha resposta "fixada", porém não entendo de programação e preciso de ajuda xD.
     
  2. Hoaming

    Hoaming Bom
    VIP

    Afiliado:
    8 Março 2014
    Mensagens:
    1,844
    Curtidas Recebidas:
    119
    Curtiu:
    117
    Sexo:
    Masculino
    Cubos:
    482.00
    Nick:
    hoaming
    Eu acho que era pra salvar automaticamente..
     
  3. xxXGuili21Xxx

    xxXGuili21Xxx Razoavel
    VIP

    Afiliado:
    2 Abril 2015
    Mensagens:
    405
    Curtidas Recebidas:
    64
    Curtiu:
    136
    Sexo:
    Masculino
    Cubos:
    459.00
    Nick:
    xxXGuili21Xxx
    No eclipse tem pouquissimas macros para pesca, o melhor seria salvar autoticamente, porém ela não salva.
     
  4. Femendes

    Femendes Excelente
    VIP

    Afiliado:
    14 Fevereiro 2017
    Mensagens:
    3,554
    Curtidas Recebidas:
    349
    Curtiu:
    362
    Sexo:
    Masculino
    Localização:
    Na Noia
    Cubos:
    574.00
    Nick:
    femendes
    tenta pegar outra macro ou onchat algumas macro do homeless da isso caso nao use a onchat dele q religa na tecla e nao a macro em si
     
  5. Flakes_

    Flakes_ Hardcore
    Construção VIP

    Afiliado:
    15 Julho 2017
    Mensagens:
    18,348
    Curtidas Recebidas:
    3,208
    Curtiu:
    738
    Sexo:
    Masculino
    Ocupação:
    Designer
    Localização:
    Minas Gerais
    Cubos:
    424.00
    Nick:
    Flakes_
    Discord:
    yFlakes#9445
    Skype:
    yFlakes
    Creio que se vv apagar as configurações q vc não usa ai e deixar somente as necessárias liva direto

    Sent from my SM-G531H using Tapatalk
     
  6. Messyeater

    Messyeater Craftlandiano

    Afiliado:
    13 Janeiro 2014
    Mensagens:
    6,632
    Curtidas Recebidas:
    1,781
    Curtiu:
    428
    Sexo:
    Masculino
    Localização:
    Steam
    Cubos:
    1,025.00
    Nick:
    Ryjo
    Clan:
    T0wElHeAdSl4yeRs
    Prezado, apenas substitua seu macro de pesca por este:

    $${
    if(rogroote);
    log("&4[Macro] &6Pesca desativada.");
    log("&4[Macro] &2Obrigado por usar meu macro ASS: &bROGROOTE - REGION 2.0.");
    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;

    &vip=S



    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]);

    &tempo=22;





    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(,352);
    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 baupesca$${
    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 pesca$${
    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(,352);
    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(-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;
    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%=94);
    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 pesca);
    wait(8);
    loop;loop;loop;

    endif;
    loop;




    loop;

    endif;
    }$$


    Poste resultados.
     
  7. Silton

    Silton Craftlandiano
    VIP

    Afiliado:
    25 Novembro 2013
    Mensagens:
    5,981
    Curtidas Recebidas:
    1,006
    Curtiu:
    2,145
    Sexo:
    Masculino
    Cubos:
    1,764.00
    Nick:
    | xSilton |
    pega outra macro
     
  8. lllllillllilllill

    lllllillllilllill Craftlandiano
    VIP

    Afiliado:
    19 Dezembro 2015
    Mensagens:
    16,242
    Curtidas Recebidas:
    1,043
    Curtiu:
    637
    Ocupação:
    sla
    Localização:
    sla
    Cubos:
    2,331.00
    Nick:
    sla
    Clan:
    sla
    Mande um MP para o SLEEPP
     
Status do Tópico:
Não esta aberto para novas mensagens.