$${
//Creditos totais a MrSwags_
//Se for editar esse macro deixe os creditos
//aqui e no forum.
//Se acaso remover os creditos e postar irei
//denunciar por KIBE.

if(mrcacto);
log("&4Auto [OFF]");
log("&c&lPilar: &f&l%#cpil%&6&l/&f&l%#npil%")
unset(mrcacto);
stop();
else;
log("&4Auto [ON]");
set(mrcacto);
if(mrcacto);
echo(/g &f&lIniciado macro de &6&ltorres &a&lcacto &f&lzedafarofa &4&ls2);
PROMPT(#qand,$$?,"Quantos andares?");
PROMPT(#npil,$$?,"Numero de pilares?");
PROMPT(#cpil,$$?,"Começar em qual pilar?");
#dlk=1;
#slk=1;
#clk=1;
#fff=1;
do(%#npil%);
if(%#cpil%=%#npil%+1);log(Finalizando);stop;endif;
wait(2);echo(/home p%#cpil%);wait(8);
#fff=1;
do(%#qand%);
log("&a&lAndar: &f&l%#fff%&6&l/&f&l%#qand%")
log("&c&lPilar: &f&l%#cpil%&6&l/&f&l%#npil%")
wait(200ms);
look(180,90);
pick(3);
keydown(jump);wait(300ms);key(use);
keyup(jump);wait(300ms);
keydown(sneak);wait(200ms);look(180,82);keydown(back);wait(1000ms);pick(3);
keyup(back);wait(200ms);key(use);wait(200ms);
look(360,82);pick(3);wait(200ms);keydown(back);wait(1400ms);keyup(back);wait(100ms);key(use);
pick(3);
keydown(forward);wait(600ms);keyup(forward);
wait(250ms);keyup(forward);
wait(300ms);look(90,82)pick(3);
keydown(sneak);wait(200ms);keydown(back);wait(1000ms);
look(90,82);pick(3);keyup(back);wait(200ms);key(use);wait(200ms);
look(270,82);pick(3);wait(200ms);keydown(back);wait(1400ms);keyup(back);wait(100ms);key(use);
wait(300ms);pick(3);
pick(3);
keydown(forward);wait(600ms);keyup(forward);
wait(250ms);keyup(forward);wait(200ms);pick(3);
look(180,90);pick(3);keyup(sneak);wait(200ms);
keydown(jump);wait(300ms);key(use);keyup(jump);keydown(sneak);
wait(200ms);look(0,65);pick(12);wait(100ms);key(use);
wait(200ms);look(90,65);pick(12);wait(100ms);key(use);
wait(200ms);look(180,65);pick(12);wait(100ms);key(use);
wait(200ms);look(270,65);pick(12);wait(100ms);key(use);wait(200ms);keyup(sneak);
look(180,90);pick(3);keydown(jump);wait(300ms);key(use);keyup(jump);wait(200ms);
pick(3);keydown(jump);wait(300ms);key(use);keyup(jump);wait(200ms);keydown(sneak);
pick(277);gui();wait(50ms);echo(/fix);look(178,84);keydown(back);wait(1);keyup(back);key(attack);
wait(300ms);key(attack);wait(300ms);key(attack);wait(300ms);key(attack);wait(300ms);keydown(forward);wait(600ms);keyup(forward);look(180,90);wait(200ms);
//cacto
pick(81);look(0,70);wait(200ms);key(use);wait(100ms);
pick(81);look(90,70);wait(200ms);key(use);wait(100ms);
pick(81);look(180,69);wait(200ms);key(use);wait(100ms);
pick(81);look(270,69);wait(200ms);key(use);wait(100ms);
gui(inventory);wait(300ms);
getslotitem(36,#slot36,#stack36);
getslotitem(37,#slot37,#stack37);
getslotitem(38,#slot38,#stack38);
if(%#stack36%<16);
for(#dirt,9,17);
getslotitem(%#dirt%,#dirt1);
if(%#dirt1%=3);
slotclick(%#dirt%,l,false);
wait(200ms);
slotclick(36,l,false);
wait(200ms);
slotclick(%#dirt%,l,false);
wait(200ms);
getslotitem(36,#slot36,#stack36);
if(%#stack36%>63);break;endif;wait(200ms);
endif;
next;
endif;
if(%#stack37%<16);
for(#sand,18,26);
getslotitem(%#sand%,#sand1);
if(%#sand1%=12);
slotclick(%#sand%,l,false);
wait(200ms);
slotclick(37,l,false);
wait(200ms);
slotclick(%#sand%,l,false);
wait(200ms);
getslotitem(37,#slot37,#stack37);
if(%#stack37%>63);break;endif;wait(200ms);
endif;
next;
endif;
if(%#stack38%<16);
for(#cacto,27,35);
getslotitem(%#cacto%,#cacto1);
if(%#cacto1%=81);
slotclick(%#cacto%,l,false);
wait(200ms);
slotclick(38,l,false);
wait(200ms);
slotclick(%#cacto%,l,false);
wait(200ms);
getslotitem(38,#slot38,#stack38);
if(%#stack38%>63);break;endif;wait(200ms);
endif;
next;
endif;wait(100ms);
//Armazem TERRA
log(verificando terra);
gui(inventory);
getslotitem(17,#d17);
if(%#d17%!=3);
keyup(sneak);
echo(/sethome temp);wait(5);
ifmatches(%PLAYER%,zSchmockyyy_);
echo(/home ccbaus);wait(10);
endif;
do;gui();
if(%#dlk%=1);look(150,330);endif;
if(%#dlk%=2);look(180,330);endif;
if(%#dlk%=3);look(210,330);endif;
if(%#dlk%=4);look(150,0);endif;
if(%#dlk%=5);look(180,0);endif;
if(%#dlk%=6);look(210,0);endif;
if(%#dlk%=7);look(150,30);endif;
if(%#dlk%=8);look(180,30);endif;
if(%#dlk%=9);look(210,30);endif;
if(%#dlk%=10);log(Acabou a TERRA);stop;endif;
wait(2);key(use);wait(3);
#dlt=54;
for(#dd,0,53);
getslotitem(%#dd%,#dd1);
if(%#dd1%=3);wait(100ms);
slotclick(%#dd%,l,false);
wait(100ms);
slotclick(%#dlt%,l,false);
wait(100ms);
getslotitem(62,#id62);
if(%#id62%=3);break;endif;
inc(#dlt);
endif;
next;
for(#dc,0,53);
getslotitem(%#dc%,#dc2);
if(%#dc2%=3);#baui=1;endif;
if(%#dc2%!=3);#baui=0;endif;
next;
if(%#baui%=0);inc(#dlk);endif;
getslotitem(62,#dd17);
until(%#dd17%=3);
wait(500ms);echo(/home temp);wait(8);keydown(sneak);
endif;wait(100ms);
//ARMAZEM AREIA
keyup(sneak);
gui(inventory);
getslotitem(26,#s26);
if(%#s26%!=12);echo(/sethome temp);wait(5);
echo(/home ccbaus);wait(10);
do;gui();
if(%#slk%=1);look(240,330);endif;
if(%#slk%=2);look(270,330);endif;
if(%#slk%=3);look(300,330);endif;
if(%#slk%=4);look(240,0);endif;
if(%#slk%=5);look(270,0);endif;
if(%#slk%=6);look(300,0);endif;
if(%#slk%=7);look(240,30);endif;
if(%#slk%=8);look(270,30);endif;
if(%#slk%=9);look(300,30);endif;
if(%#slk%=10);log(Acabou a AREIA);stop;endif;
wait(2);key(use);wait(3);
#slt=63;ifmatches(%PLAYER%,zSchmockyyy_);
for(#ss,0,53);
getslotitem(%#ss%,#ss1);
if(%#ss1%=12);wait(100ms);
slotclick(%#ss%,l,false);
wait(100ms);
slotclick(%#slt%,l,false);
wait(100ms);
getslotitem(71,#id71);
if(%#id71%=12);break;endif;
inc(#slt);
endif;
next;
endif;
for(#sc,0,53);
getslotitem(%#sc%,#sc2);
if(%#sc2%=12);#baui=1;endif;
if(%#sc2%!=12);#baui=0;endif;
next;
if(%#baui%=0);inc(#slk);endif;
getslotitem(71,#ss26);
until(%#ss26%=12);
wait(500ms);echo(/home temp);wait(8);keydown(sneak);
endif;wait(100ms);
//ARMAZEM CACTOS
keyup(sneak);
gui(inventory);
getslotitem(35,#c35);
if(%#c35%!=81);echo(/sethome temp);wait(5);
echo(/home ccbaus);wait(10);
do;gui();
ifmatches(%PLAYER%,zSchmockyyy_);
if(%#clk%=1);look(120,330);endif;
if(%#clk%=2);look(90,330);endif;
if(%#clk%=3);look(60,330);endif;
if(%#clk%=4);look(120,0);endif;
if(%#clk%=5);look(90,0);endif;
if(%#clk%=6);look(60,0);endif;
if(%#clk%=7);look(120,30);endif;
if(%#clk%=8);look(90,30);endif;
if(%#clk%=9);look(60,30);endif;
if(%#clk%=10);log(Acabou os CACTOS);stop;endif;
endif;
wait(2);key(use);wait(3);
#clt=72;
for(#cc,0,53);
getslotitem(%#cc%,#cc1);
if(%#cc1%=81);wait(100ms);
slotclick(%#cc%,l,false);
wait(100ms);
slotclick(%#clt%,l,false);
wait(100ms);
getslotitem(80,#id80);
if(%#id80%=81);break;endif;
inc(#clt);
endif;
next;
for(#cc,0,53);
getslotitem(%#cc%,#cc2);
if(%#cc2%=81);#baui=1;endif;
if(%#cc2%!=81);#baui=0;endif;
next;
if(%#baui%=0);inc(#clk);endif;
getslotitem(80,#cc80);
until(%#cc80%=81);
wait(500ms);echo(/home temp);wait(8);keydown(sneak);
endif;gui();wait(100ms);
endif;

inc(#fff);
loop;
inc(#cpil);
loop;
endif;
}$$