ENTREGUE [Macro/Teste] AutoMine

Discussão em 'Macro Entregue' iniciado por Phodalao, 23 Abril 2014.

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

    Phodalao Lendário
    VIP

    Afiliado:
    14 Janeiro 2013
    Mensagens:
    3,933
    Curtidas Recebidas:
    5,101
    Curtiu:
    649
    Cubos:
    2,466.00
    Nick:
    Phodalao
    Como falei no titulo, é um macro teste, então pode ser que ele de errado em algum momento, mas não fique com medo de testar, ele já foi testado milhares de vezes,
    mas tudo pode acontecer, então ainda está na fase de testes, ele ta muito bagunçando, muitas anotações, mas como dito é um TESTE!

    Então, eu vou deixar um macro de Auto Disconnect, caso aconteça alguma coisa você vai ser desconectado, mas esse macro você vai usar separado do AutoMine.
    Este macro tem um sistema de pontos, você pode adicionar uma label assim com o nome "ph1" que vai aparecer na sua tela.

    Tutorial (SIMPLES)
    Primeiro cave um buraco (onde você vai minerar), se você for reparar a picareta, coloque um bloco de ferro em baixo de você, bem onde você vai começar.
    Se você não for reparar a picareta, não precisa por o bloco de ferro em baixo, e o macor não vai sertar a "/home bau" nem a "/home voltar".

    O Macro usa 3 homes:
    /home bau (Essa sempre ele vai usar)
    /home voltar (Se você for reparar a picareta ele vai usar)
    /home mina (Essa sempre ele vai usar)

    Se você abrir o inventário o macro vai parar de clicar, então você precisa dar um click no seu Mouse para que ele volte a quebrar os blocos...

    Local e Inventário se você for reparar a picareta:
    [​IMG]
    Local e Inventário se você não for reparar a picareta:
    [​IMG]

    Como eu estou sem internet em casa, o tópico sera atualizado em breve...

    Auto Disconnect:
    $${
    if(vida);
    log("&cAuto Disconnect &4Desligado");
    unset(vida);stop;else;
    log("&cAuto Disconnect &aLigado");
    set(vida);
    do;
    if(%HEALTH%<18);
    DISCONNECT;
    endif;
    loop;
    endif;
    }$$

    AutoMine (PMine):
    $${
    if(beta);
    keyup(forward);
    keyup(sneak);
    setlabel(ph1," ",ph1);
    log("&d» &cMacro &ePMine &cDesligado");
    log("&d» &cUm total de &e%#blocos% &cblocos Mineados");
    log("&d» &cSeu nivel no &ePMine &cé &e%@#nivel%");unset(beta);unset(beta);stop;else;set(beta);
    #dur=;slot(1);#pick=%ITEM%;
    if(%#pick%=0);log("&d» &cNenhuma Picareta foi encontrada no SLOT 1");unset(beta);stop;endif;
    if(%#pick%=257);#dur=18;endif;
    if(%#pick%=270);#dur=18;endif;
    if(%#pick%=278);#dur=80;endif;
    if(%#pick%=274);#dur=18;endif;
    #phdl=1;
    #tempo=;#b=;#k1=1;#k2=2;#k3=3;#k4=4;#k5=5;
    &per1=Sou VIP,Nao Sou VIP;
    &per2=Vou Reparar a Picareta, Vou usar a Proxima SLOT 2;
    PROMPT(&a,$$[ [%&per1%]]);
    ifmatches(%&a%,sou vip);
    #tempo=10;endif;
    ifmatches(%&a%,nao sou vip);
    #tempo=18;endif;
    PROMPT(&a,$$[ [%&per2%]]);
    ifmatches(%&a%,vou reparar a picareta);
    #b=2;endif;
    ifmatches(%&a%,vou usar a proxima slot 2);
    #b=1;endif;#bau=0#c=80;#a=62;
    &ladoe=east;
    }$$/sethome bau$${
    wait(1ms);
    }$$/sethome mina$${
    wait(200ms);
    #voltara=%XPOS%;#vltd=%XPOS%;
    #voltarb=%YPOS%;#vlte=%YPOS%;
    #voltarc=%ZPOS%;#vltf=%ZPOS%;
    #lava=0;#agua=0;#cascalho=0;#seg=0;
    #segurodir=0;#seguroesquer=0;#blocos=;#slot=1;
    if(%#b%=2);GETIDREL(0,-1,0,#ironblock,);if(%#ironblock%!=42);
    log("&d» &cVoce precisa por um bloco de &fFerro &cno seu pe");unset(beta);stop;endif;endif;
    log("&d» &cMinerando");
    do;
    //CONTADOR
    if(%@#arch% > %@#phodalao%);
    inc(@#nivel,1);
    log(" ");
    log(&e VOCE MINEROU +&a%#blocos% BLOCOS);
    log(" ");
    ACHIEVEMENTGET(PMine Nivel: %@#nivel%,278);
    dec(@#arch,%@#phodalao%);
    inc(@#phodalao,20);
    setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);endif;
    //PARTE SIMPLES, VERIFICAR DURABILIDADE E SE O INVENTARIO ESTA CHEIO
    if((%DURABILITY%<%#dur%)&&(%#b%=1));
    do;wait(1);
    inc(#slot,1);wait(200ms);slot(%#slot%);wait(200ms);
    until(%DURABILITY%>%#dur%);
    endif;

    if((%DURABILITY%<%#dur%)&&(%#b%=2));
    #vlta=%XPOS%;
    #vltb=%YPOS%;
    #vltc=%ZPOS%;
    wait(100ms);}$$/sethome voltar$${wait(300ms);
    }$$/home bau$${
    ECHO(/tp %#vltd% %#vlte% %#vltf%);
    wait(%#tempo%);
    do;
    look(south);
    look(,90);
    wait(500ms);key(use);
    until(%DURABILITY%>%#dur%);
    wait(100ms);}$$/home voltar$${
    ECHO(/tp %#vlta% %#vltb% %#vltc%);
    wait(%#tempo%);
    endif;
    if(%#slot%=10);log("&d» &cSuas Picaretas Acabaram");unset(beta);stop;endif;
    //#### VERIFICAR A FRENTE NO CHÃO ####
    //MEIO EM BAIXO DO PE
    GETIDREL(0,-1,+4,#seguro,);
    GETIDREL(0,-1,+5,#seguro1,);
    GETIDREL(0,-1,+6,#seguro2,);
    GETIDREL(0,-1,+7,#seguro3,);
    GETIDREL(0,-1,+8,#seguro4,);

    //MEIO EM BAIXO DO PE
    GETIDREL(0,-1,+2,#pe9,);GETIDREL(0,-1,+3,#pe10,);GETIDREL(0,-1,+4,#pe11,);
    //MEIO PERNA
    GETIDREL(0,0,+2,#pe1,);GETIDREL(0,0,+3,#pe2,);GETIDREL(0,0,+4,#pe3,);GETIDREL(0,0,+5,#pe4,);

    //MEIO CABECA
    GETIDREL(0,+1,+2,#pe5,);GETIDREL(0,+1,+3,#pe6,);GETIDREL(0,+1,+4,#pe7,);GETIDREL(0,+1,+5,#pe8,);

    //MEIO EM CIMA DA CABECA
    GETIDREL(0,+2,+2,#ca1,);GETIDREL(0,+2,+3,#ca2,);GETIDREL(0,+2,+4,#ca3,);GETIDREL(0,+2,+5,#ca4,);

    //ESQUERDA
    GETIDREL(+1,+2,0,#vr1,);
    GETIDREL(1,0,+2,#pes1,);GETIDREL(1,0,+3,#pes2,);GETIDREL(1,0,+4,#pes3,);GETIDREL(1,0,+5,#pes4,);
    GETIDREL(1,+1,+2,#pes5,);GETIDREL(1,+1,+3,#pes6,);GETIDREL(1,+1,+4,#pes7,);GETIDREL(1,+1,+5,#pes8,);

    //ESQUERDA 2
    GETIDREL(2,0,+2,#pess1,);GETIDREL(2,0,+3,#pess2,);GETIDREL(2,0,+4,#pess3,);GETIDREL(2,0,+5,#pess4,);
    GETIDREL(2,+1,+2,#pess5,);GETIDREL(2,+1,+3,#pess6,);GETIDREL(2,+1,+4,#pess7,);GETIDREL(2,+1,+5,#pess8,);
    GETIDREL(1,+2,+2,#kes1,);GETIDREL(1,+2,+3,#kes2,);GETIDREL(1,+2,+4,#kes3,);GETIDREL(1,+2,+5,#kes4,);

    //DIREITA
    GETIDREL(-1,0,+2,#pdi1,);GETIDREL(-1,0,+3,#pdi2,);GETIDREL(-1,0,+4,#pdi3,);
    GETIDREL(-1,0,+5,#pdi4,);GETIDREL(-1,+1,+2,#pdi5,);GETIDREL(-1,+1,+3,#pdi6,);
    GETIDREL(-1,+1,+4,#pdi7,);GETIDREL(-1,+1,+5,#pdi8,);

    //DIREITA 2
    GETIDREL(-2,0,+2,#pdii1,);GETIDREL(-2,0,+3,#pdii2,);GETIDREL(-2,0,+4,#pdii3,);GETIDREL(-2,0,+5,#pdii4,);
    GETIDREL(-2,+1,+2,#pdii5,);GETIDREL(-2,+1,+3,#pdii6,);GETIDREL(-2,+1,+4,#pdii7,);GETIDREL(-2,+1,+5,#pdii8,);
    GETIDREL(-1,+2,+2,#kdi1,);GETIDREL(-1,+2,+3,#kdi2,);GETIDREL(-1,+2,+4,#kdi3,);GETIDREL(-1,+2,+5,#kdi4,);

    // VERIFICAR SE TEM ALGUM BURACO, AGUA, OU LAVA NA SUA FRENTE
    //VERIFICANDO NO MEIO
    if((%#vr1%=11)|(%#vr1%=13)|(%#vr1%=9));inc(#seg,1);log("&d» &cLava Encontrada");inc(#lava,1);endif;
    if((%#pe9%=11)|(%#pe10%=11)|(%#pe11%=11)|(%#pe9%=9)|(%#pe10%=9)|(%#pe11%=9));inc(#lava,1);log("&d» &cLava Encontrada");
    endif;
    if((%#pe1%=11)|(%#pe2%=11)|(%#pe3%=11)|(%#pe4%=11)|(%#pe5%=11)|(%#pe6%=11)||(%#pe7%=11)|(%#pe8%=11));inc(#agua,1);
    log("&d» &cAgua Encontrada");endif;
    if((%#ca1%=13)|(%#ca2%=13)|(%#ca3%=13)|(%#ca4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#ca1%=9)|(%#ca2%=9)|(%#ca3%=9)|(%#ca4%=9));inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#ca1%=11)|(%#ca2%=11)|(%#ca3%=11)|(%#ca4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pe1%=11)|(%#pe2%=11)|(%#pe3%=11)|(%#pe4%=11)|(%#pe5%=11)|(%#pe6%=11)||(%#pe7%=11)|(%#pe8%=11));inc(#lava,1);
    log("&d» &cLava Encontrada");endif;
    if((%#seguro%=0)|(%#seguro1%=0)|(%#seguro2%=0)|(%#seguro3%=0)|(%#seguro4%=0));inc(#seg,1);
    log("&d» &cBuraco Encontrado");endif;

    //VERIFICANDO BLOCO DA ESQUERDA
    if((%#pes1%=9)|(%#pes2%=9)|(%#pes3%=9)|(%#pes4%=9)|(%#pes5%=9)|(%#pes6%=9)|(%#pes7%=9)|(%#pes8%=9));
    log("&d» &cAgua Encontrada");inc(#agua,1);endif;
    if((%#kes1%=13)|(%#kes2%=13)|(%#kes3%=13)|(%#kes4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#pes1%=9)|(%#pes2%=9)|(%#pes3%=9)|(%#pes4%=9)|(%#pes5%=9)|(%#pes6%=9)|(%#pes7%=9)|(%#pes8%=9);
    inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#kes1%=11)|(%#kes2%=11)|(%#kes3%=11)|(%#kes4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pes1%=11)|(%#pes2%=11)|(%#pes3%=11)|(%#pes4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;

    //VERIFICANDO BLOCO DA DIREITA
    if((%#pdi1%=9)|(%#pdi2%=9)|(%#pdi3%=9)|(%#pdi4%=9)|(%#pdi5%=9)|(%#pdi6%=9)|(%#pdi7%=9)|(%#pdi8%=9));
    log("&d» &cAgua Encontrada");inc(#agua,1);endif;
    if((%#kdi1%=13)|(%#kdi2%=13)|(%#kdi3%=13)|(%#kdi4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#pdi1%=9)|(%#pdi2%=9)|(%#pdi3%=9)|(%#pdi4%=9)|(%#pdi5%=9)|(%#pdi6%=9)|(%#pdi7%=9)|(%#pdi8%=9));
    inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#kdi1%=11)|(%#kdi2%=11)|(%#kdi3%=11)|(%#kdi4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pdi1%=11)|(%#pdi2%=11)|(%#pdi3%=11)|(%#pdi4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;

    //VERIFICANDO O SEGUNDO BLOCO DA ESQUERDA
    if((%#pess1%=9)|(%#pess2%=9)|(%#pess3%=9)|(%#pess4%=9)|(%#pess5%=9)|(%#pess6%=9)|(%#pess7%=9)|(%#pess8%=9));
    log("&d» &cAgua Encontrada");inc(#agua,1);endif;
    if((%#kesa1%=13)|(%#kesa2%=13)|(%#kesa3%=13)|(%#kesa4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#pess1%=9)|(%#pess2%=9)|(%#pess3%=9)|(%#pess4%=9)|(%#pess5%=9)|(%#pess6%=9)|(%#pess7%=9)|(%#pess8%=9);
    inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#kesa1%=11)|(%#kesa2%=11)|(%#kesa3%=11)|(%#kesa4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pess1%=11)|(%#pess2%=11)|(%#pess3%=11)|(%#pess4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;

    //VERIFICANDO O SEGUNDO BLOCO DA DIREITA
    if((%#pdii1%=9)|(%#pdii2%=9)|(%#pdii3%=9)|(%#pdii4%=9)|(%#pdii5%=9)|(%#pdii6%=9)|(%#pdii7%=9)|(%#pdii8%=9));
    log("&d» &cAgua Encontrada");inc(#agua,1);endif;
    if((%#kdia1%=13)|(%#kdia2%=13)|(%#kdia3%=13)|(%#kdia4%=13));inc(#cascalho,1);
    log("&d» &cCascalho Encontrado");endif;
    if((%#pdii1%=9)|(%#pdii2%=9)|(%#pdii3%=9)|(%#pdii4%=9)|(%#pdii5%=9)|(%#pdii6%=9)|(%#pdii7%=9)|(%#pdii8%=9));
    inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#kdia1%=11)|(%#kdia2%=11)|(%#kdia3%=11)|(%#kdia4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pdii1%=11)|(%#pdii2%=11)|(%#pdii3%=11)|(%#pdii4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;

    //VERIFICAR SE ALGUM BURACO, CASCALHO, AGUA OU LAVA FOI ENCONTRADO A SUA VOLTA
    if((%#agua%>0)|(%#lava%>0)|(%#cascalho%>0)|(%#seg%>0));

    //SE ALGUM DELES FOI ENCONTRADO VOLTAR PARA O COMEÇO
    dec(#agua,%#agua%);dec(#lava,%#lava%);dec(#cascalho,%#cascalho%);dec(#seg,%#seg%);
    }$$/home mina$${
    ECHO(/tp %#voltara% %#voltarb% %#voltarc%);
    wait(%#tempo%);
    //SE TIVER ALGUM BLOCO IR PARA O LADO ESQUERDO MAS ANTES VERIFICAR TUDO
    wait(1);look(%&ladoe%);

    //VERIFICANDO BLOCOS EM VOLTA DO LADO ESQUERDO
    GETIDREL(%#k2%,0,-1,#ph,);GETIDREL(%#k3%,0,-1,#ph2,);GETIDREL(%#k3%,0,-1,#ph3,);
    GETIDREL(%#k2%,0,0,#pe1,);GETIDREL(%#k3%,0,0,#pe2,);GETIDREL(%#k3%,0,0,#pe3,);GETIDREL(%#k5%,0,0,#pe4,);
    GETIDREL(%#k2%,-1,0,#pe5,);GETIDREL(%#k3%,-1,0,#pe6,);GETIDREL(%#k2%,+2,0,#ca1,);GETIDREL(%#k3%,+2,0,#ca2,);
    GETIDREL(%#k3%,+2,0,#ca3,);GETIDREL(%#k5%,+2,0,#ca4,);GETIDREL(%#k2%,-1,0,#seguro,);GETIDREL(%#k3%,-1,0,#seguro1,);
    GETIDREL(%#k3%,-1,0,#seguro2,);GETIDREL(%#k5%,-1,0,#seguro3,);GETIDREL(%#k1%,-1,1,#oa,);

    //VERIFICANDO SE TEM ALGUM OBSTACULO DO LADO ESQUERDO
    if((%#ph%=11)|(%#ph2%=11)|(%#ph3%=11)|(%#ph%=9)|(%#ph2%=9)|(%#ph3%=9));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pe5%=9)|(%#pe6%=9)|(%#pe5%=11)|(%#pe6%=11));inc(#lava,1);inc(#agua,1);log("&d» &cLava Encontrada");endif;
    if((%#pe1%=9)|(%#pe2%=9)|(%#pe3%=9)|(%#pe4%=9));inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#ca1%=13)|(%#ca2%=13)|(%#ca3%=13)|(%#ca4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#ca1%=9)|(%#ca2%=9)|(%#ca3%=9)|(%#ca4%=9));inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#ca1%=11)|(%#ca2%=11)|(%#ca3%=11)|(%#ca4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#pe1%=11)|(%#pe2%=11)|(%#pe3%=11)|(%#pe4%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#seguro%=0)|%#seguro1%=0)|%#seguro2%=0)|%#seguro3%=0));log("&d» &cBuraco Encontrado");inc(#seg,1);endif;
    if((%#seguro%=11)|%#seguro1%=11)|%#seguro2%=11)|%#seguro3%=11));inc(#lava,1);log("&d» &cLava Encontrada");endif;
    if((%#oa%=11)|(%#oa%=0)|(%#oa%=9));inc(#seg,1);log("&d» &cLava Encontrada");inc(#lava,1);endif;

    //SE TUDO FOR IGUAL A ZERO JA PODE ANDAR E CAVAR DO OUTRO LADO
    IF((%#agua%=0)&&(%#lava%=0)&&(%#cascalho%=0)&&(%#seg%=0));
    dec(#agua,%#agua%);dec(#lava,%#lava%);dec(#cascalho,%#cascalho%);dec(#seg,%#seg%);
    GETIDREL(%#k1%,0,0,#fd,);
    if(%#fd%!=0);
    do;
    GETIDREL(%#k2%,0,0,#fd,);
    look(%&ladoe%);look(,61);key(attack);until(%#fd%=0);
    endif;

    GETIDREL(%#k2%,1,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladoe%);
    key(attack);
    GETIDREL(%#k2%,1,0,#fulga,);
    while(%#fulga%!=0);
    endif;

    GETIDREL(%#k2%,0,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladoe%);
    look(,16);
    key(attack);
    GETIDREL(%#k2%,0,0,#fulga,);
    while(%#fulga%!=0);
    endif;
    //#########
    GETIDREL(%#k3%,1,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladoe%);
    key(attack);
    GETIDREL(%#k3%,1,0,#fulga,);
    while(%#fulga%!=0);
    endif;

    GETIDREL(%#k3%,0,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladoe%);
    look(,16);
    key(attack);
    GETIDREL(%#k3%,0,0,#fulga,);
    while(%#fulga%!=0);
    endif;

    #x=%XPOS%;wait(500ms);
    do;
    look(%&ladoe%);
    keydown(sneak);
    keydown(forward);
    until((%XPOS%=%#x%+3)|(%XPOS%=%#x%-3));
    wait(230ms);keyup(forward);keyup(sneak);
    wait(100ms);
    }$$/sethome mina$${
    wait(100ms);
    #voltara=%XPOS%;
    #voltarb=%YPOS%;
    #voltarc=%ZPOS%;
    ENDIF;
    ENDIF;
    //#### MAS SE TIVER ALGUM BURACO ####
    //SE A AGUA, CASCALHO, BURACO OU LAVA FOR DIFERENTE DE ZERO
    if((%#agua%!=0)|(%#lava%!=0)|(%#cascalho%!=0)|(%#seg%!=0));
    dec(#agua,%#agua%);dec(#lava,%#lava%);dec(#cascalho,%#cascalho%);dec(#seg,%#seg%);
    GETIDREL(-1,+2,0,#vr2,);
    GETIDREL(-2,0,0,#pe1,);GETIDREL(-3,0,0,#pe2,);GETIDREL(-4,0,0,#pe3,);
    GETIDREL(-5,0,0,#pe4,);GETIDREL(-2,+2,0,#ca1,);GETIDREL(-3,+2,0,#ca2,);
    GETIDREL(-4,+2,0,#ca3,);GETIDREL(-5,+2,0,#ca4,);GETIDREL(-2,-1,0,#seguro,);
    GETIDREL(-3,-1,0,#seguro1,);GETIDREL(-4,-1,0,#seguro2,);GETIDREL(-5,-1,0,#seguro3,);
    GETIDREL(-1,-1,0,#phd1,);GETIDREL(-2,-1,0,#phd2,);
    //VERIFICANDO SE O LADO DIREITO WEST ESTA SEGURO

    if((%#phd1%=11)|(%#phd2%=11)|(%#phd1%=9)|(%#phd2%=9)|(%#phd1%=0)|(%#phd2%=0));inc(#lava,1);inc(#seg,1);
    log("&d» &cLava Encontrada");inc(#lava,1);endif;
    if((%#vr2%=11)|(%#vr2%=13)|(%#vr2%=9));inc(#seg,1);log("&d» &cAlgo Foi Encontrado em Cima de Voce");endif;
    if((%#pe1%=9)|(%#pe2%=9)|(%#pe3%=9)|(%#pe4%=9));inc(#agua,1);log("&d» &cAgua Encontrada");endif;
    if((%#ca1%=13)|(%#ca2%=13)|(%#ca3%=13)|(%#ca4%=13));inc(#cascalho,1);log("&d» &cCascalho Encontrado");endif;
    if((%#ca1%=9)|(%#ca2%=9)|(%#ca3%=9)|(%#ca4%=9));log("&d» &cAgua Encontrada");inc(#agua,1);endif;
    if((%#ca1%=11)|(%#ca2%=11)|(%#ca3%=11)|(%#ca4%=11));log("&d» &cLava Encontrada");inc(#lava,1);endif;
    if((%#pe1%=11)|(%#pe2%=11)|(%#pe3%=11)|(%#pe4%=11));log("&d» &cLava Encontrada");inc(#lava,1);endif;
    if((%#seguro%=0)|%#seguro1%=0)|%#seguro2%=0)|%#seguro3%=0));log("&d» &cBuraco Encontrado");inc(#seg,1);endif;
    if((%#seguro%=11)|%#seguro1%=11)|%#seguro2%=11)|%#seguro3%=11));log("&d» &cLava Encontrada");inc(#lava,1);endif;

    //CASO ESTEJA SEGURO CAVE QUATRO BLOCOS E ANDE

    if((%#agua%=0)&&(%#lava%=0)&&(%#cascalho%=0)&&(%#seg%=0));
    if(%#phdl%=1);
    tp(%#vltd% %#vlte% %#vltf%);
    }$$
    /home bau
    $${
    wait(%#tempo%);
    inc(#phdl,5);
    endif;
    &ladoe=west;#k1=-1;#k2=-2;#k3=-3;#k4=-4;#k5=-5;
    dec(#agua,%#agua%);dec(#lava,%#lava%);dec(#cascalho,%#cascalho%);dec(#seg,%#seg%);
    GETIDREL(-1,0,0,#p,);
    if(%#p%!=0);
    do;
    look(%&ladod%);
    look(,55);
    key(attack);
    GETIDREL(-1,0,0,#p,);
    while(%#p%!=0);
    endif;
    GETIDREL(-2,1,0,#fulga,);
    do;
    look(%&ladod%);
    key(attack);
    GETIDREL(-2,1,0,#fulga,);
    while(%#fulga%!=0);

    GETIDREL(-2,0,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladod%);
    look(,16);
    key(attack);
    GETIDREL(-2,0,0,#fulga,);
    while(%#fulga%!=0);
    endif;
    //################
    do;
    look(%&ladod%);
    key(attack);
    GETIDREL(-3,1,0,#fulga,);
    while(%#fulga%!=0);

    GETIDREL(-3,0,0,#fulga,);
    if(%#fulga%!=0);
    do;
    look(%&ladod%);
    look(,16);
    key(attack);
    GETIDREL(-3,0,0,#fulga,);
    while(%#fulga%!=0);
    endif;

    #x=%XPOS%;wait(500ms);
    do;
    look(%&ladod%);
    keydown(sneak);
    keydown(forward);
    until((%XPOS%=%#x%+3)|(%XPOS%=%#x%-3));
    wait(320ms);keyup(forward);keyup(forward);
    wait(100ms);
    }$$/sethome mina$${
    wait(100ms);
    #voltara=%XPOS%;
    #voltarb=%YPOS%;
    #voltarc=%ZPOS%;
    ENDIF;
    ENDIF;

    //MAS SE NAO ESTIVER SEGURO
    //
    //APENAS DESLIGUE O MACRO E AVISE O PLAYER
    if((%#agua%!=0)|(%#lava%!=0)|(%#cascalho%!=0)|(%#seg%!=0));
    log("&d» &cNao tenho mais para onde ir!");
    log("&d» &cParando o Macro");
    log("&d» &cVoce Minerou um total de &e%#blocos% &cblocos");
    unset(beta);
    unset(beta);stop;
    ENDIF;

    //SE O CAMINHO ESTIVER LIVRE CAVE PEQUENO STEVE
    //===============================================
    GETIDREL(0,1,1,#frente,);slot(%#slot%);
    if(%#frente%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(south);
    key(attack);
    GETIDREL(0,1,1,#frente,);
    while(%#frente%!=0);
    endif;

    //===============================================
    GETIDREL(0,0,1,#frente,);slot(%#slot%);
    if(%#frente%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(south);
    look(,59);
    key(attack);
    GETIDREL(0,0,1,#frente,);
    while(%#frente%!=0);
    endif;

    //==============================================
    GETIDREL(1,1,0,#xcima,);slot(%#slot%);
    if(%#xcima%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(east);
    key(attack);
    GETIDREL(1,1,0,#xcima,);
    while(%#xcima%!=0);
    endif;

    //===========================================
    GETIDREL(1,0,0,#xbaixo,);slot(%#slot%);
    if(%#xbaixo%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(east);
    look(,59);
    key(attack);
    GETIDREL(1,0,0,#xbaixo,);
    while(%#xbaixo%!=0);
    endif;


    //==========================================
    GETIDREL(-1,1,0,#direita,);slot(%#slot%);
    wait(1ms);
    if(%#direita%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(west);
    key(attack);
    GETIDREL(-1,1,0,#direita,);
    while(%#direita%!=0);
    endif;

    //==========================================
    GETIDREL(-1,0,0,#direita,);slot(%#slot%);
    wait(1ms);
    if(%#direita%!=0);inc(#blocos,1);inc(@#arch,1);setlabel(ph1,&ePMine &2(&7%@#arch%&2/&7%@#phodalao%&2),ph1);
    do;
    look(west);
    look(,59);
    key(attack);
    GETIDREL(-1,0,0,#direita,);
    while(%#direita%!=0);
    endif;
    #x=XPOS;#z=ZPOS;
    wait(500ms);
    do;
    look(south);
    keydown(forward);
    keydown(sneak);
    until((%ZPOS%=%#z%-1)|(%ZPOS%=%#z%+1));
    keyup(forward);keyup(sneak);look(south);
    wait(500ms);
    loop;
    }$$

    Este Macro coloque em qualquer tecla, ele será apenas sua skill
    $${
    @#phodalao=100;
    @#nivel=;
    @#arch=;
    }$$
     
    Force, Rodrigo002, AndersonMC e 8 outras curtiram isso.
  2. zThiagoR

    zThiagoR Lendário
    Administração

    Afiliado:
    22 Setembro 2012
    Mensagens:
    18,461
    Curtidas Recebidas:
    4,642
    Curtiu:
    874
    Sexo:
    Masculino
    Localização:
    RJ
    Cubos:
    15,690.00
    Nick:
    zThiagoR
    Clan:
    STF
    Discord:
    zThiagoR#0032
  3. mutico12 imperios

    mutico12 imperios Craftlandiano
    VIP

    Afiliado:
    3 Março 2014
    Mensagens:
    10,059
    Curtidas Recebidas:
    1,169
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    2,321.00
    Nick:
    elalextns
    Clan:
    Não tenho...
    Boa vai ajudar muito sempre inovando :3
     
  4. caiohtc

    caiohtc Bom
    VIP

    Afiliado:
    27 Agosto 2013
    Mensagens:
    826
    Curtidas Recebidas:
    111
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    1,136.00
    Nick:
    putico
  5. LuffyXD

    LuffyXD Craftlandiano
    Banido

    Afiliado:
    17 Novembro 2013
    Mensagens:
    2,158
    Curtidas Recebidas:
    769
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Luís - MA
    Cubos:
    89.00
    Nick:
    LuffyXD
    Clan:
    HRC
    Skype:
    raul.freitas15
  6. JomCasmurro

    JomCasmurro Craftlandiano
    VIP

    Afiliado:
    12 Janeiro 2012
    Mensagens:
    5,956
    Curtidas Recebidas:
    1,735
    Curtiu:
    0
    Localização:
    Boston, MA
    Cubos:
    1,784.00
    Nick:
    Algoz
    Clan:
    EcT
    T-O-P :megusta:
     
  7. IceBR3kWiN

    IceBR3kWiN Craftlandiano
    VIP

    Afiliado:
    15 Agosto 2013
    Mensagens:
    5,006
    Curtidas Recebidas:
    847
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    75.00
    Nick:
    brN
    Clan:
    HLS
  8. jones2

    jones2 Bom
    Banido

    Afiliado:
    12 Janeiro 2014
    Mensagens:
    1,432
    Curtidas Recebidas:
    153
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    1,695.00
    Nick:
    jones2
    Clan:
    FoF
    cara , aconselho deixar essa life ai menor que 5 coraçao , voce se esqueceu da fome , quando ele começar a tomar hit vai dar dc e vai parar de minerar
     
  9. Phodalao

    Phodalao Lendário
    VIP

    Afiliado:
    14 Janeiro 2013
    Mensagens:
    3,933
    Curtidas Recebidas:
    5,101
    Curtiu:
    649
    Cubos:
    2,466.00
    Nick:
    Phodalao
    Se o cara tiver sem set e cair na lava não vai dar tempo de dar dc com 5 corações mas valeu lembrar a fome
     
  10. SLEEPP

    SLEEPP Mito
    VIP

    Afiliado:
    3 Janeiro 2014
    Mensagens:
    10,481
    Curtidas Recebidas:
    6,084
    Curtiu:
    433
    Sexo:
    Masculino
    Cubos:
    1,515.00
    Nick:
    SLEEP
    YouTube:
    www.youtube.com/SleepGP
  11. SUGEITO

    SUGEITO Razoavel
    VIP

    Afiliado:
    4 Abril 2014
    Mensagens:
    487
    Curtidas Recebidas:
    72
    Curtiu:
    237
    Sexo:
    Masculino
    Localização:
    Brasil
    Cubos:
    620.00
    Nick:
    VARIOS
    vdd
     
  12. 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
    Boaa ótimo macro
     
  13. jimmyfilips

    jimmyfilips Hardcore
    VIP

    Afiliado:
    27 Fevereiro 2013
    Mensagens:
    3,020
    Curtidas Recebidas:
    3,668
    Curtiu:
    1,706
    Sexo:
    Masculino
    Cubos:
    1,692.00
    Nick:
    jimmyfilips
    Facebook:
    nem vem...
    Skype:
    aq tb n...
    Não tive coragem de postar um desses, a maioria não se conforma com a palavra "teste", pra eles, ou funciona ou funciona, mas parece que você conseguiu fazer de uma forma melhor!! Parabéns :3
     
    Phodalao curtiu isso.
  14. jimmyfilips

    jimmyfilips Hardcore
    VIP

    Afiliado:
    27 Fevereiro 2013
    Mensagens:
    3,020
    Curtidas Recebidas:
    3,668
    Curtiu:
    1,706
    Sexo:
    Masculino
    Cubos:
    1,692.00
    Nick:
    jimmyfilips
    Facebook:
    nem vem...
    Skype:
    aq tb n...
    DICA! Verifica o cascalho e areia tb, agua e lava em cima deles pode ser um problema, e dependendo do lag, eles podem demorar pra cair e acabar te matando, eu posso ter visto errado mas n vi cascalho na lista rs
     
    Phodalao curtiu isso.
  15. Phodalao

    Phodalao Lendário
    VIP

    Afiliado:
    14 Janeiro 2013
    Mensagens:
    3,933
    Curtidas Recebidas:
    5,101
    Curtiu:
    649
    Cubos:
    2,466.00
    Nick:
    Phodalao
    Então, eu fiquei um tempo sem internet então fiz isso, mas como meu pc chegou eu posso ver depois, só testei ele no single player, como eu minerei na camada 9-11 não achei areia, ela fica mais lá pra cima, cascalho já tem..
    E é só um teste, eu tenho um macro mais completo aqui mas acho que deve ser considerado hack já que vi um tópico seu falando sobre isso :(
    Valeu pelas dicas mas vou aproveitar o pc novo um pouco então vou deixar esse macro ai, caso algo de errado eu edito!
     
    MachadoGamerYT e jimmyfilips curtiram isso.
  16. ForTheGlory

    ForTheGlory Neutro

    Afiliado:
    22 Abril 2014
    Mensagens:
    218
    Curtidas Recebidas:
    9
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    260.00
    Nick:
    ForTheGlory
  17. jimmyfilips

    jimmyfilips Hardcore
    VIP

    Afiliado:
    27 Fevereiro 2013
    Mensagens:
    3,020
    Curtidas Recebidas:
    3,668
    Curtiu:
    1,706
    Sexo:
    Masculino
    Cubos:
    1,692.00
    Nick:
    jimmyfilips
    Facebook:
    nem vem...
    Skype:
    aq tb n...
    Aquele tópico foi um dos motivos que me fez desistir desse macro, a ultima resposta foi "se o tópico for criado, será deletado e isso poderá custar seu cargo junto."
     
  18. lucasescosteguy

    lucasescosteguy Craftlandiano
    VIP

    Afiliado:
    25 Julho 2013
    Mensagens:
    6,049
    Curtidas Recebidas:
    1,081
    Curtiu:
    651
    Sexo:
    Masculino
    Cubos:
    514.00
    Nick:
    -
  19. ikiyk

    ikiyk Razoavel
    VIP

    Afiliado:
    13 Outubro 2013
    Mensagens:
    1,092
    Curtidas Recebidas:
    76
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Belo Horizonte
    Cubos:
    1,717.00
    Nick:
    Irelia
    Twitter:
    @leozero2002
    Boa vou testar qualquer possivel bug venho alertar
     
  20. AkiSe

    AkiSe Craftlandiano
    VIP

    Afiliado:
    20 Maio 2013
    Mensagens:
    8,234
    Curtidas Recebidas:
    1,782
    Curtiu:
    4,625
    Cubos:
    1,149.00
    Nick:
    .
     
Status do Tópico:
Não esta aberto para novas mensagens.