ENTREGUE [Macro] BLAZE kill [pesca/espadas]

Discussão em 'Macro Entregue' iniciado por Eduarte, 25 Março 2017.

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

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    371.00
    Nick:
    Eduarte
    Hoje trago meu primeiro macro de mobs, este é um macro para matar blaze, seja pescando ou usando uma espada de diamante.

    Características do macro:
    1. Ant bug (não importa o quanto lague ou reinicie o servidor o macro irá continuar funcionando perfeitamente).
    2. Capacidade para 20 baús duplos de blaze rod
    3. Funciona com outros mobs também, para caso você queira pescar cabeças ou upar espadas.
    4. Pesca os blazes, repara, caso a linha acabe pega mais nos baús (capacidade de até 5 baús duplos de linha) e caso a vara de pescar quebre vai pegar mais nos baús (capacidade de 5 baus duplos).
    5. Você escolhe se quer pescar os blazes ou usar espada de diamante, caso você opte trocar espada o macro vai trocar a espada quando a durabilidade ficar baixa. Tem capacidade para 5 baús duplos de espadas, caso opte por reparar o macro irá reparar a espada.
    6. O macro funciona com 2 modelos de mobtrap diferentes(mais detalhes sobre isto mais a frente).
    7. Usa apenas 2 sethomes, tornando viável para não vips.
    8. No momento, é para a versão 1.5


    Tutorial da trap de baus:
    Siga as instruções das prints a seguir para construir a trap

    [​IMG]


    A trap também deve seguir uma posição específica na construção, sendo que deve-se colocar os baús de blaze na direção WEST (oeste).

    Aqui vai uma print para facilitar:
    [​IMG]

    Após a construção suba na lã central e de /sethome blazebaus
    Caso tenha alguma dúvida na construção da trap de baús, no servidor 3 na /home Eduarte macros há uma réplica.


    Tutorial da trap de blaze:
    Como já citei o macro funciona com 2 tipos de trap.
    A primeira é a mais comum:


    [​IMG]

    Nela você deve colocar o bloco de ferro sobre os pés e dar /sethome blazemob. Também deve construir uma correnteza de água de modo que você seja empurrado para frente.

    O 2º modelo de trap é este:

    [​IMG]

    Neste modelo há 3 espaços para os blaze caírem, tornando seu mobspawn mais eficiente e evitando que os mobs de blaze levem muito dano na água, deve-se seguir o mesmo esquema com um bloco de ferro sobre os pés e uma correnteza de modo que empurre para frente. A sethome é /home blazemob.
    Caso tenha dúvidas sobre a construção da trap há uma réplica na /home Eduarte macros, servidor 3.

    Como deve ficar o inventário:
    Caso queira pescar o inventário deve ficar desta forma:
    [​IMG]

    Caso queira usar espadas, com a opção de reparar, o inventário deve ficar desta forma:
    [​IMG]

    E, caso queira usar com a opção de trocar a espada quando a durabilidade ficar baixa o inventário fica desta forma:
    [​IMG]

    Usando a macro:

    Após construir e marcar as sethomes, organizar o inventário basta apenas ir na /home blazemob e ligar. O macro perguntará qual tipo de trap usar e se vai pescar ou usar espada.
    Instalando a macro:
    Para instalar basta copiar o código que está disponível abaixo e criar um arquivo no editfile e colar o código.


    Código 1.5:
    $${
    if(mata_blaze);
    unset(mata_blaze);
    log("&2[&9Macro&2] &bMata Blaze &4OFF");
    achievementget("Macro feito por Eduarte",369);
    stop();
    else;
    set(mata_blaze);
    log("&2[&9Macro&2] &bMata Blaze &aON");
    achievementget("Macro feito por Eduarte",369);
    endif;

    ifmatches(%DIRECTION%,N);&edu_direction = NORTH;endif;
    ifmatches(%DIRECTION%,S);&edu_direction = SOUTH;endif;
    ifmatches(%DIRECTION%,W);&edu_direction = WEST;endif;
    ifmatches(%DIRECTION%,E);&edu_direction = EAST;endif;

    #look=1;
    #bau_pa1=1;
    #bau_pa2=1;
    #bau_bar=1;
    #bau=1;
    unset(repor_vara);
    unset(repor_linha);

    if(config_on);
    do;
    clearchat;
    log("&2[&9Macro&2] &6Deseja usar as configuracoes anteriores?");
    log("&2[&91&2] &6SIM");
    log("&2[&92&2] &6NAO, resetar as configuracoes");
    if(KEY_1);
    log("&6Configuracoes mantidas, iniciando a macro");
    break;
    elseif(KEY_2);
    log("&6Configuracoes resetadas");
    unset(config_on);
    unset(blaze_trap);
    unset(blaze_pesca);
    unset(blaze_rep);
    unset(blaze_espada);
    #durabilidade=20;
    wait(2);
    break;
    endif;
    loop;
    endif;

    if(!config_on);
    do;
    clearchat;
    log("&2[&9Macro&2] &6Qual estilo da trap de blaze que você irá usar?");
    log("&2[&91&2] &6Estilo normal, 1 bloco");
    log("&2[&92&2] &6Estilo eficiênte, 3 blocos");
    if(KEY_1);
    log("&6Estilo normal, 1 bloco &aON");
    set(blaze_trap);
    break;
    elseif(KEY_2);
    log("&6Estilo eficiênte, 3 blocos &aON");
    break;
    endif;
    loop;
    wait(1);
    do;
    clearchat;
    log("&2[&9Macro&2] &6Você deseja pescar ou matar os blazes com a espada?");
    log("&2[&91&2] &6Pescar os blazes");
    log("&2[&92&2] &6Usar a espada");
    if(KEY_1);
    log("&6Pescar os blazes &aON");
    set(blaze_pesca);
    #durabilidade=20;
    break;
    elseif(KEY_2);
    log("&6Usando espadas &aON");
    set(blaze_espada);
    #durabilidade=150;
    wait(1);
    do;
    clearchat;
    log("&2[&9Macro&2] &6Você deseja reparar ou trocar a espada quando estiver quebrando?");
    log("&2[&91&2] &6Reparar a espada");
    log("&2[&92&2] &6Trocar a espada");
    if(KEY_1);
    log("&6Espadas serao reparadas &aON");
    set(blaze_rep);
    break;
    elseif(KEY_2);
    log("&6Espadas será trocada quando ficar com durabilidade baixa &aON");
    break;
    endif;
    loop;
    break;
    endif;
    loop;
    set(config_on);
    log("&6INICIANDO A MACRO");
    endif;

    do;
    do(50);
    if(%GUI%="GUICHAT");
    log("&2[&9Macro&2] &6Pausado!!! Chat está aberto");
    do;
    until(%GUI%!="GUICHAT");
    endif;
    slot(9);
    if(blaze_trap);
    look(%&edu_direction%);look(,-27);wait(50ms);
    else;
    if(%#look%=1);look(%&edu_direction%);look(,-27);endif;
    if(%#look%=2);look(%&edu_direction%);look(-38,-25);endif;
    if(%#look%=3);look(%&edu_direction%);look(+38,-25);endif;
    inc(#look);
    if(%#look%>3);
    #look=1;
    endif;
    wait(200ms);
    endif;
    if(%HIT%="ENTITY");
    if(blaze_pesca);
    do(10);
    key(use);
    wait(300ms);
    if(%DURABILITY%<%#durabilidade%);
    look(%&edu_direction%);
    look(,90);
    key(use);
    wait(200ms);
    endif;
    until(%HIT%!="ENTITY");
    else;
    do(10);
    key(attack);
    wait(100ms);
    until(%HIT%!="ENTITY");
    endif;
    endif;

    if(%DURABILITY%<%#durabilidade%);
    if((blaze_espada)&&(blaze_rep));
    look(%&edu_direction%);
    look(,90);
    key(use);
    wait(1);
    elseif(blaze_espada);
    getslotitem(9,#id,#stack);
    if(%#stack% = 0);
    log("&2[&9Macro&2] &6Parece que a espada quebrou ou o servidor reiniciou. Aguardando &615 &6segundos para confirmar");
    wait(15);
    endif;
    if(%DURABILITY%<%#durabilidade%);
    log("&2[&9Macro&2] &6Espada com durabilidade baixa. Indo trocar");
    do;}$$/home blazebaus$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);
    log("&2[&9Macro&2] &6Guardando espada quebrada");
    do;
    do;
    if(%#bau_pa1%=1);look(east);wait(100ms);look(53,20);endif;
    if(%#bau_pa1%=2);look(east);wait(100ms);look(68,23);endif;
    if(%#bau_pa1%=3);look(east);wait(100ms);look(90,23);endif;
    if(%#bau_pa1%=4);look(east);wait(100ms);look(110,23);endif;
    if(%#bau_pa1%=5);look(east);wait(100ms);look(128,20);endif;
    wait(100ms);
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    slotclick(89,l,true);
    wait(1);
    getslotitem(53,#id,#stack);
    if(%#stack%!=0);
    inc(#bau_pa1,1);
    if(%#bau_pa1%>5);
    #bau_pa1=1;
    endif;
    gui();
    else;
    break;
    endif;
    loop;
    gui();
    wait(1);
    log("&2[&9Macro&2] &6Coletando uma espada nova");
    do;
    do;
    if(%#bau_pa2%=1);look(east);wait(100ms);look(53,34);endif;
    if(%#bau_pa2%=2);look(east);wait(100ms);look(68,36);endif;
    if(%#bau_pa2%=3);look(east);wait(100ms);look(90,38);endif;
    if(%#bau_pa2%=4);look(east);wait(100ms);look(110,38);endif;
    if(%#bau_pa2%=5);look(east);wait(100ms);look(128,34);endif;
    wait(100ms);
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    for(#slot,0,53);
    getslotitem(%#slot%,#id,#stack);
    if(%#id%=276);
    slotclick(%#slot%,l,true);wait(100ms);
    break;
    endif;
    next;
    if(%#slot%!=53);
    break;
    else;
    gui();wait(1);
    inc(#bau_pa2);
    if(%#bau_pa2%>5);
    #bau_pa2=1;
    endif;
    endif;
    loop;
    log("&2[&9Macro&2] &6Troca de espada finalizada voltando para a trap");
    do;}$$/home blazemob$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
    endif;
    endif;
    endif;
    loop;
    //analisa o inventário
    gui(inventory);
    wait(100ms);
    if(blaze_pesca);
    getslotitem(44,#id,#stack);
    if(%#id%!=346);
    set(repor_vara);
    endif;
    getslotitem(42,#id,#stack);
    if(%#id%!=287);
    set(repor_linha);
    #pack_bar=0;
    for(#slot,36,43);
    getslotitem(%#slot%,#id,#stack);
    if(%#id%!=287);
    inc(#pack_bar,1);
    endif;
    next;
    endif;
    endif;
    getslotitem(34,#id,#stack);
    if((%#stack%!=0)||(repor_vara)||(repor_linha));
    do;}$$/home blazebaus$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=35);

    //guardando as blazes

    do;
    do;
    //west
    if(%#bau%=1);look(WEST);wait(2ms);look(-35,32);endif;
    if(%#bau%=2);look(WEST);wait(2ms);look(-20,36);endif;
    if(%#bau%=3);look(WEST);wait(2ms);look(-,38);endif;
    if(%#bau%=4);look(WEST);wait(2ms);look(287,36);endif;
    if(%#bau%=5);look(WEST);wait(2ms);look(305,32);endif;
    if(%#bau%=6);look(WEST);wait(2ms);look(-35,18);endif;
    if(%#bau%=7);look(WEST);wait(2ms);look(-20,20);endif;
    if(%#bau%=8);look(WEST);wait(2ms);look(-,23);endif;
    if(%#bau%=9);look(WEST);wait(2ms);look(287,20);endif;
    if(%#bau%=10);look(WEST);wait(2ms);look(305,18);endif;
    if(%#bau%=11);look(WEST);wait(2ms);look(-35,3);endif;
    if(%#bau%=12);look(WEST);wait(2ms);look(-20,3);endif;
    if(%#bau%=13);look(WEST);wait(2ms);look(-,3);endif;
    if(%#bau%=14);look(WEST);wait(2ms);look(290,3);endif;
    if(%#bau%=15);look(WEST);wait(2ms);look(305,3);endif;
    if(%#bau%=16);look(WEST);wait(2ms);look(-38,-15);endif;
    if(%#bau%=17);look(WEST);wait(2ms);look(-20,-15);endif;
    if(%#bau%=18);look(WEST);wait(2ms);look(-,-15);endif;
    if(%#bau%=19);look(WEST);wait(2ms);look(288,-15);endif;
    if(%#bau%=20);look(WEST);wait(2ms);look(305,-13);endif;
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    getslotitem(53,#id,#stack);
    if(%#stack%=0);
    for(#slotn,54,88);
    getslotitem(%#slotn%,#id,#stack);
    if((%#id%=287)||(%#id%=264));
    else;
    slotclick(%#slotn%,l,true);
    wait(70ms);
    endif;
    next;
    endif;
    wait(100ms);
    getslotitem(53,#id,#stack);
    if(%#stack%!=0);
    inc(#bau);
    endif;
    gui();
    wait(250ms);
    if(%#bau%=21);
    #bau=1;
    endif;
    until(%#stack%=0);
    gui();
    wait(1);

    //trocando a vara de pescar caso esteje faltando

    if(repor_vara);
    log("&2[&9Macro&2] &6Parece que a vara de pescar quebrou!!!. Pegando uma nova");
    log("");
    log("&2[&9Macro&2] &6Guardando possivel item que esteja no lugar da vara");
    do;
    do;
    if(%#bau_pa1%=1);look(east);wait(100ms);look(53,20);endif;
    if(%#bau_pa1%=2);look(east);wait(100ms);look(68,23);endif;
    if(%#bau_pa1%=3);look(east);wait(100ms);look(90,23);endif;
    if(%#bau_pa1%=4);look(east);wait(100ms);look(110,23);endif;
    if(%#bau_pa1%=5);look(east);wait(100ms);look(128,20);endif;
    wait(100ms);
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    slotclick(89,l,true);
    wait(1);
    getslotitem(53,#id,#stack);
    if(%#stack%!=0);
    inc(#bau_pa1,1);
    if(%#bau_pa1%>5);
    #bau_pa1=1;
    endif;
    gui();
    else;
    break;
    endif;
    loop;
    gui();
    wait(1);
    do;
    do;
    if(%#bau_pa2%=1);look(east);wait(100ms);look(53,34);endif;
    if(%#bau_pa2%=2);look(east);wait(100ms);look(68,36);endif;
    if(%#bau_pa2%=3);look(east);wait(100ms);look(90,38);endif;
    if(%#bau_pa2%=4);look(east);wait(100ms);look(110,38);endif;
    if(%#bau_pa2%=5);look(east);wait(100ms);look(128,34);endif;
    wait(100ms);
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    for(#slot,0,53);
    getslotitem(%#slot%,#id,#stack);
    if(%#id%=346);
    slotclick(%#slot%,l,true);wait(100ms);
    break;
    endif;
    next;
    if(%#slot%!=53);
    gui();wait(1);
    break;
    else;
    gui();wait(1);
    inc(#bau_pa2);
    if(%#bau_pa2%>5);
    #bau_pa2=1;
    endif;
    endif;
    loop;
    log("&2[&9Macro&2] &6Vara de pescar reposta");
    unset(repor_vara);
    endif;

    //repondo as linhas caso esteje faltando

    if(repor_linha);
    do;
    do;
    if(%#bau_bar%=1);;look(north);wait(100ms);look(-38,32);endif;
    if(%#bau_bar%=2);look(north);wait(100ms);look(-20,37);endif;
    if(%#bau_bar%=3);look(north);wait(100ms);look(0,39);endif;
    if(%#bau_bar%=4);look(north);wait(100ms);look(20,37);endif;
    if(%#bau_bar%=5);look(north);wait(100ms);look(38,32);endif;
    wait(100ms);
    key(use);
    wait(3);
    until(%GUI%="GUICHEST");
    for(#slot,0,53);
    getslotitem(%#slot%,#id,#stack);
    if(%#id%=287);
    slotclick(%#slot%,l,true);wait(100ms);
    dec(#pack_bar,1);
    endif;
    if(%#pack_bar%=0);
    break;
    endif;
    next;
    if(%#slot%!=53);
    gui();wait(1);
    break;
    else;
    gui();wait(1);
    inc(#bau_bar);
    if(%#bau_bar%>5);
    #bau_bar=1;
    endif;
    endif;
    loop;
    log("&2[&9Macro&2] &6Linhas repostas");
    unset(repor_linha);
    endif;
    do;}$$/home blazemob$${wait(5);getidrel(0,-1,0,#antbug);until(%#antbug%=42);
    else;
    gui();
    wait(200ms);
    endif;
    loop;
    }$$

    Sobre a vesão 1.7. Devido à programação ser diferente nesta versão e eu jogar na 1.5, fiquei desmotivado a encarar adaptar para esta versão. Mas caso a macro fique popular e tenha um bom feedback estarei trazendo para a versão 1.7.
    Por último veja outras macros minhas no link: http://forum.craftlandia.com.br/ipb/index.php?/tags/forums/macrodoedu/ e até o próximo macro.
     
  2. StitchZERA

    StitchZERA Neutro
    VIP

    Afiliado:
    1 Fevereiro 2017
    Mensagens:
    75
    Curtidas Recebidas:
    32
    Curtiu:
    23
    Sexo:
    Masculino
    Cubos:
    107.11
    Nick:
    STITCHZER00
    Bem irei testar ...
     
  3. SriBlack_

    SriBlack_ Craftlandiano
    VIP

    Afiliado:
    10 Maio 2014
    Mensagens:
    1,134
    Curtidas Recebidas:
    549
    Curtiu:
    352
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    1,716.00
    Nick:
    iBlack_
    Clan:
    SF
    Facebook:
    https://www.facebook.com/matheus.bertele
    Skype:
    so passo para os amigos <3
    up irei testar <3
     
  4. sirgodzilla

    sirgodzilla Neutro
    VIP

    Afiliado:
    13 Setembro 2016
    Mensagens:
    95
    Curtidas Recebidas:
    14
    Curtiu:
    30
    Sexo:
    Masculino
    Cubos:
    93.00
    Nick:
    sirgodzilla
    Clan:
    new
    parece ser bem interessante valeu
     
  5. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    371.00
    Nick:
    Eduarte
    Testem ai. Se tiver algum bug me avisem que irei tentar resolver
     
  6. lukyy

    lukyy Bom
    VIP

    Afiliado:
    18 Dezembro 2015
    Mensagens:
    2,090
    Curtidas Recebidas:
    159
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Por aí_
    Cubos:
    2,241.00
    Nick:
    zLukyy/Lukyy/lukyy
    Clan:
    SoH
    GG go usar
     
  7. kauasantana

    kauasantana Neutro

    Afiliado:
    13 Outubro 2013
    Mensagens:
    216
    Curtidas Recebidas:
    25
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Acre
    Cubos:
    230.00
    Nick:
    ArtifactHunter
    Skype:
    avatarpreto
    Nice macro brow!
     
  8. Otosaka

    Otosaka Hardcore
    VIP

    Afiliado:
    8 Setembro 2011
    Mensagens:
    42,872
    Curtidas Recebidas:
    3,683
    Curtiu:
    305
    Cubos:
    602.00
    Nick:
    Boa man parece ser bem legal ;)
     
  9. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    371.00
    Nick:
    Eduarte
    Vlw!!, testem ai e compartilhem para seus amigos lucrarem tb :thumbsup:
     
  10. zLiteUS

    zLiteUS Craftlandiano
    VIP

    Afiliado:
    30 Setembro 2015
    Mensagens:
    3,792
    Curtidas Recebidas:
    663
    Curtiu:
    217
    Sexo:
    Masculino
    Localização:
    /Gladiador
    Cubos:
    680.00
    Nick:
    zLiteUS
    Clan:
    DkS
    foda.. dms
     
  11. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    371.00
    Nick:
    Eduarte
    Vlw, qualquer bug/duvida só falar
     
  12. Rhorganxd

    Rhorganxd Bom
    VIP

    Afiliado:
    27 Março 2015
    Mensagens:
    1,526
    Curtidas Recebidas:
    140
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    219.00
    Nick:
    Rhorganxd
    Bom macro mano parabéns
     
Status do Tópico:
Não esta aberto para novas mensagens.