ENTREGUE [Macro] Plant de Cacto automática v2.0 [NAO VIP]

Discussão em 'Macro Entregue' iniciado por Eperson, 19 Dezembro 2013.

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

    Eperson Excelente
    VIP

    Afiliado:
    22 Setembro 2012
    Mensagens:
    263
    Curtidas Recebidas:
    357
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Vila Bluftbluza
    Cubos:
    1,067.00
    Nick:
    Inglad
    O que faz:

    Esse macro constrói uma plantação automática de cacto sem utilizar o /mc, possibilitando assim os VIP's e os não vips utilizarem o macro, muito pedido por alguns amigos cujo o VIP acabou.

    Código:

    $${
    if(cacto);
    log(&9Andares feitos: &a%#feitos%);
    unset(cacto);
    keyup(sneak);
    keyup(forward);
    keyup(left);
    keyup(right);
    keyup(back);
    keyup(jump);
    LOG("&8%PLAYER% &bCacto &4[Off]");
    stop;
    else;
    #feitos=0;
    set(cacto);
    LOG("&8%PLAYER% &bCacto &a[On]");
    prompt(#andares,$$?,Quantos andares?);
    do(%#andares%);
    pick(3);
    look(,90);
    keydown(jump);
    wait(200ms);
    key(use);
    keyup(jump);
    wait(200ms);
    pick(3);
    look(90,80);
    keydown(back);
    keydown(sneak);
    wait(1500ms);
    keyup(back);
    wait(100ms);
    keyup(sneak);
    key(use);
    wait(100ms);

    pick(3);
    look(270,80);
    keydown(back);
    keydown(sneak);
    wait(1500ms);
    keyup(back);
    wait(100ms);
    keyup(sneak);
    key(use);
    wait(100ms);

    #posx=%XPOS%;
    #posz=%ZPOS%;
    do;
    look(180,80);
    keydown(right);
    until(%XPOS%=%#posx%-1);
    keyup(right);

    wait(10ms);
    pick(3);
    look(180,80);
    keydown(back);
    keydown(sneak);
    wait(1500ms);
    keyup(back);
    wait(100ms);
    keyup(sneak);
    key(use);
    wait(100ms);

    pick(3);
    look(360,80);
    keydown(back);
    keydown(sneak);
    wait(1500ms);
    keyup(back);
    wait(100ms);
    keyup(sneak);
    key(use);
    wait(100ms);

    #posx=%XPOS%;
    #posz=%ZPOS%;
    do;
    look(0,80);
    keydown(forward);
    until(%ZPOS%=%#posz%-1);
    keyup(forward);
    wait(100ms);
    //areia
    look(0,90);
    pick(12);
    look(,90);
    keydown(jump);
    wait(200ms);
    key(use);
    keyup(jump);
    wait(200ms);

    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=3);
    keyup(forward);
    wait(1ms);
    pick(12);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    look(270,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=3);
    keyup(forward);
    wait(1ms);
    pick(12);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    look(90,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=3);
    keyup(forward);
    wait(1ms);
    pick(12);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    pick(12);
    look(180,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=3);
    keyup(forward);
    wait(1ms);
    pick(12);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(back);
    keyup(sneak);
    look(0,90);
    pick(3);
    #py=%YPOS%;
    do;
    pick(3);
    keydown(jump);
    key(use);
    until(%YPOS%=%#py%+2);
    keyup(jump);
    wait(1ms);
    keydown(sneak);
    look(,90);
    keydown(back);
    wait(2);
    keyup(back);
    wait(250ms);
    keyup(sneak);
    wait(500ms);
    look(360,84);
    pick(277);
    wait(15ms);
    do;
    key(attack);
    until(%HITID%!=3);
    wait(1);
    #posz=%ZPOS%;
    do;
    look(0,90);
    keydown(forward);
    until(%ZPOS%=%#posz%-1);
    keyup(forward);
    wait(200ms);
    look(0,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=12);
    keyup(forward);
    pick(81);
    wait(1ms);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    look(270,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=12);
    keyup(forward);
    pick(81);
    wait(1ms);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    look(90,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=12);
    keyup(forward);
    pick(81);
    wait(1ms);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    wait(1ms);
    look(180,70);
    pick(81);
    #cont=0;
    do;
    look(,75);
    keydown(sneak);
    keydown(forward);
    INC(#cont);
    until(%HITID%=12);
    keyup(forward);
    pick(81);
    wait(1ms);
    key(use);
    wait(200ms);
    do(%#cont%);
    keydown(sneak);
    keydown(back);
    loop;
    keyup(sneak);
    keyup(back);
    gui(inventory);
    pick(3);
    if(%STACKSIZE%<9);
    for(#i,9,35);
    getslotitem(%#i%,#id);
    if(%#id%=3);
    slotclick(%#i%,l,true);
    wait(75ms);
    endif;
    next;
    endif;
    pick(12);
    if(%STACKSIZE%<9);
    for(#i,9,35);
    getslotitem(%#i%,#id);
    if(%#id%=12);
    slotclick(%#i%,l,true);
    wait(75ms);
    endif;
    next;
    endif;
    pick(81);
    if(%STACKSIZE%<9);
    for(#i,9,35);
    getslotitem(%#i%,#id);
    if(%#id%=81);
    slotclick(%#i%,l,true);
    wait(75ms);
    endif;
    next;
    endif;
    gui();
    LOG(&aAndar concluido.);
    INC(#feitos);
    LOG(&9Andares: &f%#feitos%/%#andares%);
    loop;
    LOG(&aTodos os andares foram concluídos. Fim da macro.);
    endif;
    }$$

    Inventário:

    [​IMG]

    Vídeo demonstração:

    OBS: Quando seu FPS fica muito baixo ou o server com lag poderá causar perda de itens, portanto, não construa com itens muito valiosos.

    [youtube]http://www.youtube.com/watch?v=xUtbxlKt3eE[/youtube]


    Bem, é isso.
     
    modstony, xKlez, Nah e 145 outras curtiram isso.
  2. lucasescosteguy

    lucasescosteguy Craftlandiano
    VIP

    Afiliado:
    25 Julho 2013
    Mensagens:
    6,049
    Curtidas Recebidas:
    1,081
    Curtiu:
    651
    Sexo:
    Masculino
    Cubos:
    514.00
    Nick:
    -
    te amo, partiu deixa 10 fale construindo plant huehuehue
     
    xlyz, Shag, VinixxTW e 10 outras curtiram isso.
  3. ScottRobinn

    ScottRobinn Neutro
    VIP

    Afiliado:
    9 Julho 2012
    Mensagens:
    160
    Curtidas Recebidas:
    42
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Espírito Santo
    Cubos:
    302.00
    Nick:
    ScottRobinn
    #3 ScottRobinn, 19 Dezembro 2013
    Última edição: 5 Dezembro 2018
    .
     
    xlyz, Snoppe, VinixxTW e 1 outra pessoa curtiram isso.
  4. Richard Loretto

    Richard Loretto Razoavel
    Banido

    Afiliado:
    15 Novembro 2013
    Mensagens:
    210
    Curtidas Recebidas:
    84
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Caverna do...
    Cubos:
    484.00
    Nick:
    Ruca_11
    Facebook:
    Richard Loretto
    Skype:
    richard loretto(Ruca_11)
    Twitter:
    @meucabelopvcs
  5. xKlez

    xKlez Hardcore
    VIP

    Afiliado:
    6 Agosto 2012
    Mensagens:
    5,508
    Curtidas Recebidas:
    3,004
    Curtiu:
    453
    Sexo:
    Masculino
    Localização:
    CraftLandia
    Cubos:
    908.00
    Nick:
    xKlez
    Ótimo.
     
    zPrassaTemp0, iKeepCooler e xlyz curtiram isso.
  6. otaviocng

    Cubos:
    Booa ;3
     
    xlyz, bablifas e KenjiErick curtiram isso.
  7. GalaxiusBR

    GalaxiusBR Razoavel

    Afiliado:
    15 Agosto 2013
    Mensagens:
    202
    Curtidas Recebidas:
    83
    Curtiu:
    0
    Cubos:
    317.00
    Nick:
    GalaxiusBR
    Opá,valeu !
     
    xlyz e KenjiErick curtiram isso.
  8. MarceloFN

    MarceloFN Neutro
    VIP

    Afiliado:
    18 Janeiro 2012
    Mensagens:
    107
    Curtidas Recebidas:
    27
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    186.00
    Nick:
    MarceloStronda
    Skype:
    marcelo71871
  9. yPedroGodoi

    yPedroGodoi Neutro

    Afiliado:
    19 Dezembro 2013
    Mensagens:
    65
    Curtidas Recebidas:
    6
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Rio de Janeiro
    Cubos:
    101.00
    Nick:
    PedroGodoi
    Twitter:
    /PedroGodoi2
    Parabens , muito bom !
    Vou usar :)
     
    xlyz, Tigrinho e KenjiErick curtiram isso.
  10. Eperson

    Eperson Excelente
    VIP

    Afiliado:
    22 Setembro 2012
    Mensagens:
    263
    Curtidas Recebidas:
    357
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Vila Bluftbluza
    Cubos:
    1,067.00
    Nick:
    Inglad
    Obrigado

    Sim, ele puxa quando a quantidade estiver baixa.

    Ah valeu :D

    Obrigado. :)

    Nada. :)

    Obrigado :)

    Valeu!
     
    xlyz e Luana1000 curtiram isso.
  11. Gudwell

    Gudwell Razoavel
    Banido

    Afiliado:
    14 Outubro 2013
    Mensagens:
    314
    Curtidas Recebidas:
    60
    Curtiu:
    0
    Cubos:
    392.00
    Nick:
    Gudwell
    Ingland o problema que quando vc da alt tab na hora que quebrar bloco ele n quebra
     
  12. Eperson

    Eperson Excelente
    VIP

    Afiliado:
    22 Setembro 2012
    Mensagens:
    263
    Curtidas Recebidas:
    357
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Vila Bluftbluza
    Cubos:
    1,067.00
    Nick:
    Inglad
    Por isso é necessário utilizar um pá que quebre com um Hit pra usar em segundo plano. Pá de diamante.
     
  13. Matheus DalPra

    VIP

    Afiliado:
    6 Julho 2013
    Mensagens:
    770
    Curtidas Recebidas:
    158
    Curtiu:
    0
    Cubos:
    1,092.00
    Nick:
    Flosch7002
    Meu Deus, macro épica. *-*
     
  14. Douglas Eichenberger

    VIP

    Afiliado:
    18 Setembro 2013
    Mensagens:
    475
    Curtidas Recebidas:
    103
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    843.00
    Nick:
    DouglasTocas
    Facebook:
    https://www.facebook.com/douglas.eichenberger
    Skype:
    Douglas_Tocas
    manow se mo foda like dnv!
     
  15. curiati111

    curiati111 Excelente
    VIP

    Afiliado:
    1 Julho 2012
    Mensagens:
    1,639
    Curtidas Recebidas:
    203
    Curtiu:
    307
    Sexo:
    Masculino
    Localização:
    Sao paulo
    Cubos:
    168.00
    Nick:
    curiati111
    Skype:
    fe.curiati
    Muito bom cara
    @EDIT:Morri umas 3 vezes com ele :s
     
  16. sasukegoiano

    sasukegoiano Excelente
    VIP

    Afiliado:
    18 Setembro 2013
    Mensagens:
    393
    Curtidas Recebidas:
    219
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    goiania
    Cubos:
    695.00
    Nick:
    goninja12
    Clan:
    QUB
  17. Gabo0305

    Gabo0305 Neutro
    VIP

    Afiliado:
    15 Abril 2013
    Mensagens:
    108
    Curtidas Recebidas:
    23
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Pelotas, RS
    Cubos:
    139.00
    Nick:
    Gabo0305
    Skype:
    gabriel.xavante
    Amigo, na hora de quebrar a terra, no classic tem bug, pq ela bate mt pouco tempo para pás não-encantadas, tem como ajeitar e me manda outro código com ela batendo mais tempo? Muito obrigado, macro muito bom UP
     
    joeykovar curtiu isso.
  18. Maathz

    Maathz Neutro
    VIP

    Afiliado:
    4 Outubro 2012
    Mensagens:
    479
    Curtidas Recebidas:
    39
    Curtiu:
    370
    Sexo:
    Masculino
    Localização:
    Por ae
    Cubos:
    489.66
    Nick:
    xMaathz_
  19. Eperson

    Eperson Excelente
    VIP

    Afiliado:
    22 Setembro 2012
    Mensagens:
    263
    Curtidas Recebidas:
    357
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Vila Bluftbluza
    Cubos:
    1,067.00
    Nick:
    Inglad
    Não deixe em segundo plano, e vai funcionar, não consigo faze-lo quebrar blocos em segundo plano se não for pá Eficiência 5.
     
    henrique0313 curtiu isso.
  20. Eperson

    Eperson Excelente
    VIP

    Afiliado:
    22 Setembro 2012
    Mensagens:
    263
    Curtidas Recebidas:
    357
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Vila Bluftbluza
    Cubos:
    1,067.00
    Nick:
    Inglad
    O servidor travou? Seu FPS estava baixo? Que erro ocorreu?
     
    henrique0313 curtiu isso.
Status do Tópico:
Não esta aberto para novas mensagens.