__________________________________________________
Salve galera!
__________________________________________________
Hoje vim trazer uma macro de:

para o servidor propano - 1.8
Essa macro não necessita de maquinas de redstone.
essa macro foi desenvolvida 100% por min, porem a ideia tirei de uma antiga macro do [member=Nugou] então merece os devidos créditos.

__________________________________________________
Fazendo a trap: Construa uma grande plataforma de terra, se for um bioma em que chove é recomendado fazer um telhado.Não se esqueça de fazer uma parede de pelo menos 1 boco de altura nas extremidades, o macro usara a parede para saber o fim da trap
sete a home em uma das pontas da plataforma olhando para qualquer lado
/sethome reptrap
print:

sete também uma home /sethome reptemp para reservar esta home que sera usada para o macro voltar de onde parou quando ele ir reparar.

sete uma home /home reparar olhando para um bloco de ferro
Print:

coloque 9 enxadas na hotbar, e no resto do inventario bote o material para repará-las
print:

para começar o up vá na sua home reptrap (/home reptrap) e ligue o macro, e Bom Up

__________________________________________________
Para o total funcionamento da macro é necessário o Devasteytor onchat http://forum.craftlandia.com.br/ipb/index.php?/topic/590112-macro-devasteytor-onchat/ esse onchat é universal, serve para todas minhas macros 1.8, se você usa uma de minhas macros 1.8 apenas recomendado atualizar pois estou constantemente fazendo melhorias/mudanças. Codigos:
Coloque os codigos em txt (edit file)
Este código é o que vai na tecla:
Este código vai no onchat:
Este código é o que vai na tecla:
$${if(@reparador);unset(@reparador);
log(&4=======================================);
log(&6&l[Reparador] &c&l[&4 OFF &c&l]);
log(&6&l[Reparador] &efico grato por usar meu macro);
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);log(&2=======================================);set(@reparador);
if(%HITID%="iron_block");#x=%XPOS%;#z=%ZPOS%;echo(/home reptemp);
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);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);#v=0;endif;
do;until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));endif;loop;endif;}$$
log(&4=======================================);
log(&6&l[Reparador] &c&l[&4 OFF &c&l]);
log(&6&l[Reparador] &efico grato por usar meu macro);
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);log(&2=======================================);set(@reparador);
if(%HITID%="iron_block");#x=%XPOS%;#z=%ZPOS%;echo(/home reptemp);
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);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);#v=0;endif;
do;until((%#x%!=%XPOS%)||(%#z%!=%ZPOS%));endif;loop;endif;}$$
Este código vai no onchat:
Devasteytor onchat, é o suporte para todos meu macros 1.8
Sugestões para aperfeiçoamento da macro são bem vindas

Bugs? avise-me que estarei arrumando!