GENTE TENHO ESSA MACRO DE REPARAÇÃO PARA 1.8 NO PROPANO SO QUE QUANDO ELE VAI DAR /SETHOME TEMP ELE NAO VAI PQ TEM QUE TER UMA CORFIRMAÇAO DE SETHOME QUERIA QUE ALGUEM MUDASSE PARA MIM E COLOCASSE ESSE SETHOME PQ TA FICANDO DIFICEL SEM O SETHOME ELE VOLTA TUDO MACRO: $${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;}$$
