Devasteytor
*editei a macro dele para ser não vip
HOMES:
/home reptrap - na trap
/home reparar - olhando para um bloco de ferro
e ter uma /home disponivel para o macro voltar da onde parou
*imagens da trap
http://imgur.com/a/V4skj
REPARAÇÃO
$${
if(@reparador);
unset(@reparador);
log(&6&l[Reparador] &eBy: &c&lDevasteytor &eCraftlandia - Propano);
log(&4=======================================);
keyup(back);
keyup(forward);
keyup(sneak);
keyup(%&lado%);
stop;
else;
log(&2=======================================);
log(&2);
log(&6&l[Reparador] &9&l[&2 &lON &9&l]);
log(&2); &lDevasteytor
loga
set(@reparador);
if(%HITID%="iron_block");
#x=%XPOS%;#z=%ZPOS%;echo(/home reptemp);
wait(5);
do;
until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));
endif;
@&key=%KEYNAME%;
if(@login);
unset(@login);
else;
ifmatches(%DIRECTION%,W);
&look = "WEST" ;
getidrel(0,0,-1,&getlado);
endif;
ifmatches(%DIRECTION%,E);
&look = "EAST" ;
getidrel(0,0,+1,&getlado);
endif;
ifmatches(%DIRECTION%,N);
&look = "NORTH" ;
getidrel(+1,0,0,&getlado);
endif;
ifmatches(%DIRECTION%,S);
&look = "SOUTH" ;
getidrel(-1,0,0,&getlado);
endif;
if(%&getlado%!="air");
&lado=left;
else;
&lado=right;
endif;
#v=0;
#slot=1;
endif;
do;
do;
look(%&look%);
look(,85);
slot(%#slot%);
key(use);
if(%DURABILITY%<20);
inc(#slot,1);
endif;
if(%#slot%>9);
set(rep);
endif;
if(%#v%=0);
if(%&look% = "NORTH" );
getidrel(0,0,-1,&getf);
endif;
if(%&look% = "SOUTH" );
getidrel(0,0,+1,&getf);
endif;
if(%&look% = "EAST" );
getidrel(+1,0,0,&getf);
endif;
if(%&look% = "WEST" );
getidrel(-1,0,0,&getf);
endif;
keydown(forward);
endif;
if(%#v%=1);
if(%&look% = "NORTH" );
getidrel(0,0,+1,&gett);
endif;
if(%&look% = "SOUTH" );
getidrel(0,0,-1,&gett);
endif;
if(%&look% = "EAST" );
getidrel(-1,0,0,&gett);
endif;
if(%&look% = "WEST" );
getidrel(+1,0,0,&gett);
endif;
keydown(back);
endif;
if(rep);
log(&6&l[Reparador] &eTodas as enxadas estao no &4Red &e
);
log(&6&l[Reparador] &eIndo reparar . . .);
unset(rep);
keyup(forward);
keyup(back);
#x=%XPOS%;#z=%ZPOS%;
echo(/sethome reptemp);
#slot=1;
wait(500ms);
echo(/home reparar);
wait(6);
do;
until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));
wait(500ms);
for(#sl,9,1);
do;slot(%#sl%);
key(use);
wait(250ms);
until((%DURABILITY%>20)||(%ITEM%="air"));
next;
#x=%XPOS%;
#z=%ZPOS%;
log(&6&l[Reparador] &eVoltando para trap . . .);
echo(/home reptemp);
do;
until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));
endif;
if((%#v%=0)&&(%&getf%!="air"));
#v=1;
break;
endif;
if((%#v%=1)&&(%&gett%!="air"));
#v=0;
break;
endif;
loop;
keyup(forward);
keyup(back);
#x=%XPOS%;
#z=%ZPOS%;
#n=0;
do;
keydown(sneak);
keydown(%&lado%);
key(use);
inc(#n,1);
if(%#n%>20);
set(home);
break;
endif;
until((%#x%=%XPOS%+1)||(%#x%=%XPOS%-1)||(%#z%=%ZPOS%+1)||(%#z%=%ZPOS%-1));
wait(150ms);
keyup(sneak);
keyup(%&lado%);
if(home);
unset(home);
echo(/home reptrap);
wait(6);
#v=0;
endif;
do;
until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));
endif;
loop;
endif;
}$$
Clique para expandir...
