Aos que entendem de programação de plantão!

Discussão em 'Botecolandia' iniciado por GuiRoess, 19 Maio 2015.

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

    GuiRoess Neutro
    VIP

    Afiliado:
    10 Novembro 2014
    Mensagens:
    203
    Curtidas Recebidas:
    36
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    243.00
    Nick:
    GuiRoess
    Ola, estou querendo aumentar o numero de baus que ele guarda: Macro cava-cava do MrBlueees


    $${

    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?);
    PROMPT(#pa,$$i, Que tipo de pá irá ser usada?);
    PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá?);
    PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá?);
    PROMPT(#del,$$?, Qual delay para verificar o Inventário? Recomendado: 140 - 250);
    PROMPT(#vel,$$?, Qual delay para quebrar os blocos? 1 = rápido | acima de 1 = diminuir a velociade);


    #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(1);
    gui();

    if(%#repq%=0);

    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;

    endif;endif;

    endif;

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


    if(cav2);
    gui(inventory);
    wait(1);
    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;}$$



    $${

    wait(5);
    key(use);
    wait(1);


    for(#slotn,54,89);
    GETSLOTITEM(%#slotn%,#id,#stack);
    if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
    else;
    slotclick(%#slotn%,l,true);wait(30ms);
    endif;
    next;
    wait(500ms);
    getslotitem(53,#id,#stack);
    wait(500ms);
    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;
    }$$



    no caso vou pegar essa parte

    $${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;}$$




    e fazer isso?

    $${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;}$$


    assim adiante???

     
  2. Lincoln Fernandes

    Banido

    Afiliado:
    23 Agosto 2014
    Mensagens:
    571
    Curtidas Recebidas:
    37
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    650.00
    Nick:
    @Fernandes16
    Clan:
    BoD
    vish, não sei como fazer :/
    Manda MP pra alguem que manje de macro
     
  3. Crodi

    Crodi Neutro
    VIP

    Afiliado:
    29 Dezembro 2014
    Mensagens:
    140
    Curtidas Recebidas:
    31
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    278.00
    Nick:
    Crodao
    esta correto, mas vc também deverá alterar outra linha mais abaixo:

    (...)

    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);

    (...)

    Troque o número 11 pelo numero total de baus usados +1.
    Por exemplo, se for for usar 13 baús esta linha deve ficar assim:
    if(%#bau%=14);


    Ou se for for usar 100 baús esta linha deve ficar assim:
    if(%#bau%=101);

    Sacou?
     
    MrBlueees curtiu isso.
  4. MrManxD

    MrManxD Neutro

    Afiliado:
    3 Abril 2015
    Mensagens:
    178
    Curtidas Recebidas:
    16
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    205.00
    Nick:
    zitadam2016
    Clan:
    n
    Vish n sei de plantão , so sei de plantinha =p kkk
     
  5. Yhtrw

    Yhtrw Excelente
    VIP

    Afiliado:
    9 Julho 2014
    Mensagens:
    3,742
    Curtidas Recebidas:
    246
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    2,254.00
    Nick:
    Loghii
    Como ele disse:

    Cara não sei o do mrbluees mas no do phodalao tem uma hora que se tem muitos baus buga (ele não guarda mais).. Pelo menos no meu..
     
  6. Fernando123

    Fernando123 Craftlandiano
    VIP

    Afiliado:
    12 Janeiro 2013
    Mensagens:
    8,561
    Curtidas Recebidas:
    864
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Paraná
    Cubos:
    1,652.00
    Nick:
    Sparr0w
    Clan:
    FPR
    Caso os de cima não derem certo, fale com o Homeless :p
     
  7. GuiRoess

    GuiRoess Neutro
    VIP

    Afiliado:
    10 Novembro 2014
    Mensagens:
    203
    Curtidas Recebidas:
    36
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    243.00
    Nick:
    GuiRoess
    Muito obrigado :D

    hauhuasuhhasuuhash

    Valeu valeu, vou fazer testes aqui, queria aumentar só mais 10
     
  8. jex

    jex Neutro
    VIP

    Afiliado:
    14 Dezembro 2014
    Mensagens:
    580
    Curtidas Recebidas:
    28
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    UmLugarAe
    Cubos:
    623.00
    Nick:
    Jex__
    Clan:
    HuE - TheHuE
     
  9. YurinSARREII

    YurinSARREII Craftlandiano
    VIP

    Afiliado:
    7 Novembro 2014
    Mensagens:
    3,455
    Curtidas Recebidas:
    597
    Curtiu:
    617
    Sexo:
    Masculino
    Cubos:
    957.00
    Nick:
    YurinSARREI
    Clan:
    THS | LtM
     
  10. snak

    snak Craftlandiano
    VIP

    Afiliado:
    18 Janeiro 2014
    Mensagens:
    5,735
    Curtidas Recebidas:
    873
    Curtiu:
    706
    Sexo:
    Masculino
    Localização:
    Fortaleza-CE
    Cubos:
    95.00
    Nick:
    2snak2
    Clan:
    EFS
    Sim, não tem como ser mais claro.
     
  11. Burgess

    Burgess Craftlandiano
    VIP

    Afiliado:
    24 Maio 2014
    Mensagens:
    7,159
    Curtidas Recebidas:
    1,568
    Curtiu:
    971
    Sexo:
    Masculino
    Localização:
    Minas Gerais
    Cubos:
    1,403.00
    Nick:
    iSmooph
    Clan:
    GoD
    Creio que com muitos baus nesta macro , ocorrá o risco de ocorrer algum bug , o certo seria você tentar entrar em contanto com o criador da macro para ver o que ele pode fazer ou tente falar com o Homeless , talvez de certo :D
     
  12. MatheusK1NG

    VIP

    Afiliado:
    2 Maio 2015
    Mensagens:
    3,754
    Curtidas Recebidas:
    148
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    780.00
    Nick:
    iDarkSlayerZ
    Clan:
    TzT - TeazForT
     
  13. Karate

    Karate Mito
    VIP

    Afiliado:
    1 Dezembro 2013
    Mensagens:
    25,040
    Curtidas Recebidas:
    7,465
    Curtiu:
    6,226
    Cubos:
    293.00
    Nick:
    '
    vish nem posso te ajudar ;-; a cl ta em falta de programadores
     
  14. Crodi

    Crodi Neutro
    VIP

    Afiliado:
    29 Dezembro 2014
    Mensagens:
    140
    Curtidas Recebidas:
    31
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    278.00
    Nick:
    Crodao
    Vai fundo que isso funciona com muitos sim. Eu manjo macro. :)
     
  15. Santoodraoboy

    Santoodraoboy Excelente
    VIP

    Afiliado:
    8 Dezembro 2012
    Mensagens:
    4,304
    Curtidas Recebidas:
    429
    Curtiu:
    566
    Sexo:
    Masculino
    Localização:
    Fortaleza -...
    Cubos:
    1,464.00
    Nick:
    Xertzy
    Seu problema, já parece esta resolvido....
     
  16. Victor_Lucas

    VIP

    Afiliado:
    2 Dezembro 2013
    Mensagens:
    1,482
    Curtidas Recebidas:
    120
    Curtiu:
    91
    Sexo:
    Masculino
    Localização:
    Pindamonhangaba
    Cubos:
    1,575.00
    Nick:
    Victor_Lucas
    Facebook:
    victor.lucasgoncalves
    Skype:
    victor_hahahaidiota
    Vou tentar aprender a fazer macro
     
  17. Crodi

    Crodi Neutro
    VIP

    Afiliado:
    29 Dezembro 2014
    Mensagens:
    140
    Curtidas Recebidas:
    31
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    278.00
    Nick:
    Crodao
    Vai fundo! Se há algo na craftlandia que possa lhe ser útil no futuro esse algo é programar!
    Não sei porque tiraram a seção de macro do fórum.... Dava gosto ver a mulekada falando sobre programação....
     
Status do Tópico:
Não esta aberto para novas mensagens.