1. IP: legacy.craftlandia.com.br

    (1.5 até 1.12.x)


Macro pegatesouros

Discussão em 'Tutoriais de Macro' iniciado por Divine, 9 Setembro 2019.

  1. Divine

    Divine Neutro

    Afiliado:
    10 Fevereiro 2015
    Mensagens:
    14
    Curtidas Recebidas:
    12
    Curtiu:
    11
    Cubos:
    26.00
    Nick:
    jujunior
    #1 Divine, 9 Setembro 2019
    Última edição: 11 Setembro 2019
    Macro pegatesouros

    Desenvolvi uma macro para buscar tesouros que é mais rápida e ágil que as outras que existem.

    Por que ?

    Conta com um sistema que separa o campo de visão em 32 "fatias" de 11.25 graus cada, dessa maneira aumenta muito a precisão e possibilita que você vá praticamente na direção exata do tesouro.

    Explicação:

    A macro utiliza trigonometria para executar esses cálculos mais precisos e, assim, traçar uma rota que chega ao destino mais rapidamente e recalcula a cada instante a direção em que está o tesouro.

    Funcionalidades:

    -É possível digitar a coordenada olhando o conteúdo do livro (Exatamente igual a macro do SLEEP);
    -Se você não estiver sob efeito de velocidade 1 ou 2, tomará a primeira pot de velo que encontrar na hotbar;
    -Se você estiver com menos de 4 carnes inteiras de comida, procura por carne assada, porco assado, peixe assado ou frango assado na hotbar e come até alcançar o limite;
    -Corre e pula sem bugar (agradeço pelo feedback se houver bug enquanto corre e pula);

    Changelog:

    09/09/2019: Versão 1 publicada.
    11/09/2019: Retirada função que falava no global ao iniciar a macro ou ao encontrar o tesouro.

    Código:

    $${
    if(nav);
    keyup(forward);keyup(jump);log("");log("&6->&7Macro Desativado");log("");
    unset(nav);
    stop();
    else;
    log("");log("&6->&7Macro Ativado");log("");
    set(nav);
    endif;
    //cte's
    #tg0=0;
    #tg1=19891;
    #tg2=41421;
    #tg3=66818;
    #tg4=100000;
    #tg5=149660;
    #tg6=241421;
    #tg7=502733;
    #tg8=1000000;
    set(&xpos,"");set(&zpos,"");
    unset(xpos);unset(zpos);unset(key0);unset(key1);unset(key2);unset(key3);unset(key4);unset(key5);unset(key6);unset(key7);unset(key8);unset(key9);unset(keyback);unset(keyreturn);unset(keysubtract);
    log("");log("&6Navegação Ativada");log("&7Digite X e Z");log("");achievementget("Digite X:",345);
    do;
    set(#xpos,%&xpos%);
    if(((KEY_0)||(KEY_NUMPAD0))&&(!key0));
    set(&xpos,"%&xpos%0");
    achievementget("X: %&xpos%",345);
    set(key0);
    elseif((!KEY_0)&&(!KEY_NUMPAD0));
    unset(key0);
    endif;
    if(((KEY_1)||(KEY_NUMPAD1))&&(!key1));
    set(&xpos,"%&xpos%1");
    achievementget("X: %&xpos%",345);
    set(key1);
    elseif((!KEY_1)&&(!KEY_NUMPAD1));
    unset(key1);
    endif;
    if(((KEY_2)||(KEY_NUMPAD2))&&(!key2));
    set(&xpos,"%&xpos%2");
    achievementget("X: %&xpos%",345);
    set(key2);
    elseif((!KEY_2)&&(!KEY_NUMPAD2));
    unset(key2);
    endif;
    if(((KEY_3)||(KEY_NUMPAD3))&&(!key3));
    set(&xpos,"%&xpos%3");
    achievementget("X: %&xpos%",345);
    set(key3);
    elseif((!KEY_3)&&(!KEY_NUMPAD3));
    unset(key3);
    endif;
    if(((KEY_4)||(KEY_NUMPAD4))&&(!key4));
    set(&xpos,"%&xpos%4");
    achievementget("X: %&xpos%",345);
    set(key4);
    elseif((!KEY_4)&&(!KEY_NUMPAD4));
    unset(key4);
    endif;
    if(((KEY_5)||(KEY_NUMPAD5))&&(!key5));
    set(&xpos,"%&xpos%5");
    achievementget("X: %&xpos%",345);
    set(key5);
    elseif((!KEY_5)&&(!KEY_NUMPAD5));
    unset(key5);
    endif;
    if(((KEY_6)||(KEY_NUMPAD6))&&(!key6));
    set(&xpos,"%&xpos%6");
    achievementget("X: %&xpos%",345);
    set(key6);
    elseif((!KEY_6)&&(!KEY_NUMPAD6));
    unset(key6);
    endif;
    if(((KEY_7)||(KEY_NUMPAD7))&&(!key7));
    set(&xpos,"%&xpos%7");
    achievementget("X: %&xpos%",345);
    set(key7);
    elseif((!KEY_7)&&(!KEY_NUMPAD7));
    unset(key7);
    endif;
    if(((KEY_8)||(KEY_NUMPAD8))&&(!key8));
    set(&xpos,"%&xpos%8");
    achievementget("X: %&xpos%",345);
    set(key8);
    elseif((!KEY_8)&&(!KEY_NUMPAD8));
    unset(key8);
    endif;
    if(((KEY_9)||(KEY_NUMPAD9))&&(!key9));
    set(&xpos,"%&xpos%9");
    achievementget("X: %&xpos%",345);
    set(key9);
    elseif((!KEY_9)&&(!KEY_NUMPAD9));
    unset(key9);
    endif;
    if(((KEY_SUBTRACT)||(KEY_MINUS))&&(!keysubtract));
    set(&xpos,"%&xpos%-");
    achievementget("X: %&xpos%",345);
    set(keysubtract);
    elseif((!KEY_SUBTRACT)&&(!KEY_MINUS));
    unset(keysubtract);
    endif;
    if((KEY_BACK)&&(!keyback));
    set(&xpos,"");
    achievementget("X: ",345);
    set(keyback);
    elseif(!KEY_BACK);
    unset(keyback);
    endif;
    if((KEY_RETURN)&&(!keyreturn));
    set(xpos);
    set(keyreturn);
    elseif(!KEY_RETURN);
    unset(keyreturn);
    endif;
    if((%#xpos%>=5000)||(%&xpos%="--")||(%#xpos%<=-5000));
    set(&xpos,"");
    achievementget("X: ",345);
    endif;
    until(xpos);
    if((xpos)&&(%#xpos%=null)||(%#xpos%>=5000)||(%&xpos%="--")||(%#_xpos%<=-5000));
    log("");
    log("&6Algo está errado !");
    log("&6Desligando macro..");
    log("");
    unset(nav);
    stop;
    else;
    log("");
    log("&7Coordenada &cX &7definida!");
    log("&6X --> %&xpos%");
    log("");
    endif;
    achievementget("Digite Z:",345);
    do;
    set(#zpos,%&zpos%);
    if(((KEY_0)||(KEY_NUMPAD0))&&(!key0));
    set(&zpos,"%&zpos%0");
    achievementget("Z: %&zpos%",345);
    set(key0);
    elseif((!KEY_0)&&(!KEY_NUMPAD0));
    unset(key0);
    endif;
    if(((KEY_1)||(KEY_NUMPAD1))&&(!key1));
    set(&zpos,"%&zpos%1");
    achievementget("Z: %&zpos%",345);
    set(key1);
    elseif((!KEY_1)&&(!KEY_NUMPAD1));
    unset(key1);
    endif;
    if(((KEY_2)||(KEY_NUMPAD2))&&(!key2));
    set(&zpos,"%&zpos%2");
    achievementget("Z: %&zpos%",345);
    set(key2);
    elseif((!KEY_2)&&(!KEY_NUMPAD2));
    unset(key2);
    endif;
    if(((KEY_3)||(KEY_NUMPAD3))&&(!key3));
    set(&zpos,"%&zpos%3");
    achievementget("Z: %&zpos%",345);
    set(key3);
    elseif((!KEY_3)&&(!KEY_NUMPAD3));
    unset(key3);
    endif;
    if(((KEY_4)||(KEY_NUMPAD4))&&(!key4));
    set(&zpos,"%&zpos%4");
    achievementget("Z: %&zpos%",345);
    set(key4);
    elseif((!KEY_4)&&(!KEY_NUMPAD4));
    unset(key4);
    endif;
    if(((KEY_5)||(KEY_NUMPAD5))&&(!key5));
    set(&zpos,"%&zpos%5");
    achievementget("Z: %&zpos%",345);
    set(key5);
    elseif((!KEY_5)&&(!KEY_NUMPAD5));
    unset(key5);
    endif;
    if(((KEY_6)||(KEY_NUMPAD6))&&(!key6));
    set(&zpos,"%&zpos%6");
    achievementget("Z: %&zpos%",345);
    set(key6);
    elseif((!KEY_6)&&(!KEY_NUMPAD6));
    unset(key6);
    endif;
    if(((KEY_7)||(KEY_NUMPAD7))&&(!key7));
    set(&zpos,"%&zpos%7");
    achievementget("Z: %&zpos%",345);
    set(key7);
    elseif((!KEY_7)&&(!KEY_NUMPAD7));
    unset(key7);
    endif;
    if(((KEY_8)||(KEY_NUMPAD8))&&(!key8));
    set(&zpos,"%&zpos%8");
    achievementget("Z: %&zpos%",345);
    set(key8);
    elseif((!KEY_8)&&(!KEY_NUMPAD8));
    unset(key8);
    endif;
    if(((KEY_9)||(KEY_NUMPAD9))&&(!key9));
    set(&zpos,"%&zpos%9");
    achievementget("Z: %&zpos%",345);
    set(key9);
    elseif((!KEY_9)&&(!KEY_NUMPAD9));
    unset(key9);
    endif;
    if(((KEY_SUBTRACT)||(KEY_MINUS))&&(!keysubtract));
    set(&zpos,"%&zpos%-");
    achievementget("Z: %&zpos%",345);
    set(keysubtract);
    elseif((!KEY_SUBTRACT)&&(!KEY_MINUS));
    unset(keysubtract);
    endif;
    if((KEY_BACK)&&(!keyback));
    set(&zpos,"");
    achievementget("Z: ",345);
    set(keyback);
    elseif(!KEY_BACK);
    unset(keyback);
    endif;
    if((KEY_RETURN)&&(!keyreturn));
    set(zpos);
    set(keyreturn);
    elseif(!KEY_RETURN);
    unset(keyreturn);
    endif;
    if((%#zpos%>=5000)||(%&zpos%="--")||(%#zpos%<=-5000));
    set(&zpos,"");
    achievementget("Z: ",345);
    endif;
    until(zpos);
    if((zpos)&&(%#zpos%=null)||(%#zpos%>=5000)||(%&zpos%="--")||(%#_zpos%<=-5000));
    log("");
    log("&6Algo está errado !");
    log("&6Desligando macro..");
    log("");
    unset(nav);
    stop;
    else;
    log("");
    log("&7Coordenada &cZ &7definida!");
    log("&6Z --> %&zpos%");
    log("");
    endif;
    do();
    if(%#xpos%>0);look(90,0);keydown(forward);endif;
    if(%#xpos%<0);look(270,0);keydown(forward);endif;
    if((%XPOS%>20)||(%XPOS%<-20));keyup(forward);break;endif;
    loop;
    #it=0;set(aindalonge);unset(perto);
    do();
    inc(#it,1);
    #dxpos=%#xpos%-%XPOS%;#dzpos=%#zpos%-%ZPOS%;
    wait(100ms);
    #temp=(%#dxpos%*100000)/(%#dzpos%);
    if(%#temp%<0);
    #temp=%#temp%*(-1);
    unset(inverter);
    else;
    set(inverter);
    endif;
    if(aindalonge);
    if((%#temp%>=%#tg0%)&&(%#temp%<%#tg1%));#ang=0;endif;
    if((%#temp%>=%#tg1%)&&(%#temp%<%#tg2%));#ang=11;endif;
    if((%#temp%>=%#tg2%)&&(%#temp%<%#tg3%));#ang=23;endif;
    if((%#temp%>=%#tg3%)&&(%#temp%<%#tg4%));#ang=34;endif;
    if((%#temp%>=%#tg4%)&&(%#temp%<%#tg5%));#ang=45;endif;
    if((%#temp%>=%#tg5%)&&(%#temp%<%#tg6%));#ang=56;endif;
    if((%#temp%>=%#tg6%)&&(%#temp%<%#tg7%));#ang=67;endif;
    if(%#temp%>=%#tg7%);#ang=79;endif;
    if(inverter);#ang=%#ang%*(-1);unset(inverter);endif;
    if(%#dzpos%>0);inc(#ang,180);endif;
    if(%#ang%<0);inc(#ang,360);endif;
    if((%#dzpos%=0)&&(%#dxpos%>0));#ang=90;endif;
    if((%#dzpos%=0)&&(%#dxpos%<0));#ang=270;endif;
    look(%#ang%,0);
    keydown(forward);
    wait(10ms);
    sprint();
    wait(10ms);
    keydown(jump);
    wait(10ms);
    keyup(jump);
    #temp=(%#dxpos%*%#dxpos%)+(%#dzpos%*%#dzpos%);
    if(%#temp%<32);
    log("");log("&7Chegando próximo !!");log("");
    keyup(jump);keyup(forward);wait(50ms);
    unset(aindalonge);set(perto);
    endif;
    endif;
    unset(xok);unset(zok);
    if(%#dxpos%=0);set(xok);endif;
    if((perto)&&!(xok)&&!(%#dxpos%=0));
    keydown(sneak);
    if(%#dxpos%<0);
    look(270,0);
    wait(10ms);
    keydown(forward);
    endif;
    if(%#dxpos%>0);
    look(90,0);
    wait(10ms);
    keydown(forward);
    endif;
    wait(500ms);
    keyup(forward);
    endif;
    if(%#dzpos%=0);set(zok);endif;
    if((perto)&&(xok)&&!(zok)&&!(%#dzpos%=0));
    keydown(sneak);
    if(%#dzpos%<0);
    look(0,0);
    wait(10ms);
    keydown(forward);
    endif;
    if(%#dzpos%>0);
    look(180,0);
    wait(10ms);
    keydown(forward);
    endif;
    wait(500ms);
    keyup(forward);
    endif;
    if((xok)&&(zok));
    keyup(forward);keyup(sneak);
    log("");log("&7Você chegou ao destino !!");log("&7Desligando navegação");log("");
    unset(nav);
    stop;
    endif;
    if(%#it%>10);
    #it=0;unset(velo);
    foreach(effects);
    if(%EFFECTID%=1);
    #temp=%EFFECTTIME%;
    if(%#temp%>5);
    set(velo);
    else;
    unset(velo);
    endif;
    endif;
    next;
    if(%HUNGER%<8);set(comer);else;unset(comer);endif;
    if((comer)||!(velo));
    getslot(320,#slotcomida);
    if(%#slotcomida%=-1);getslot(350,#slotcomida);endif;
    if(%#slotcomida%=-1);getslot(364,#slotcomida);endif;
    if(%#slotcomida%=-1);getslot(366,#slotcomida);endif;
    getslot(373,#slotpot);
    if(!(velo)&&!(%#slotpot%=-1));
    for(#slot,1,9);
    slot(%#slot%);
    ifmatches(%ITEMNAME%,((Potion of Swiftness)|(Poção da Agilidade)));
    do(40);key(use);loop;
    set(velo);
    break;
    endif;
    next;
    endif;
    if((comer)&&!(%#slotcomida%=-1));
    for(#slot,1,9);
    slot(%#slot%);
    ifmatches(%ITEM%,"^320$|^350$|^364$|^366$");
    do();
    key(use);
    while((%HUNGER%<20)&&!(%ITEM%=0));
    unset(comer);
    break;
    endif;
    next;
    endif;
    slot(1);
    endif;
    endif;
    loop;
    }$$

    Alguns prints:

    [​IMG]

    [​IMG]

    Agradecimentos:
    - Sleep : usei parte do código dele que captura as coordenadas ao iniciar a macro.
     
    Maicon_Rock e Carol735 curtiram isso.
  2. Universe

    Universe Craftlandiano

    Afiliado:
    24 Outubro 2017
    Mensagens:
    2,383
    Curtidas Recebidas:
    631
    Curtiu:
    33
    Cubos:
    2,598.00
    Bom macro​
     
    Divine e Carol735 curtiram isso.
  3. Uchiha

    Uchiha Hardcore
    VIP

    Afiliado:
    21 Dezembro 2016
    Mensagens:
    7,416
    Curtidas Recebidas:
    2,487
    Curtiu:
    126
    Sexo:
    Masculino
    Localização:
    Seu Coração
    Cubos:
    5,096.00
    Nick:
    SasukeUchiha
    Boa macro
     
    Divine curtiu isso.
  4. xSayaka

    xSayaka Lendário
    Designer VIP

    Afiliado:
    11 Outubro 2016
    Mensagens:
    8,031
    Curtidas Recebidas:
    4,995
    Curtiu:
    3,623
    Sexo:
    Feminino
    Ocupação:
    Nutrição
    Localização:
    Fanalis
    Cubos:
    13,416.00
    Nick:
    xSayaka_
    Clan:
    ---
    Boa cara, vai ajudar vlw! :peppondar:
     
    Divine e Carol735 curtiram isso.
  5. Lite

    Lite Bom

    Afiliado:
    28 Fevereiro 2014
    Mensagens:
    254
    Curtidas Recebidas:
    155
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    /Gladiador
    Cubos:
    268.00
    Nick:
    zLiteUS
    Aderi.
     
    Divine e Carol735 curtiram isso.
  6. shapkej

    shapkej Craftlandiano

    Afiliado:
    3 Janeiro 2019
    Mensagens:
    1,778
    Curtidas Recebidas:
    515
    Curtiu:
    111
    Sexo:
    Masculino
    Cubos:
    1,895.00
    Nick:
    shapkej
    Clan:
    ---
    Discord:
    shapkej#0644
    Boa macro!
     
    Divine e Carol735 curtiram isso.
  7. dark1304

    dark1304 Excelente

    Afiliado:
    6 Novembro 2017
    Mensagens:
    1,994
    Curtidas Recebidas:
    433
    Curtiu:
    34
    Cubos:
    2,099.00
    Nick:
    Boa macro!
     
    Divine curtiu isso.
  8. Carol735

    Carol735 Lendário
    VIP

    Afiliado:
    20 Dezembro 2012
    Mensagens:
    7,562
    Curtidas Recebidas:
    5,791
    Curtiu:
    25,754
    Sexo:
    Feminino
    Cubos:
    374.00
    Nick:
    Carol735
    Clan:
    MGT
    Discord:
    Carol735#7855
    YouTube:
    Caroline Marini
    Ótima macro :D
     
    Maicon_Rock e Divine curtiram isso.
  9. zAnnonymous

    zAnnonymous Craftlandiano

    Afiliado:
    31 Outubro 2012
    Mensagens:
    5,533
    Curtidas Recebidas:
    640
    Curtiu:
    263
    Sexo:
    Masculino
    Localização:
    Rio Grande...
    Cubos:
    2,089.64
    Nick:
    zAnnonymous
    Clan:
    ~
    nice macro men
     
    Divine curtiu isso.
  10. lomexicano

    VIP

    Afiliado:
    20 Agosto 2013
    Mensagens:
    198
    Curtidas Recebidas:
    170
    Curtiu:
    234
    Sexo:
    Masculino
    Ocupação:
    Estudante...
    Localização:
    Rio Grande...
    Cubos:
    276.00
    Nick:
    lomexicano
    Discord:
    lomexicano#2779
    YouTube:
    LoMexicano
    Muito interessante, vou aderir :p parabéns :D
     
    Maicon_Rock e Divine curtiram isso.
  11. zExtremexBR

    zExtremexBR Craftlandiano
    VIP

    Afiliado:
    19 Abril 2013
    Mensagens:
    3,347
    Curtidas Recebidas:
    829
    Curtiu:
    2,136
    Sexo:
    Masculino
    Cubos:
    2,741.52
    Nick:
    zExtremexBR_
    Clan:
    NFG
    vou começar a usar hihi
     
    Divine curtiu isso.
  12. Maicon_Rock

    Maicon_Rock Neutro
    VIP

    Afiliado:
    13 Setembro 2011
    Mensagens:
    18
    Curtidas Recebidas:
    2
    Curtiu:
    16
    Sexo:
    Masculino
    Cubos:
    13.00
    Nick:
    Maicon_Rock
    Acabei de testar muito boa ... foi rapido e no local correto :)
     
  13. Federal

    Federal Neutro

    Afiliado:
    28 Fevereiro 2019
    Mensagens:
    50
    Curtidas Recebidas:
    34
    Curtiu:
    19
    Sexo:
    Masculino
    Cubos:
    57.00
    Nick:
    Federal
    Poderia explicar o que de trigonometria foi utilizado para encontrar a direção correta?