[Entregue]Alguém edita esse macro pra mim

Discussão em 'Entregues' iniciado por Nigga Men, 23 Janeiro 2015.

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

    Nigga Men Neutro

    Afiliado:
    23 Janeiro 2015
    Mensagens:
    9
    Curtidas Recebidas:
    1
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Natal/RN
    Cubos:
    8.00
    Nick:
    BlaacK_
    Clan:
    HaD
    Bem preciso upar espadas hoje mais como o meu vip acabou se eu reparar vou perder todas minhas s5jul5f2 mob de (pig)

    Meu pedido é que alguém edite ate as 00:00 ate voltar os mobs (editar para ele trocar espadas antes de quebrar) se possivel ater (ter uma /home lixo) para jogar as espadas de ouro.. sou novo no fórum galera espero que me ajudem com isto codigo macro abaixo.


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

    //..............................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);
    slot(%#slot%);
    if(%HIT%="ENTITY");
    key(attack);
    endif;
    inc(#ver);

    //..............................Verefica a Durability
    $${
    if(arco);
    log("&4[Macro] espadas 1.0 OFF");
    unset(arco);
    stop();
    else;
    log("&2[Macro] espadas 1.0 ON");
    set(arco);
    for(#i,1,9);
    slot(%#i%);
    if(ITEM=276);
    do;
    do(23);
    key(attack);
    wait(80ms);
    loop;
    while(DURABILITY>40);
    endif;
    next;
    endif;
    log("&4[Macro] espadas 1.0 OFF");
    log("&4[Macro] repare suas espadas para continuar upando :p");
    unset(arco);
    stop();
    }$$

    //..............................Guardando em baus
    if((%#stack%!=0)&&(%#bau%<49));
    log("&9[MACRO]&1 Guardando nos Baus...");
    }$$/home bau1$${
    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 matarmobs
    $${endif;
    wait(1t);
    loop;
    endif;
    }$$




    Ver anexo 7841
     
  2. pblkratos

    pblkratos Craftlandiano
    VIP

    Afiliado:
    2 Outubro 2012
    Mensagens:
    4,546
    Curtidas Recebidas:
    1,937
    Curtiu:
    960
    Sexo:
    Masculino
    Localização:
    Joinville
    Cubos:
    64.00
    Nick:
    pblkratos
    Clan:
    SoH
    área destinada a pedidos de DESIGN.

    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.