ENTREGUE [MACRO][1.5/1.7] Pesque ou Mate os Blazes ;)

Discussão em 'Macro Entregue' iniciado por Kristie, 20 Janeiro 2016.

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

    Kristie Excelente
    VIP

    Afiliado:
    24 Abril 2015
    Mensagens:
    827
    Curtidas Recebidas:
    356
    Curtiu:
    135
    Sexo:
    Masculino
    Cubos:
    1,826.00
    Nick:
    Kristie
    Clan:
    GOH
    Discord:
    TequilAxBr#3156
    [​IMG]
    Olá a todos, venho hoje com uma macro simples, estava sem nada para fazer então resolvi desenvolver está macro, funcional para todas as versões, guarda em 9 baús duplos (Apenas uma home), repara, você pode escolher se deseja matar ou pescar a blaze, alguns bugs de como bugar no bloco, tentei ao máximo arruma-lo sem ter que dar /home novamente...
    A macro depende apenas de 2 homes (A do MOB, e a da trap de baús);
    [​IMG]
    ~ Macro funcional para versões 1.5.2 e 1.7.X;
    ~ Macro desenvolvida para VIPS e No-VIPS (Apenas o de matar que ainda não está funcional para não vips);
    ~ Sistema de ant-bugs incluso;
    ~ Sistema de perguntas (Como escolher se irá matar ou pescar, qual espada ou vara irá usar e etc);
    ~ Sistema de 9 baús duplos desenvolvido especialmente para não vips, dependendo apenas de 2 homes;
    ~ Observação: Caso você queira dar uma sugestão de algum sistema por favor comente no Tópico ou me Envie uma MP.
    [​IMG]
    /Sethome mobblaze ~ Sete está home no local de upar, com um bloco de ferro em baixo de você;
    /Sethome bausblaze ~ Sete está home no local de guardar os itens; Demonstração Aqui
    [​IMG]
    [​IMG]
    ~ Bloco de ferro em baixo de onde você marcou a home do mob (/Home mobblaze);
    ~ A Home '/sethome bausblaze' deve ser marcada no bloco de madera bruto mostrado no print;
    ~ VERIFIQUE SEMPRE SEU INVENTÁRIO, E VEJA SE ESTÁ IGUAL OU PARECIDO COM O DA PRINT;
    [​IMG]
    Código:
    ~ ~ ChangeLog ~ ~
    
    ~ Desenvolvimento da macro iniciado no dia 19/01/2016;
    ~ Finalizada no dia 20/01/2016;
    ~ 20/01/2016 ~ Macro Postada; 
    [​IMG]
    [member=iVitinXDD] ~ Desenvolvedor do Macro;
    [member=Thamerninja] ~ Fez os banners do Tópico;
    [​IMG]
    Código:
    $${
    
    if(x);
    log("&f&l[&a&l%PLAYER%&f&l] &a&lBlaze Desativado.");
    unset(x);
    stop;
    else;
    log("&f&l[&a&l%PLAYER%&f&l] &a&lBlaze Ativado.");
    set(x);
    
    //Variavies
    IFMATCHES(%DIRECTION%,N);
    &dir = NORTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,S);
    &dir = SOUTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,W);
    &dir = WEST;
    ENDIF;
    IFMATCHES(%DIRECTION%,E);
    &dir = EAST;
    ENDIF;
    
    #bau = 1;
    
    //Perguntas
    clearchat();
    log("&a[MACRO][1] &fMata ~ Usando espadas...");
    log("&a[MACRO][2] &fPesca ~ Usando vara...");
    PROMPT(#decisao,$$?, Você irá matar ou pescar as Blazes?);
    
    if(%#decisao%=1);
    //Matar as blazes
    clearchat();
    log("&a[MACRO] &fVocê opitou por matar as blazes...");
    PROMPT(#esp,$$i, Qual espada você usara para matar?);
    PROMPT(#dur,$$?, Com quanto de durabilidade deseja reparar a espada?);
    
    do;
    //Repara
    pick(%#esp%);
    if(%DURABILITY%<%#dur%);
    look(0,90);
    log("&a[Macro] &fDurabilidade baixa, reparando espada...");
    key(use);wait(250ms);
    endif;
    
    //Bate
    do(250);
    
    if(%DURABILITY%<%#dur%);
    look(0,90);
    log("&a[Macro] &fDurabilidade baixa, reparando espada...");
    key(use);wait(250ms);
    endif;
    
    pick(%#esp%);
    look(%&dir%);
    look(,-20);
    if(%HIT%="ENTITY");
    pick(%#esp%);
        wait(27ms);
        key(attack);
    endif;
    loop;
    
    //Verifica inventario
    gui(inventory);
    	wait(2);
    	getslotitem(40,#id,#stack);
    	wait(2);
    	if(%#stack%=0);
    	gui();
    	else;
    	log("&a[Macro] &fInventário com poucos slots vázios...");
    	}$$/home bausblaze$${
    	gui();
    	do;
    	gui();
    	wait(6);
    	gui();
    
    if(%#bau%=1);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,5);wait(1);endif;
    
    if(%#bau%=2);wait(100ms);
    look(SOUTH);wait(100ms);
    look(181,2);wait(1);endif;
    
    if(%#bau%=3);wait(100ms);
    look(SOUTH);wait(100ms);
    look(211,5);wait(1);endif;
    
    if(%#bau%=4);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,33);wait(1);endif;
    
    if(%#bau%=5);wait(100ms);
    look(SOUTH);wait(100ms);
    look(180,36);wait(1);endif;
    
    if(%#bau%=6);wait(100ms);
    look(SOUTH);wait(100ms);
    look(208,32);wait(1);endif;
    
    if(%#bau%=7);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,47);wait(1);endif;
    
    if(%#bau%=8);wait(100ms);
    look(SOUTH);wait(100ms);
    look(180,51);wait(1);endif;
    
    if(%#bau%=9);wait(100ms);
    look(SOUTH);wait(100ms);
    look(209,49);wait(1);endif;
    
    $${wait(6);
    key(use);
    wait(10ms);
    for(#i,54,85);
    slotclick(%#i%,l,true);
    wait(500ms);
    next;
    wait(500ms);
    getslotitem(53,#id,#stack);
    wait(500ms);
    if(%#stack%!=0);
    inc(#bau);
    endif;
    if(%#bau%=9);
    unset(bau);
    log("&a[Macro] &fBaús cheios...");
    gui();
    else;
    gui();
    endif;
    until(%#stack%=0);
    }$$/home mobblaze$${
    endif;
    loop;
    loop;
    
    //Fim da macro de matar os blazes
    
    else;
    
    //Pescar as blazes
    clearchat();
    log("&a[MACRO] &fVocê opitou por pescar as blazes...");
    PROMPT(#vara,$$i, Selecione a vara para pescar os blazes.);
    PROMPT(#dur,$$?, Com quanto de durabilidade deseja reparar a vara?);
    
    do;
    //Repara
    pick(%#vara%);
    if(%DURABILITY%<%#dur%);
    look(0,90);
    log("&a[Macro] &fDurabilidade baixa, reparando vara...");
    key(use);wait(250ms);
    endif;
    
    //Pesca
    do(250);
    
    pick(%#vara%);
    if(%DURABILITY%<%#dur%);
    look(0,90);
    log("&a[Macro] &fDurabilidade baixa, reparando vara...");
    key(use);wait(250ms);
    endif;
    
    look(%&dir%);
    look(,-20);
    if(%HIT%="ENTITY");
    pick(%#vara%);
        wait(27ms);
        key(use);
    endif;
    loop;
    
    //Verifica inventario
    gui(inventory);
    	wait(2);
    	getslotitem(26,#id,#stack);
    	wait(2);
    	if(%#stack%=0);
    	gui();
    	else;
    	log("&a[Macro] &fInventário com poucos slots vázios...");
    	}$$/home bausblaze$${
    	gui();
    	do;
    	gui();
    	wait(6);
    	gui();
    
    if(%#bau%=1);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,5);wait(1);endif;
    
    if(%#bau%=2);wait(100ms);
    look(SOUTH);wait(100ms);
    look(181,2);wait(1);endif;
    
    if(%#bau%=3);wait(100ms);
    look(SOUTH);wait(100ms);
    look(211,5);wait(1);endif;
    
    if(%#bau%=4);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,33);wait(1);endif;
    
    if(%#bau%=5);wait(100ms);
    look(SOUTH);wait(100ms);
    look(180,36);wait(1);endif;
    
    if(%#bau%=6);wait(100ms);
    look(SOUTH);wait(100ms);
    look(208,32);wait(1);endif;
    
    if(%#bau%=7);wait(100ms);
    look(SOUTH);wait(100ms);
    look(147,47);wait(1);endif;
    
    if(%#bau%=8);wait(100ms);
    look(SOUTH);wait(100ms);
    look(180,51);wait(1);endif;
    
    if(%#bau%=9);wait(100ms);
    look(SOUTH);wait(100ms);
    look(209,49);wait(1);endif;
    
    $${wait(6);
    key(use);
    wait(10ms);
    for(#i,54,71);
    slotclick(%#i%,l,true);
    wait(500ms);
    next;
    wait(500ms);
    getslotitem(53,#id,#stack);
    wait(500ms);
    if(%#stack%!=0);
    inc(#bau);
    endif;
    if(%#bau%=9);
    unset(bau);
    log("&a[Macro] &fBaús cheios...");
    gui();
    else;
    gui();
    endif;
    until(%#stack%=0);
    }$$/home mobblaze$${
    endif;
    loop;
    loop;
    
    endif;
    }$$ 
    Bugs/Sugestões ~ MP ou no mesmo tópico.
     
    UpToLipe e Matheus Bohusch curtiram isso.
  2. BigMikeGR

    BigMikeGR Craftlandiano
    VIP

    Afiliado:
    7 Novembro 2014
    Mensagens:
    23,096
    Curtidas Recebidas:
    1,695
    Curtiu:
    872
    Sexo:
    Masculino
    Cubos:
    1,146.33
    Nick:
    BigMike_GR
    Bom macro, vai ajudar muito o pessoal!
     
  3. iKiritoPvP

    iKiritoPvP Excelente
    Banido

    Afiliado:
    6 Novembro 2015
    Mensagens:
    1,738
    Curtidas Recebidas:
    249
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Computador - PC
    Cubos:
    875.00
    Nick:
    thamerninja
    Clan:
    ✘ Fundador : SaT ✘
    Facebook:
    Thamerninja
    Skype:
    Me Derruba lá : ?? -qq
    Twitter:
    Thamerninja
  4. zKaTaN4

    zKaTaN4 Excelente
    VIP

    Afiliado:
    1 Novembro 2014
    Mensagens:
    938
    Curtidas Recebidas:
    238
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Caramujo - RJ
    Cubos:
    1,278.00
    Nick:
    zKaTaN4/brunofranco
    Clan:
    mTx - Moto Táxi
  5. Roodrigo

    Roodrigo Craftlandiano
    VIP

    Afiliado:
    16 Junho 2014
    Mensagens:
    4,532
    Curtidas Recebidas:
    669
    Curtiu:
    575
    Sexo:
    Masculino
    Localização:
    Teto
    Cubos:
    2,225.00
    Nick:
    Devas / Devasteytor
    bom macro!


    um pequeno probleminha na script




    if(%#bau%=8);wait(100ms);
    look(SOUTH);wait(100ms);
    look(180,51);wait(1);endif;

    if(%#bau%=9);wait(100ms);
    look(SOUTH);wait(100ms);
    look(209,49);wait(1);endif;

    $${wait(6);
    key(use);
    wait(10ms);
    for(#i,54,85);
    slotclick(%#i%,l,true);
    wait(500ms);


    recomendo você usar alguns antibugs

    por exemplo ao abrir bau ao dar home

    é bem importante para o bom funcionamento
     
  6. Kristie

    Kristie Excelente
    VIP

    Afiliado:
    24 Abril 2015
    Mensagens:
    827
    Curtidas Recebidas:
    356
    Curtiu:
    135
    Sexo:
    Masculino
    Cubos:
    1,826.00
    Nick:
    Kristie
    Clan:
    GOH
    Discord:
    TequilAxBr#3156
    Sim, e tentei. Porem estava flodando o chat, como se estivesse finalizando a macro entende?
    Aproposito, aceita skype.
     
  7. tutty1234

    tutty1234 Excelente
    VIP

    Afiliado:
    19 Junho 2011
    Mensagens:
    1,684
    Curtidas Recebidas:
    232
    Curtiu:
    1,344
    Sexo:
    Masculino
    Cubos:
    1,885.00
    Nick:
    tutty1234
    Clan:
    LEGENDARIOS
    Vou dar uma olhadinha :D
     
  8. Roodrigo

    Roodrigo Craftlandiano
    VIP

    Afiliado:
    16 Junho 2014
    Mensagens:
    4,532
    Curtidas Recebidas:
    669
    Curtiu:
    575
    Sexo:
    Masculino
    Localização:
    Teto
    Cubos:
    2,225.00
    Nick:
    Devas / Devasteytor
    sim ocorreu porque o código foi aberto $${ sendo que ele ja estava aberto $${

    ae o sistema buga :p



    estou no trabalho kkk

    a noite assim que chegar em casa eu aceito chego meio tarde :c
     
  9. Ninja138

    Ninja138 Craftlandiano
    Banido

    Afiliado:
    17 Agosto 2012
    Mensagens:
    2,523
    Curtidas Recebidas:
    1,084
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    544.00
    Nick:
    Oi?
    bela macro, irei usar
    vlw =)
     
  10. Kristie

    Kristie Excelente
    VIP

    Afiliado:
    24 Abril 2015
    Mensagens:
    827
    Curtidas Recebidas:
    356
    Curtiu:
    135
    Sexo:
    Masculino
    Cubos:
    1,826.00
    Nick:
    Kristie
    Clan:
    GOH
    Discord:
    TequilAxBr#3156
    Então está dizendo que tenho que colocar 1 }$$ no inicio dos bang dos baús?
     
  11. Roodrigo

    Roodrigo Craftlandiano
    VIP

    Afiliado:
    16 Junho 2014
    Mensagens:
    4,532
    Curtidas Recebidas:
    669
    Curtiu:
    575
    Sexo:
    Masculino
    Localização:
    Teto
    Cubos:
    2,225.00
    Nick:
    Devas / Devasteytor
    tipo é o seguinte

    aqui você abre o código $${

    e aqui você fecha }$$


    $${ Tudo que estiver aqui entre meio sera executado como código de macro }$$

    Tudo que estiver aqui fora sera mandado no chat

    você já abriu o código executável nesse momento aqui => }$$/home bausblaze$${

    Fechou
    Abriu

    $${wait(6);
    key(use);
    wait(10ms);
    for(#i,54,71);
    slotclick(%#i%,l,true);
    wait(500ms)

    nesse momento você abriu o código executável de novo, sendo que ele já estava aberto
     
  12. Y9T1N

    Y9T1N Bom
    Banido

    Afiliado:
    1 Agosto 2014
    Mensagens:
    3,694
    Curtidas Recebidas:
    112
    Curtiu:
    102
    Cubos:
    498.00
    Nick:
    FinaTTi
    Clan:
    NwF
    Vou dar uma testada

    Enviado de meu MotoE2(4G-LTE) usando Tapatalk
     
  13. Conta pra denuncia

    Banido

    Afiliado:
    20 Dezembro 2015
    Mensagens:
    559
    Curtidas Recebidas:
    43
    Curtiu:
    0
    Cubos:
    584.00
    Nick:
    Foreverchuk
    Clan:
    nBR
  14. zVinilRevolts

    Afiliado:
    11 Dezembro 2015
    Mensagens:
    3,297
    Curtidas Recebidas:
    149
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    78.00
    Nick:
    Rebbords
    Boa macro

    Enviado de meu XT1033 usando Tapatalk
     
  15. Kristie

    Kristie Excelente
    VIP

    Afiliado:
    24 Abril 2015
    Mensagens:
    827
    Curtidas Recebidas:
    356
    Curtiu:
    135
    Sexo:
    Masculino
    Cubos:
    1,826.00
    Nick:
    Kristie
    Clan:
    GOH
    Discord:
    TequilAxBr#3156
    Obrigado a todos ;)
    Sugestões/BUGS Por favor comente no tópico ou me envie uma MP;
    Pedidos ~ MP
     
Status do Tópico:
Não esta aberto para novas mensagens.