ENTREGUE [Pedido] Acrescentar

Discussão em 'Macro Entregue' iniciado por Fischbornes, 9 Novembro 2019.

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

    VIP

    Afiliado:
    10 Outubro 2013
    Mensagens:
    320
    Curtidas Recebidas:
    122
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    /home
    Cubos:
    455.00
    Nick:
    Fischbornes
    Bom dia. Gostaria de fazer 2 pedidos para que fossem acrescentado a uma macro já pronta. O primeiro é bem simples o segundo é complexo. Caso alguém consiga fazer somente o primeiro já esta de bom tamanho.

    a macro em particular é esta aqui: https://forum.craftlandia.com.br/xf...-vip-1-8-warp-vip-craftlandia-chronos.964493/
    (vou colocar o código no final do post)
    A macro faz o seguinte, ela utiliza o autofish (1.8) para pescar, quando o inventario lota ela vai para uma home e o esvazia, deixando apenas no inventário livros encantados.

    O primeiro pedido seria de que quando a vara estivesse com a durabilidade baixa, o boneco desse /home, reparasse num bloco de ferro e voltasse a repetir o processo padrão da macro. (O autofish ja permite que as varas sejam trocadas automaticamente quando estão para quebrar, mas prefiro usar uma só e reparar).

    O segundo pedido (se conseguir o primeiro já é uma mão na roda) é de que os livros encantados sejam armazenados em baús (ou até mesmo um único baú).
    Grato desde já.

    $${
    &home_lixo="/home lixo";
    &home_pesq="/home pesca";
    &nao_dropar="written_book|enchanted_book";
    if(@pesca);
    log(&9[Macro] &fLimpar itens de pesca &6[VIP] &fdo &5Casal Win &cdesligado);
    unset(@pesca);
    stop();
    else;
    log(&9[Macro] &fLimpar itens de pesca &6[VIP] &fdo &5Casal Win &aligado);
    set(@pesca);
    endif;
    do;
    #x=%XPOS%;#z=%ZPOS%;
    do(3);
    echo(%&home_lixo%);
    do(15);
    wait(300ms);
    If((%XPOS%!=%#x%)||(%ZPOS%!=%#z%));
    break;
    endif;
    loop;
    If((%XPOS%!=%#x%)||(%ZPOS%!=%#z%));
    wait(1000ms);
    break;
    endif;
    loop;
    do(2);
    Getidrel(0,-1,0,&chao);
    If(&chao != "air"); break; endif;
    wait(500ms);
    loop;
    look(0,20);
    wait(300ms);
    unsafe(0);
    gui(inventory);
    for(#i,9,35);
    GETSLOTITEM(%#i%,&item);
    ifmatches(%&item%,%&nao_dropar%);
    else;
    SLOTCLICK(%#i%);
    SLOTCLICK(-999);
    endif;
    next;
    Gui();
    endunsafe;
    #x=%XPOS%;#z=%ZPOS%;
    do(3);
    echo(%&home_pesq%);
    do(15);
    wait(300ms);
    If((%XPOS%!=%#x%)||(%ZPOS%!=%#z%));
    break;
    endif;
    loop;
    If((%XPOS%!=%#x%)||(%ZPOS%!=%#z%));
    wait(1000ms);
    break;
    endif;
    loop;
    wait(400ms);
    wait(1000ms);
    Key(use);
    wait(500); /// acredito que o delay de limpeza seja isso aqui;
    loop;
    }$$
     
  2. dark1304

    dark1304 Hardcore
    VIP

    Afiliado:
    6 Novembro 2017
    Mensagens:
    8,355
    Curtidas Recebidas:
    3,967
    Curtiu:
    100
    Cubos:
    3,188.00
    Nick:
    Pro primeiro pedido, eu tenho a macro do lomexicano, porém modificada pra quando eu ainda jogava e ficava pescando k
    Se você for vip ela serve, ela da auto /reparar na vara quando chega a uma certa durabilidade(que você pode mudar facilmente)...
    Espero que ajude, sei que não é como seu pedido mas vai que ajuda kk :)

    Se quiser esse é o código dela:

    $${
    if(a);
    unset(a);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fMacro de reparar simples: &4&lOFF&f&l!!");
    stop;
    else;
    set(a);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fMacro de reparar simples: &2&lON&f&l!!");
    endif;

    do();
    if((%ITEM% == 272)&&(%DURABILITY% < 17));
    }$$ /reparar $${
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fReparando!! &0(&8durabilidade: &f%DURABILITY%&0)");
    wait(100ms);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fReparando!! &0(&8durabilidade: &f%DURABILITY%&0)");
    wait(100ms);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fReparando!! &0(&8durabilidade: &f%DURABILITY%&0)");
    wait(100ms);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fReparando!! &0(&8durabilidade: &f%DURABILITY%&0)");
    wait(100ms);
    log("&e&l[&2&lMA&f&lC&4&lRO&e&l] &l&fReparando!! &0(&8durabilidade: &f%DURABILITY%&0)");
    endif;
    if((%ITEM% == 346)&&(%DURABILITY% < 17));
    endif;
    loop;
    }$$
     
  3. Fischbornes

    VIP

    Afiliado:
    10 Outubro 2013
    Mensagens:
    320
    Curtidas Recebidas:
    122
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    /home
    Cubos:
    455.00
    Nick:
    Fischbornes
    em relação ao primeiro pedido eu consegui juntamente com um amigo alterar o código pra reparar indo num bloco.
    Não é 100% eficiente já que a durabilidade só é checada quando o processo de jogar itens fora se reinicia, mas quebra um galho.
    Se alguém conseguir fazer o segundo pedido ia ser top kk.
    Código ae:
    $${
    &home_lixo="/home lixo";
    &home_pesq="/home pesca";


    &nao_dropar="written_book|enchanted_book";
    if(@pesca);
    log(&9[Macro] &fLimpar itens de pesca &6[VIP] &fdo &5Casal Win &cdesligado);
    unset(@pesca);
    stop();
    else;
    log(&9[Macro] &fLimpar itens de pesca &6[VIP] &fdo &5Casal Win &aligado);
    set(@pesca);
    endif;
    do;
    #x=%XPOS%;#z=%ZPOS%;
    do(3);
    echo(%&home_lixo%);
    do(15);
    wait(300ms);
    If((%XPOS%!=%#x%)(%ZPOS%!=%#z%));
    break;
    endif;
    loop;
    If((%XPOS%!=%#x%)(%ZPOS%!=%#z%));
    wait(1000ms);
    break;
    endif;
    loop;


    do(2);
    Getidrel(0,-1,0,&chao);
    If(&chao != "air"); break; endif;
    wait(500ms);
    loop;
    look(0,20);
    wait(300ms);
    unsafe(0);
    gui(inventory);
    for(#i,9,35);
    GETSLOTITEM(%#i%,&item);
    ifmatches(%&item%,%&nao_dropar%);
    else;
    SLOTCLICK(%#i%);
    SLOTCLICK(-999);
    endif;
    next;
    Gui();
    endunsafe;
    #x=%XPOS%;#z=%ZPOS%;
    do(3);
    echo(%&home_pesq%);
    do(15);
    wait(300ms);
    If((%XPOS%!=%#x%)(%ZPOS%!=%#z%));
    break;
    endif;
    loop;
    If((%XPOS%!=%#x%)(%ZPOS%!=%#z%));
    wait(1000ms);
    break;
    endif;
    loop;
    wait(400ms);
    wait(1000ms);

    if(%DURABILITY% < 50);

    echo(/home reppesca);
    wait(2);
    key(use);
    wait(2);
    key(use);
    wait(2);
    echo(/home pesca);

    endif;
    wait(5);
    key(use);
    wait(500); /// acredito que o delay de limpeza seja isso aqui;
    loop;
    }$$
     
Status do Tópico:
Não esta aberto para novas mensagens.