ENTREGUE [Macro/Teste] AutoMine

Phodalao · Abr 23, 2014

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:

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

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

zThiagoR · Abr 23, 2014

Ficou TOP

mutico12 imperios · Abr 23, 2014

Boa vai ajudar muito sempre inovando :3

caiohtc · Abr 23, 2014

LuffyXD · Abr 23, 2014

JomCasmurro · Abr 23, 2014

T-O-P :megusta:

IceBR3kWiN · Abr 23, 2014

jones2 · Abr 23, 2014

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

Phodalao · Abr 23, 2014

jones2 disse:
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

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

SLEEPP · Abr 23, 2014

SUGEITO · Abr 23, 2014

Phodalao disse:
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

vdd

Eduarte · Abr 23, 2014

Boaa ótimo macro

jimmyfilips · Abr 24, 2014

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

jimmyfilips · Abr 24, 2014

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 · Abr 25, 2014

jimmyfilips disse:
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

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!

ForTheGlory · Abr 25, 2014

Boa o/

jimmyfilips · Abr 28, 2014

Phodalao disse:
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!

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."

lucasescosteguy · Abr 29, 2014

Boa <3

ikiyk · Abr 29, 2014

Boa vou testar qualquer possivel bug venho alertar

AkiSe · Abr 29, 2014

putico disse:
boa,

ENTREGUE [Macro/Teste] AutoMine

Bem-vindo!

Lendário

Lendário

Craftlandiano

Bom

Craftlandiano

Craftlandiano

Craftlandiano

Bom

Lendário

Mito

Razoavel

Craftlandiano

Hardcore

Hardcore

Lendário

Neutro

Hardcore

Craftlandiano

Razoavel

Craftlandiano

Usuários que estão visualizando este tópico