[Entregue]PEDIDO DE APERFEIÇOAMENTO DE MACRO PLEASE!

Discussão em 'Entregues' iniciado por Mcleod, 2 Maio 2015.

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

    Mcleod Neutro
    VIP

    Afiliado:
    18 Maio 2014
    Mensagens:
    217
    Curtidas Recebidas:
    33
    Curtiu:
    64
    Sexo:
    Masculino
    Cubos:
    224.00
    Nick:
    Macleod
    Clan:
    EDL
    Nick: Macleod
    Servidor: Region
    Pedido: Com a nova atualização do servidor em relação às sethomes, o macro de upmob não está funcionando pois quando você da /home upmob (ou qualquer home) o personagem spawna fora do bloco desejado. No meu caso, eu nasçõ vários blocos acima, do lado, abaixo ou na parede. Menos no bloco de ferro onde deveria ir. O problema, deixo claro, não é no macro, mas, sim no modelo de home implantado que não tem precisão alguma. Logo, é preciso dar /home upmob (ele nasce em algum lugar aleatorio) e nesse lugar dar denovo /home upmob, aí ele nasce no lugar correto. No entanto, isso precisa ser feito automaticamente e sem atacar os mobs antes de faze-lo, ou mos mobs matam. Afinal, o pigmans não ataca se não for atacado.

    Resumo: Aperfeiçoar o macro para que ele de /baus quando estiver cheio, nesse local ele vai certo. E depois da /home upmob ir no local que nascer (sem atacar os mobs) e dar /home upmob novamente, para nascer no local certo e começar a upar novamente. videio com o problema: https://www.youtube.com/watch?v=T5EGr4aGNCo

    Agradeço profundamente o jovem esperto que conseguir resolver isso, vai ajudar mta gente. Abaixo o link e o código do macro original. Aguardo resposta, pode ser inbox ou num novo tópico. Enfim.

    http://forum.craftlandia.com.br/ipb/index.php?/topic/363088-macro-upar-espadamachado-48baus-vip-e-nao-vip/

    No caso quer que atualize a versão 1.5 que come pão

    $${
    if(up);
    log("&9[MACRO] &1Mata Mobs &4OFF");
    unset(up);
    stop;
    else;
    set(up);
    log("&9[MACRO] &1Mata Mobs &2ON");
    #dr=0;

    //..............................verefica item usado
    &i=%ITEM%;
    &espada="^276|267|272|268|283$";
    &machado="^279|258|275|271|286$";
    &d="^276|279$";&f="^267|258$";
    &p="^272|275$";&m="^268|271$";
    &o="^283|286$";
    ifmatches(%&i%,%&espada%);
    ifmatches(%&i%,%&d%);
    #dr=100;

    #d=85;
    endif;
    ifmatches(%&i%,%&f%);
    #dr=20;

    #d=10;
    endif;
    ifmatches(%&i%,%&o%);
    #dr=10;

    #d=5;
    endif;
    ifmatches(%&i%,%&p%);
    #dr=20;

    #d=10;
    endif;
    ifmatches(%&i%,%&m%);
    #dr=10;

    #d=5;
    endif;
    endif;
    ifmatches(%&i%,%&machado%);
    ifmatches(%&i%,%&d%);
    #dr=100;
    #d=85;
    endif;
    ifmatches(%&i%,%&f%);
    #dr=20;
    #d=10;
    endif;
    ifmatches(%&i%,%&o%);
    #dr=10;
    #d=5;
    endif;
    ifmatches(%&i%,%&p%);
    #dr=20;

    #d=10;
    endif;
    ifmatches(%&i%,%&m%);
    #dr=10;
    #d=5;
    endif;
    endif;

    if(%#dr%=0);
    log("&9[MACRO] &1Mata Mobs &4OFF");
    log("&9[MACRO] &1Reinicie o macro e pegue o item na mão!");
    unset(up);
    stop;
    endif;

    //..............................Pergunda se é vip
    &r=SIM,NAO;
    prompt(&time,$$[[%&r%]],"Vc é vip?");
    ifmatches(%&time%,"^SIM|sim$");
    #time=3;
    else;
    #time=6;
    endif;

    //..............................verefica pra onde esta olhando
    ifmatches(%DIRECTION%,N);
    &dir=NORTH;
    endif;
    ifmatches(%DIRECTION%,S);
    &dir=SOUTH;
    endif;
    ifmatches(%DIRECTION%,W);
    &dir=WEST;
    endif;
    ifmatches(%DIRECTION%,E);
    &dir=EAST;
    endif;
    }$$
    /pvp off
    $${
    #bau=1;
    #ver=1;
    do;

    //..............................Olhando e batendo
    look(%&dir%);
    look(,-24);
    pick(%&i%);
    if(%HIT%="ENTITY");
    key(attack);
    endif;
    inc(#ver);

    //..............................Verefica a Durability
    if(%DURABILITY%<%#dr%);

    if(%DURABILITY%<%#d%);
    log("&Verefique se vc tem condiçoes para reparar sua arma!");
    log("&3Espada/Machado Muito danificado");
    log("&9[MACRO] &1Mata Mobs &4OFF");
    unset(up);
    stop;
    endif;
    log("&9[MACRO]&1 Reparando...");
    look(+0,90);
    wait(100ms);
    do(3);
    key(use);
    loop;
    look(,-110);
    wait(500ms);
    endif;

    //..............................Verefica a SE o inv ta cheio
    #stack=0;
    if(%#ver%=100);
    gui(inventory);
    getslotitem(35,#id,#stack);
    wait(200ms);
    #ver=1;
    gui();
    endif;


    //..............................Verefica fome
    if(%HUNGER%<10);
    pick(364,297);
    wait(10ms);
    #st=%STACKSIZE%;
    do;
    key(use);
    until(%STACKSIZE%<%#st%);
    endif;

    //..............................Guardando em baus
    if((%#stack%!=0)&&(%#bau%<49));
    log("&9[MACRO]&1 Guardando nos Baus...");
    }$$/home baus$${
    wait(%#time%);

    //.............................Olhando para os baus
    if(%#bau%=1);
    look(146,17);
    endif;
    if(%#bau%=2);
    look(179,21);
    endif;
    if(%#bau%=3);
    look(213,18);
    endif;
    if(%#bau%=4);
    look(147,3);
    endif;
    if(%#bau%=5);
    look(179,3);
    endif;
    if(%#bau%=6);
    look(213,3);
    endif;
    if(%#bau%=7);
    look(147,348);
    endif;
    if(%#bau%=8);
    look(180,345);
    endif;
    if(%#bau%=9);
    look(213,348);
    endif;
    if(%#bau%=10);
    look(156,326);
    endif;
    if(%#bau%=11);
    look(203,327);
    endif;
    if(%#bau%=12);
    look(180,298);
    endif;
    if(%#bau%=13);
    look(237,17);
    endif;
    if(%#bau%=14);
    look(270,21);
    endif;
    if(%#bau%=15);
    look(303,18);
    endif;
    if(%#bau%=16);
    look(237,3);
    endif;
    if(%#bau%=17);
    look(270,3);
    endif;
    if(%#bau%=18);
    look(303,3);
    endif;
    if(%#bau%=19);
    look(237,348);
    endif;
    if(%#bau%=20);
    look(270,345);
    endif;
    if(%#bau%=21);
    look(303,348);
    endif;
    if(%#bau%=22);
    look(246,326);
    endif;
    if(%#bau%=23);
    look(295,327);
    endif;
    if(%#bau%=24);
    look(270,298);
    endif;
    if(%#bau%=25);
    look(327,17);
    endif;
    if(%#bau%=26);
    look(360,21);
    endif;
    if(%#bau%=27);
    look(34,18);
    endif;
    if(%#bau%=28);
    look(327,3);
    endif;
    if(%#bau%=29);
    look(360,3);
    endif;
    if(%#bau%=30);
    look(34,3);
    endif;
    if(%#bau%=31);
    look(327,348);
    endif;
    if(%#bau%=32);
    look(360,345);
    endif;
    if(%#bau%=33);
    look(34,348);
    endif;
    if(%#bau%=34);
    look(336,326);
    endif;
    if(%#bau%=35);
    look(24,327);
    endif;
    if(%#bau%=36);
    look(360,298);
    endif;
    if(%#bau%=37);
    look(56,17);
    endif;
    if(%#bau%=38);
    look(90,21);
    endif;
    if(%#bau%=39);
    look(124,18);
    endif;
    if(%#bau%=40);
    look(56,3);
    endif;
    if(%#bau%=41);
    look(90,3);
    endif;
    if(%#bau%=42);
    look(124,3);
    endif;
    if(%#bau%=43);
    look(56,348);
    endif;
    if(%#bau%=44);
    look(90,345);
    endif;
    if(%#bau%=45);
    look(124,348);
    endif;
    if(%#bau%=46);
    look(65,326);
    endif;
    if(%#bau%=47);
    look(115,327);
    endif;
    if(%#bau%=48);
    look(90,298);
    endif;
    if(%#bau%=49);
    log("&9[MACRO]&1 Baus cheios!!!");
    endif;

    wait(1);
    key(use);

    do;

    wait(10ms);

    until(%GUI%="GUICHEST");
    wait(1);
    for(#slot,54,80);
    slotclick(%#slot%,l,true);
    wait(50ms);
    next;
    getslotitem(53,#id,#stack);
    gui();

    if(%#stack%!=0);
    inc(#bau);
    if(%#bau%=49);
    log("&9[MACRO]&1 Voltando ao mob... Baus cheios");
    endif;
    endif;}$$
    /home upmob
    $${endif;
    wait(1t);
    loop;
    endif;
    }$$
     
  2. iChaarlie

    iChaarlie Hardcore

    Afiliado:
    18 Julho 2014
    Mensagens:
    4,146
    Curtidas Recebidas:
    2,918
    Curtiu:
    2,026
    Sexo:
    Masculino
    Localização:
    Goiânia-GO
    Cubos:
    3,800.00
    Nick:
    iChaarlie
    Área destinada a macros foi extinta do nosso fórum, essa área e para pedido de sign/avatar/banner.

    [hr]

    Pedido entregue, tag [Entregue] adicionada e tópico movido para Entregues.

    Obs: Está mensagem é automatica
     
Status do Tópico:
Não esta aberto para novas mensagens.