VIPSEJA VIP ChangeLogCHANGELOG EstatisticaESTATÍSTICAS RegrasREGRAS DiscordDISCORD Loja de CubosLOJA DE CUBOS

  1. PROMOÇÃO DE ANIVERSÁRIO NO AR

Meus Macros

Discussão em 'Botecolandia' iniciado por koringakabulozu, 16 Janeiro 2017.

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

    koringakabulozu Neutro

    Afiliado:
    25 Maio 2016
    Mensagens:
    85
    Curtidas Recebidas:
    35
    Curtiu:
    0
    Localização:
    Bonde do 00
    Cubos:
    110.00
    Nick:
    koringa_kabulozu
    #1 koringakabulozu, 16 Janeiro 2017
    Macros​

    [​IMG]
    $${
    log("&e Macro &9criado by &f&4KoringaKabulozu")
    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;
    }$$
    [​IMG]
    1.5.2

    ${
    log("&e Macro &9criado by &f&4KoringaKabulozu")
    if(pass1);
    log(&3Multi-Macro&6 Passo 1!);
    #idit=%ITEM%
    log(&3ID do &6ITEM &3salvo com sucesso! - %#idit%);
    wait(200ms);
    unset(pass1);
    set(pass2);
    stop();
    endif;

    if(pass2);

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

    log(&3Multi-Macro&6 Passo 2!);
    #idbl=%ITEM%
    log(&3ID do &6BLOCO &3salvo com sucesso! - %#idbl%);
    log(Iniciando processo);
    wait(200ms);
    unset(pass2);
    set(pass3);
    do;
    PICK(%#idbl%);
    wait(50ms);
    LOOK(%&ff%);LOOK(,50);
    key(USE);
    wait(50ms);
    PICK(%#idit%);
    if(%#idit% != 0);
    if(%DURABILITY% < 10);
    LOOK(%&ff%);LOOK(,90);
    wait(50ms);
    KEY(USE);KEY(USE);KEY(USE);
    wait(50ms);
    endif;
    endif;
    wait(50ms);
    LOOK(%&ff%);LOOK(,50);
    do;
    KEY(attack);
    while(%HITID%=%#idbl%);
    wait(200ms);
    loop;
    endif;

    if(pass3);
    log(&3Multi-Macro &4[OFF]);
    wait(200ms);
    unset(pass3);
    set(pass1);
    stop();
    endif;

    set(pass1);
    teste
    }$
    1.7.2
    ${
    log("&e Macro &9criado by &f&4KoringaKabulozu")
    if(pass1);
    log(&3Multi-Macro&6 Passo 1!);
    &idit=%ITEM%
    log(&3ID do &6ITEM &3salvo com sucesso! - %&idit%);
    wait(200ms);
    unset(pass1);
    set(pass2);
    stop();
    endif;

    if(pass2);

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

    log(&3Multi-Macro&6 Passo 2!);
    &idbl=%ITEM%
    log(&3ID do &6BLOCO &3salvo com sucesso! - %&idbl%);
    log(Iniciando processo);
    wait(200ms);
    unset(pass2);
    set(pass3);
    do;
    PICK(%&idbl%);
    wait(50ms);
    LOOK(%&ff%);LOOK(,50);
    key(USE);
    wait(50ms);
    PICK(%&idit%);
    ifmatches(%&idit%,air);
    else;
    if(%DURABILITY% < 10);
    LOOK(%&ff%);LOOK(,90);
    wait(50ms);
    KEY(USE);KEY(USE);KEY(USE);
    wait(50ms);
    endif;
    endif;
    wait(50ms);#parar=0;
    LOOK(%&ff%);LOOK(,50);
    do;
    KEY(attack);
    ifmatches(%HITID%,%&idbl%);else;#parar=1;log(ok - %&idbl%);endif;
    until(%#parar%=1);log(teste);
    wait(200ms);
    loop;
    endif;

    if(pass3);
    log(&3Multi-Macro &4[OFF]);
    wait(200ms);
    unset(pass3);
    set(pass1);
    stop();
    endif;

    set(pass1);
    teste
    }$








    Changelog

    17/01/2017
    :banana: - Macro de upar Herbalismo adicionado. :banana:

    16/01/2017
    - Tutorial de criar macro: http://forum.craftlandia.com.br/ipb/index.php?/topic/777802-tudo-sobre-macros/#entry6828938
    :banana: - Macro de upar espada adicionado. :banana:
    - Guia para novatos: http://forum.craftlandia.com.br/ipb/index.php?/topic/159896-tutorial-guia-de-macro-para-iniciantes/



    Caso encontre algum bug nos macros, avise-me
    obrigado!
    Em Breve postarei Mais Macros.

    DEIXE SEU LIKE!
     
    zakvirusplay e Dragon2O7O curtiram isso.
  2. zStrikerChavozaO

    zStrikerChavozaO Razoavel
    Banido

    Afiliado:
    8 Dezembro 2016
    Mensagens:
    708
    Curtidas Recebidas:
    54
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Fortaleza - CE
    Cubos:
    764.00
    Nick:
    ✘ Stroiter ✘
    Clan:
    ✘ BnS ✘
    Skype:
    jhonantan7
    #2 zStrikerChavozaO, 17 Janeiro 2017
    Belas macros u.u vo usa a da espada ae q-q
     
    koringakabulozu curtiu isso.
  3. iKaneki

    iKaneki Excelente
    Banido

    Afiliado:
    4 Janeiro 2016
    Mensagens:
    3,124
    Curtidas Recebidas:
    437
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo - SP
    Cubos:
    233.00
    Nick:
    Queen KaNeKi ♥
    Clan:
    DkS
    #3 iKaneki, 17 Janeiro 2017
    Nice macros.
    Vo usa o de espadao

    Enviado de meu GT-S7560M usando Tapatalk
     
  4. Dragon2O7O

    Dragon2O7O Craftlandiano
    VIP

    Afiliado:
    13 Dezembro 2013
    Mensagens:
    3,218
    Curtidas Recebidas:
    1,632
    Curtiu:
    1,031
    Sexo:
    Masculino
    Localização:
    Lapa-Pr
    Cubos:
    1,958.69
    Nick:
    Azio
    Clan:
    Nenhum...
    #4 Dragon2O7O, 17 Janeiro 2017
    koringakabulozu curtiu isso.
  5. UzzAbel

    UzzAbel Neutro
    Banido

    Afiliado:
    9 Janeiro 2017
    Mensagens:
    441
    Curtidas Recebidas:
    38
    Curtiu:
    58
    Sexo:
    Masculino
    Cubos:
    451.00
    Nick:
    Cornalha
    Clan:
    YnY
    #5 UzzAbel, 17 Janeiro 2017
    heheheh boa tava necessitando *-
     
  6. Marcelo Dias

    Marcelo Dias Neutro

    Afiliado:
    14 Janeiro 2017
    Mensagens:
    1
    Curtidas Recebidas:
    0
    Curtiu:
    0
    Cubos:
    1.00
    Nick:
    marcelosm
    #6 Marcelo Dias, 17 Janeiro 2017
    boa
     
  7. Anastasiia

    Anastasiia Excelente
    VIP

    Afiliado:
    1 Fevereiro 2016
    Mensagens:
    3,605
    Curtidas Recebidas:
    345
    Curtiu:
    688
    Sexo:
    Masculino
    Localização:
    Pripyat
    Cubos:
    594.00
    Nick:
    Anastasiia
    Clan:
    B13
    Facebook:
    Mendesgg
    #7 Anastasiia, 17 Janeiro 2017
    boa macro =)
     
    koringakabulozu curtiu isso.
  8. zVanderoriginal

    zVanderoriginal Craftlandiano
    VIP

    Afiliado:
    27 Abril 2015
    Mensagens:
    9,381
    Curtidas Recebidas:
    993
    Curtiu:
    1,638
    Sexo:
    Masculino
    Localização:
    >> Gladiador <<
    Cubos:
    865.00
    Nick:
    VanderREIDELAS
    Clan:
    Nen
    #8 zVanderoriginal, 17 Janeiro 2017
    Boa macro vou usar-la
     
  9. zNextGamer

    zNextGamer Craftlandiano
    VIP

    Afiliado:
    5 Janeiro 2017
    Mensagens:
    2,489
    Curtidas Recebidas:
    676
    Curtiu:
    1,174
    Sexo:
    Masculino
    Localização:
    POA
    Cubos:
    1,290.00
    Nick:
    zNextGamer
    #9 zNextGamer, 17 Janeiro 2017
    Vou usar a da espada eu acho...
     
  10. zMateus1111

    zMateus1111 Neutro
    Banido

    Afiliado:
    9 Janeiro 2017
    Mensagens:
    388
    Curtidas Recebidas:
    29
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Travado no...
    Cubos:
    420.00
    Nick:
    Smoking4i20/zMateus1
    Clan:
    Rush2Win
    #10 zMateus1111, 17 Janeiro 2017
    De espadas tem na modpack upando com o l0k0

    Enviado de meu IPhone7 pistola usando cubador automático
     
  11. Fernando Silva

    Fernando Silva Excelente
    VIP

    Afiliado:
    27 Outubro 2016
    Mensagens:
    3,110
    Curtidas Recebidas:
    376
    Curtiu:
    392
    Localização:
    Não sei ;-;
    Cubos:
    244.00
    Nick:
    zPlayerNoobz
    Clan:
    <TDS>
    #11 Fernando Silva, 17 Janeiro 2017
    Belo macro
     
    SrZaK curtiu isso.
Status do Tópico:
Não esta aberto para novas mensagens.