Código:
$${
//Desenvolvido por Nugou
//Macro plant de cacto 1.7
if(cac);
log(&6[Macro]&b Torre de cactos &4[OFF]);
keyup(forward);
keyup(sneak);
keyup(back);
keyup(jump);
unset(cac);
stop;
else;
set(cac);
chatopacity(0);
prompt(&delay,$$?,Vc é VIP?(s ou n));
prompt(#torre,$$?,Quantos torres deseja?(ate 100));
if(%#torre%=0);
log(&6[Macro]&b Numero de torre é igual a 0 !!!);
log(&6[Macro]&6 Finalizando macro !!!);
log(&6[Macro]&b Torre de cactos &4[OFF]);
chatopacity(100);
unset(cac);
stop;
endif;
ifmatches(%#torre%,a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z);
log(&6[Macro]&b Numero de torre é uma letra !!!);
log(&6[Macro]&6 Finalizando macro !!!);
log(&6[Macro]&b Torre de cactos &4[OFF]);
chatopacity(100);
unset(cac);
stop;
endif;
if(%#torre%>1);
prompt(#nt,$$?,Deseja começar por qual torre?);
else;
#nt=1;
endif;
prompt(#andar,$$?,Quantos andares deseja?);
if(%#nt%=0);
log(&6[Macro]&b Numero de torre é igual a 0 !!!);
log(&6[Macro]&6 Finalizando macro !!!);
log(&6[Macro]&b Torre de cactos &4[OFF]);
chatopacity(100);
unset(cac);
stop;
endif;
if(%#nt%>%#torre%);
log(&6[Macro]&b Numero de torre é maior que o desejado!!!);
log(&6[Macro]&6 Finalizando macro !!!);
log(&6[Macro]&b Torre de cactos &4[OFF]);
chatopacity(100);
unset(cac);
stop;
endif;
log(&6[Macro]&b Torre de cactos &2[ON]);
log(&6[Macro]&b Para desativar aperte &6%KEYNAME%);
wait(500ms);
log(&6[Macro]&6 As homes devem ser: /home torre1, /home torre2, &6/home torre3...);
log(&6[Macro]&6 Se segui as instruções não tera problema...);
ifmatches(%&delay%,^[S|s]);#delay=5;endif;
ifmatches(%&delay%,^[N|n]);#delay=10;endif;
#tor=1;
#alt=1;
#pa=1;
#baut=1;
#bauc=1;
#baua=1;
#bivt=0;
#biva=0;
#bivc=0;
#itivt=9;
#itivc=18;
#itiva=27;
do;
log(&6[Macro]&b Torre: %#tor%);
if(%#nt%=1);}$$/home torre1$${endif;
if(%#nt%=2);}$$/home torre2$${endif;
if(%#nt%=3);}$$/home torre3$${endif;
if(%#nt%=4);}$$/home torre4$${endif;
if(%#nt%=5);}$$/home torre5$${endif;
if(%#nt%=6);}$$/home torre6$${endif;
if(%#nt%=7);}$$/home torre7$${endif;
if(%#nt%=8);}$$/home torre8$${endif;
if(%#nt%=9);}$$/home torre9$${endif;
if(%#nt%=10);}$$/home torre10$${endif;
if(%#nt%=11);}$$/home torre11$${endif;
if(%#nt%=12);}$$/home torre12$${endif;
if(%#nt%=13);}$$/home torre13$${endif;
if(%#nt%=14);}$$/home torre14$${endif;
if(%#nt%=15);}$$/home torre15$${endif;
if(%#nt%=16);}$$/home torre16$${endif;
if(%#nt%=17);}$$/home torre17$${endif;
if(%#nt%=18);}$$/home torre18$${endif;
if(%#nt%=19);}$$/home torre19$${endif;
if(%#nt%=20);}$$/home torre20$${endif;
if(%#nt%=21);}$$/home torre21$${endif;
if(%#nt%=22);}$$/home torre22$${endif;
if(%#nt%=23);}$$/home torre23$${endif;
if(%#nt%=24);}$$/home torre24$${endif;
if(%#nt%=25);}$$/home torre25$${endif;
if(%#nt%=26);}$$/home torre26$${endif;
if(%#nt%=27);}$$/home torre27$${endif;
if(%#nt%=28);}$$/home torre28$${endif;
if(%#nt%=29);}$$/home torre29$${endif;
if(%#nt%=30);}$$/home torre30$${endif;
if(%#nt%=31);}$$/home torre31$${endif;
if(%#nt%=32);}$$/home torre32$${endif;
if(%#nt%=33);}$$/home torre33$${endif;
if(%#nt%=34);}$$/home torre34$${endif;
if(%#nt%=35);}$$/home torre35$${endif;
if(%#nt%=36);}$$/home torre36$${endif;
if(%#nt%=37);}$$/home torre37$${endif;
if(%#nt%=38);}$$/home torre38$${endif;
if(%#nt%=39);}$$/home torre39$${endif;
if(%#nt%=40);}$$/home torre40$${endif;
if(%#nt%=41);}$$/home torre41$${endif;
if(%#nt%=42);}$$/home torre42$${endif;
if(%#nt%=43);}$$/home torre43$${endif;
if(%#nt%=44);}$$/home torre44$${endif;
if(%#nt%=45);}$$/home torre45$${endif;
if(%#nt%=46);}$$/home torre46$${endif;
if(%#nt%=47);}$$/home torre47$${endif;
if(%#nt%=48);}$$/home torre48$${endif;
if(%#nt%=49);}$$/home torre49$${endif;
if(%#nt%=50);}$$/home torre50$${endif;
if(%#nt%=51);}$$/home torre51$${endif;
if(%#nt%=52);}$$/home torre52$${endif;
if(%#nt%=53);}$$/home torre53$${endif;
if(%#nt%=54);}$$/home torre54$${endif;
if(%#nt%=55);}$$/home torre55$${endif;
if(%#nt%=56);}$$/home torre56$${endif;
if(%#nt%=57);}$$/home torre57$${endif;
if(%#nt%=58);}$$/home torre58$${endif;
if(%#nt%=59);}$$/home torre59$${endif;
if(%#nt%=60);}$$/home torre60$${endif;
if(%#nt%=61);}$$/home torre61$${endif;
if(%#nt%=62);}$$/home torre62$${endif;
if(%#nt%=63);}$$/home torre63$${endif;
if(%#nt%=64);}$$/home torre64$${endif;
if(%#nt%=65);}$$/home torre65$${endif;
if(%#nt%=66);}$$/home torre66$${endif;
if(%#nt%=67);}$$/home torre67$${endif;
if(%#nt%=68);}$$/home torre68$${endif;
if(%#nt%=69);}$$/home torre69$${endif;
if(%#nt%=70);}$$/home torre70$${endif;
if(%#nt%=71);}$$/home torre71$${endif;
if(%#nt%=72);}$$/home torre72$${endif;
if(%#nt%=73);}$$/home torre73$${endif;
if(%#nt%=74);}$$/home torre74$${endif;
if(%#nt%=75);}$$/home torre75$${endif;
if(%#nt%=76);}$$/home torre76$${endif;
if(%#nt%=77);}$$/home torre77$${endif;
if(%#nt%=78);}$$/home torre78$${endif;
if(%#nt%=79);}$$/home torre79$${endif;
if(%#nt%=80);}$$/home torre80$${endif;
if(%#nt%=81);}$$/home torre81$${endif;
if(%#nt%=82);}$$/home torre82$${endif;
if(%#nt%=83);}$$/home torre83$${endif;
if(%#nt%=84);}$$/home torre84$${endif;
if(%#nt%=85);}$$/home torre85$${endif;
if(%#nt%=86);}$$/home torre86$${endif;
if(%#nt%=87);}$$/home torre87$${endif;
if(%#nt%=88);}$$/home torre88$${endif;
if(%#nt%=89);}$$/home torre89$${endif;
if(%#nt%=90);}$$/home torre90$${endif;
if(%#nt%=91);}$$/home torre91$${endif;
if(%#nt%=92);}$$/home torre92$${endif;
if(%#nt%=93);}$$/home torre93$${endif;
if(%#nt%=94);}$$/home torre94$${endif;
if(%#nt%=95);}$$/home torre95$${endif;
if(%#nt%=96);}$$/home torre96$${endif;
if(%#nt%=97);}$$/home torre97$${endif;
if(%#nt%=98);}$$/home torre98$${endif;
if(%#nt%=99);}$$/home torre99$${endif;
if(%#nt%=100);}$$/home torre100$${endif;
wait(%#delay%);
//terra - bloco central
do(%#andar%);
log(&6[Macro]&b Andar: %#alt%);
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#y=%YPOS%;
#z=%ZPOS%;
look(NORTH);
look(,+89);
wait(1);
do;
slot(7);
keydown(jump);
wait(3t);
key(use);
keyup(jump);
wait(700ms);
if(%YPOS%>%#y%+1);
do;
key(attack);
until(%YPOS%=%#y%+1);
wait(100ms);
endif;
if(%YPOS%=%#y%+1);
break;
endif;
loop;
wait(200ms);
keydown(sneak);
slot(7);
//terra - bloco sul
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
look(NORTH);
do;
keydown(back);
until(%ZPOS%=%#z%+1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//terra - bloco oeste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%-1);
keyup(forward);
look(EAST);
do;
keydown(back);
until(%XPOS%=%#x%-1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//terra - bloco norte
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%+1);
keyup(forward);
look(SOUTH);
do;
keydown(back);
until(%ZPOS%=%#z%-1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//terra - bloco leste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%+1);
keyup(forward);
look(WEST);
do;
keydown(back);
until(%XPOS%=%#x%+1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//areia - bloco central
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
#y=%YPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%-1);
keyup(forward)
wait(200ms);
do;
slot(8);
keydown(jump);
do(3);
key(use);
loop;
keyup(jump);
wait(500ms);
if(%YPOS%>%#y%+1);
do;
key(attack);
until(%YPOS%=%#y%+1);
wait(100ms);
endif;
if(%YPOS%=%#y%+1);
break;
endif;
loop;
wait(500ms);
keydown(sneak);
//areia - bloco sul
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
look(NORTH);
do;
keydown(back);
until(%ZPOS%=%#z%+1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(200ms);
//areia - bloco oeste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%-1);
keyup(forward);
look(EAST);
do;
keydown(back);
until(%XPOS%=%#x%-1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(200ms);
//areia - bloco norte
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%+1);
keyup(forward);
look(SOUTH);
do;
keydown(back);
until(%ZPOS%=%#z%-1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(200ms);
//areia - bloco leste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%+1);
keyup(forward);
look(WEST);
do;
keydown(back);
until(%XPOS%=%#x%+1);
look(,+82);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(200ms);
//terra - central
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
#y=%YPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%-1);
keyup(forward);
do;
slot(7);
keydown(jump);
do(3);
key(use);
loop;
keyup(jump);
wait(300ms);
if(%YPOS%>%#y%+1);
do;
key(attack);
until(%YPOS%=%#y%+1);
wait(100ms);
endif;
if(%YPOS%=%#y%+1);
break;
endif;
loop;
#y=%YPOS%;
wait(200ms);
do;
slot(7);
keydown(jump);
wait(3t);
do(3);
key(use);
loop;
keyup(jump);
wait(300ms);
if(%YPOS%>%#y%+1);
do;
key(attack);
until(%YPOS%=%#y%+1);
wait(100ms);
endif;
if(%YPOS%=%#y%+1);
break;
endif;
loop;
keydown(sneak);
wait(300ms);
//tira terra
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
look(NORTH);
do;
keydown(back);
until(%ZPOS%=%#z%+1);
look(,+85);
wait(500ms);
keyup(back);
slot(%#pa%);
getslotitem(%#pa%,&spa,);
ifmatches(%&spa%,air);
#pa=1;
endif;
do;
key(attack);
until(%HITID%="sand");
//cactos
//cacto - bloco sul
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
slot(9);
look(NORTH);
do;
keydown(back);
until(%ZPOS%=%#z%+1);
look(,+89);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//cacto - bloco oeste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%-1);
keyup(forward);
look(EAST);
do;
keydown(back);
until(%XPOS%=%#x%-1);
look(,+89);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//cacto - bloco norte
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%+1);
keyup(forward);
look(SOUTH);
do;
keydown(back);
until(%ZPOS%=%#z%-1);
look(,+89);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//cacto - bloco leste
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%ZPOS%=%#z%+1);
keyup(forward);
look(WEST);
do;
keydown(back);
until(%XPOS%=%#x%+1);
look(,+89);
wait(500ms);
keyup(back);
do(3);
key(use);
loop;
wait(100ms);
//inicio
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
#x=%XPOS%;
#z=%ZPOS%;
do;
keydown(forward);
until(%XPOS%=%#x%-1);
keyup(forward);
inc(#alt,1);
wait(100ms);
//Verifica inventario
gui(inventory);
wait(1);
getslotitem(17,,#qtt);
getslotitem(26,,#qtc);
getslotitem(35,,#qta);
if((%#qtt%=0)|(%#qtc%=0)|(%#qta%=0));
gui();
if(%#qtt%=0);log(&6[Macro]&b Sem terra no inventario);endif;
if(%#qtc%=0);log(&6[Macro]&b Sem cacto no inventario);endif;
if(%#qta%=0);log(&6[Macro]&b Sem areia no inventario);endif;
wait(100ms);
if(%#nt%=1);}$$/sethome torre1$${endif;
if(%#nt%=2);}$$/sethome torre2$${endif;
if(%#nt%=3);}$$/sethome torre3$${endif;
if(%#nt%=4);}$$/sethome torre4$${endif;
if(%#nt%=5);}$$/sethome torre5$${endif;
if(%#nt%=6);}$$/sethome torre6$${endif;
if(%#nt%=7);}$$/sethome torre7$${endif;
if(%#nt%=8);}$$/sethome torre8$${endif;
if(%#nt%=9);}$$/sethome torre9$${endif;
if(%#nt%=10);}$$/sethome torre10$${endif;
if(%#nt%=11);}$$/sethome torre11$${endif;
if(%#nt%=12);}$$/sethome torre12$${endif;
if(%#nt%=13);}$$/sethome torre13$${endif;
if(%#nt%=14);}$$/sethome torre14$${endif;
if(%#nt%=15);}$$/sethome torre15$${endif;
if(%#nt%=16);}$$/sethome torre16$${endif;
if(%#nt%=17);}$$/sethome torre17$${endif;
if(%#nt%=18);}$$/sethome torre18$${endif;
if(%#nt%=19);}$$/sethome torre19$${endif;
if(%#nt%=20);}$$/sethome torre20$${endif;
if(%#nt%=21);}$$/sethome torre21$${endif;
if(%#nt%=22);}$$/sethome torre22$${endif;
if(%#nt%=23);}$$/sethome torre23$${endif;
if(%#nt%=24);}$$/sethome torre24$${endif;
if(%#nt%=25);}$$/sethome torre25$${endif;
if(%#nt%=26);}$$/sethome torre26$${endif;
if(%#nt%=27);}$$/sethome torre27$${endif;
if(%#nt%=28);}$$/sethome torre28$${endif;
if(%#nt%=29);}$$/sethome torre29$${endif;
if(%#nt%=30);}$$/sethome torre30$${endif;
if(%#nt%=31);}$$/sethome torre31$${endif;
if(%#nt%=32);}$$/sethome torre32$${endif;
if(%#nt%=33);}$$/sethome torre33$${endif;
if(%#nt%=34);}$$/sethome torre34$${endif;
if(%#nt%=35);}$$/sethome torre35$${endif;
if(%#nt%=36);}$$/sethome torre36$${endif;
if(%#nt%=37);}$$/sethome torre37$${endif;
if(%#nt%=38);}$$/sethome torre38$${endif;
if(%#nt%=39);}$$/sethome torre39$${endif;
if(%#nt%=40);}$$/sethome torre40$${endif;
if(%#nt%=41);}$$/sethome torre41$${endif;
if(%#nt%=42);}$$/sethome torre42$${endif;
if(%#nt%=43);}$$/sethome torre43$${endif;
if(%#nt%=44);}$$/sethome torre44$${endif;
if(%#nt%=45);}$$/sethome torre45$${endif;
if(%#nt%=46);}$$/sethome torre46$${endif;
if(%#nt%=47);}$$/sethome torre47$${endif;
if(%#nt%=48);}$$/sethome torre48$${endif;
if(%#nt%=49);}$$/sethome torre49$${endif;
if(%#nt%=50);}$$/sethome torre50$${endif;
if(%#nt%=51);}$$/sethome torre51$${endif;
if(%#nt%=52);}$$/sethome torre52$${endif;
if(%#nt%=53);}$$/sethome torre53$${endif;
if(%#nt%=54);}$$/sethome torre54$${endif;
if(%#nt%=55);}$$/sethome torre55$${endif;
if(%#nt%=56);}$$/sethome torre56$${endif;
if(%#nt%=57);}$$/sethome torre57$${endif;
if(%#nt%=58);}$$/sethome torre58$${endif;
if(%#nt%=59);}$$/sethome torre59$${endif;
if(%#nt%=60);}$$/sethome torre60$${endif;
if(%#nt%=61);}$$/sethome torre61$${endif;
if(%#nt%=62);}$$/sethome torre62$${endif;
if(%#nt%=63);}$$/sethome torre63$${endif;
if(%#nt%=64);}$$/sethome torre64$${endif;
if(%#nt%=65);}$$/sethome torre65$${endif;
if(%#nt%=66);}$$/sethome torre66$${endif;
if(%#nt%=67);}$$/sethome torre67$${endif;
if(%#nt%=68);}$$/sethome torre68$${endif;
if(%#nt%=69);}$$/sethome torre69$${endif;
if(%#nt%=70);}$$/sethome torre70$${endif;
if(%#nt%=71);}$$/sethome torre71$${endif;
if(%#nt%=72);}$$/sethome torre72$${endif;
if(%#nt%=73);}$$/sethome torre73$${endif;
if(%#nt%=74);}$$/sethome torre74$${endif;
if(%#nt%=75);}$$/sethome torre75$${endif;
if(%#nt%=76);}$$/sethome torre76$${endif;
if(%#nt%=77);}$$/sethome torre77$${endif;
if(%#nt%=78);}$$/sethome torre78$${endif;
if(%#nt%=79);}$$/sethome torre79$${endif;
if(%#nt%=80);}$$/sethome torre80$${endif;
if(%#nt%=81);}$$/sethome torre81$${endif;
if(%#nt%=82);}$$/sethome torre82$${endif;
if(%#nt%=83);}$$/sethome torre83$${endif;
if(%#nt%=84);}$$/sethome torre84$${endif;
if(%#nt%=85);}$$/sethome torre85$${endif;
if(%#nt%=86);}$$/sethome torre86$${endif;
if(%#nt%=87);}$$/sethome torre87$${endif;
if(%#nt%=88);}$$/sethome torre88$${endif;
if(%#nt%=89);}$$/sethome torre89$${endif;
if(%#nt%=90);}$$/sethome torre90$${endif;
if(%#nt%=91);}$$/sethome torre91$${endif;
if(%#nt%=92);}$$/sethome torre92$${endif;
if(%#nt%=93);}$$/sethome torre93$${endif;
if(%#nt%=94);}$$/sethome torre94$${endif;
if(%#nt%=95);}$$/sethome torre95$${endif;
if(%#nt%=96);}$$/sethome torre96$${endif;
if(%#nt%=97);}$$/sethome torre97$${endif;
if(%#nt%=98);}$$/sethome torre98$${endif;
if(%#nt%=99);}$$/sethome torre99$${endif;
if(%#nt%=100);}$$/sethome torre100$${endif;
wait(100ms);
}$$
/home item
$${
wait(%#delay%);
do(2);
keydown(jump);
wait(3t);
keyup(jump);
wait(100ms);
loop;
ifmatches(%DIRECTION%,N);&dir1=NORTH;&dir2=EAST;&dir3=WEST;endif;
ifmatches(%DIRECTION%,S);&dir1=SOUTH;&dir2=WEST;&dir3=EAST;endif;
ifmatches(%DIRECTION%,E);&dir1=EAST;&dir2=SOUTH;&dir3=NORTH;endif;
ifmatches(%DIRECTION%,W);&dir1=WEST;&dir2=NORTH;&dir3=SOUTH;endif;
//TERRA
if(%#qtt%=0);
log(&6[Macro]&b Pegando terra);
do;
look(%&dir1%);
//f1-a
if(%#baut%=1);look(-35,-35);endif;
if(%#baut%=2);look(-13,-40);endif;
if(%#baut%=3);look(+13,-40);endif;
if(%#baut%=4);look(+35,-35);endif;
//f2-a
if(%#baut%=5);look(-35,-20);endif;
if(%#baut%=6);look(-13,-25);endif;
if(%#baut%=7);look(+13,-25);endif;
if(%#baut%=8);look(+35,-20);endif;
//f3-a
if(%#baut%=9);look(-35,+5);endif;
if(%#baut%=10);look(-13,+10);endif;
if(%#baut%=11);look(+13,+10);endif;
if(%#baut%=12);look(+35,+5);endif;
//f4-a
if(%#baut%=13);look(-35,+20);endif;
if(%#baut%=14);look(-13,+25);endif;
if(%#baut%=15);look(+13,+25);endif;
if(%#baut%=16);look(+35,+20);endif;
wait(2);
do;
key(use);
wait(2);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(500ms);
#slt=62;
do;
getslotitem(%#bivt%,#id,#qbiv);
if(%#qbiv%=0);
inc(#bivt,1);
endif;
slotclick(%#bivt%,l,false);
wait(80ms);
slotclick(%#slt%,l,false);
wait(80ms);
slotclick(%#bivt%,l,false);
wait(80ms);
getslotitem(%#slt%,#id,#qslt);
if(%#qslt%!=0);
dec(#slt,1);
endif;
if(%#bivt%=54);
inc(#baut,1);
#bivt=0;
#ult=0;
gui();
wait(1);
break;
endif;
getslotitem(54,#id,#ult);
until(%#ult%!=0);
if(%#baut%=17);
log(&6[Macro]&b Acabo os baus de reposição !!!);
log(&6[Macro]&b Parando macro ...);
unset(cac);
stop;
endif;
until(%#ult%!=0);
endif;
gui();
wait(1);
//CACTO
if(%#qtc%=0);
log(&6[Macro]&b Pegando Cacto);
do;
look(%&dir2%);
//f1-a
if(%#bauc%=1);look(-35,-35);endif;
if(%#bauc%=2);look(-13,-40);endif;
if(%#bauc%=3);look(+13,-40);endif;
if(%#bauc%=4);look(+35,-35);endif;
//f2-a
if(%#bauc%=5);look(-35,-20);endif;
if(%#bauc%=6);look(-13,-25);endif;
if(%#bauc%=7);look(+13,-25);endif;
if(%#bauc%=8);look(+35,-20);endif;
//f3-a
if(%#bauc%=9);look(-35,+5);endif;
if(%#bauc%=10);look(-13,+10);endif;
if(%#bauc%=11);look(+13,+10);endif;
if(%#bauc%=12);look(+35,+5);endif;
//f4-a
if(%#bauc%=13);look(-35,+20);endif;
if(%#bauc%=14);look(-13,+25);endif;
if(%#bauc%=15);look(+13,+25);endif;
if(%#bauc%=16);look(+35,+20);endif;
wait(2);
do;
key(use);
wait(2);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(500ms);
#slt=71;
do;
getslotitem(%#bivc%,#id,#qbiv);
if(%#qbiv%=0);
inc(#bivc,1);
endif;
slotclick(%#bivc%,l,false);
wait(80ms);
slotclick(%#slt%,l,false);
wait(80ms);
slotclick(%#bivc%,l,false);
wait(80ms);
getslotitem(%#slt%,#id,#qslt);
if(%#qslt%!=0);
dec(#slt,1);
endif;
if(%#bivc%=54);
inc(#baut,1);
gui();
#bivc=0;
#ult=0;
wait(1);
break;
endif;
getslotitem(63,#id,#ult);
until(%#ult%!=0);
if(%#bauc%=17);
log(&6[Macro]&b Acabo os baus de reposição !!!);
log(&6[Macro]&b Parando macro ...);
unset(cac);
stop;
endif;
until(%#ult%!=0);
endif;
gui();
//AREIA
if(%#qta%=0);
log(&6[Macro]&b Pegando Areia);
do;
look(%&dir3%);
//f1-a
if(%#baua%=1);look(-35,-35);endif;
if(%#baua%=2);look(-13,-40);endif;
if(%#baua%=3);look(+13,-40);endif;
if(%#baua%=4);look(+35,-35);endif;
//f2-a
if(%#baua%=5);look(-35,-20);endif;
if(%#baua%=6);look(-13,-25);endif;
if(%#baua%=7);look(+13,-25);endif;
if(%#baua%=8);look(+35,-20);endif;
//f3-a
if(%#baua%=9);look(-35,+5);endif;
if(%#baua%=10);look(-13,+10);endif;
if(%#baua%=11);look(+13,+10);endif;
if(%#baua%=12);look(+35,+5);endif;
//f4-a
if(%#baua%=13);look(-35,+20);endif;
if(%#baua%=14);look(-13,+25);endif;
if(%#baua%=15);look(+13,+25);endif;
if(%#baua%=16);look(+35,+20);endif;
wait(2);
do;
key(use);
wait(2);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(500ms);
#slt=80;
do;
getslotitem(%#biva%,#id,#qbiv);
if(%#qbiv%=0);
inc(#biva,1);
endif;
slotclick(%#biva%,l,false);
wait(80ms);
slotclick(%#slt%,l,false);
wait(80ms);
slotclick(%#biva%,l,false);
wait(80ms);
getslotitem(%#slt%,#id,#qslt);
if(%#qslt%!=0);
dec(#slt,1);
endif;
if(%#biva%=54);
inc(#baut,1);
gui();
#biva=0;
#ult=0;
break;
endif;
getslotitem(72,#id,#ult);
until(%#ult%!=0);
if(%#baua%=17);
log(&6[Macro]&b Acabo os baus de reposição !!!);
log(&6[Macro]&b Parando macro ...);
unset(cac);
stop;
endif;
until(%#ult%!=0);
endif;
gui();
wait(100ms);
if(%#nt%=1);}$$/home torre1$${endif;
if(%#nt%=2);}$$/home torre2$${endif;
if(%#nt%=3);}$$/home torre3$${endif;
if(%#nt%=4);}$$/home torre4$${endif;
if(%#nt%=5);}$$/home torre5$${endif;
if(%#nt%=6);}$$/home torre6$${endif;
if(%#nt%=7);}$$/home torre7$${endif;
if(%#nt%=8);}$$/home torre8$${endif;
if(%#nt%=9);}$$/home torre9$${endif;
if(%#nt%=10);}$$/home torre10$${endif;
if(%#nt%=11);}$$/home torre11$${endif;
if(%#nt%=12);}$$/home torre12$${endif;
if(%#nt%=13);}$$/home torre13$${endif;
if(%#nt%=14);}$$/home torre14$${endif;
if(%#nt%=15);}$$/home torre15$${endif;
if(%#nt%=16);}$$/home torre16$${endif;
if(%#nt%=17);}$$/home torre17$${endif;
if(%#nt%=18);}$$/home torre18$${endif;
if(%#nt%=19);}$$/home torre19$${endif;
if(%#nt%=20);}$$/home torre20$${endif;
if(%#nt%=21);}$$/home torre21$${endif;
if(%#nt%=22);}$$/home torre22$${endif;
if(%#nt%=23);}$$/home torre23$${endif;
if(%#nt%=24);}$$/home torre24$${endif;
if(%#nt%=25);}$$/home torre25$${endif;
if(%#nt%=26);}$$/home torre26$${endif;
if(%#nt%=27);}$$/home torre27$${endif;
if(%#nt%=28);}$$/home torre28$${endif;
if(%#nt%=29);}$$/home torre29$${endif;
if(%#nt%=30);}$$/home torre30$${endif;
if(%#nt%=31);}$$/home torre31$${endif;
if(%#nt%=32);}$$/home torre32$${endif;
if(%#nt%=33);}$$/home torre33$${endif;
if(%#nt%=34);}$$/home torre34$${endif;
if(%#nt%=35);}$$/home torre35$${endif;
if(%#nt%=36);}$$/home torre36$${endif;
if(%#nt%=37);}$$/home torre37$${endif;
if(%#nt%=38);}$$/home torre38$${endif;
if(%#nt%=39);}$$/home torre39$${endif;
if(%#nt%=40);}$$/home torre40$${endif;
if(%#nt%=41);}$$/home torre41$${endif;
if(%#nt%=42);}$$/home torre42$${endif;
if(%#nt%=43);}$$/home torre43$${endif;
if(%#nt%=44);}$$/home torre44$${endif;
if(%#nt%=45);}$$/home torre45$${endif;
if(%#nt%=46);}$$/home torre46$${endif;
if(%#nt%=47);}$$/home torre47$${endif;
if(%#nt%=48);}$$/home torre48$${endif;
if(%#nt%=49);}$$/home torre49$${endif;
if(%#nt%=50);}$$/home torre50$${endif;
if(%#nt%=51);}$$/home torre51$${endif;
if(%#nt%=52);}$$/home torre52$${endif;
if(%#nt%=53);}$$/home torre53$${endif;
if(%#nt%=54);}$$/home torre54$${endif;
if(%#nt%=55);}$$/home torre55$${endif;
if(%#nt%=56);}$$/home torre56$${endif;
if(%#nt%=57);}$$/home torre57$${endif;
if(%#nt%=58);}$$/home torre58$${endif;
if(%#nt%=59);}$$/home torre59$${endif;
if(%#nt%=60);}$$/home torre60$${endif;
if(%#nt%=61);}$$/home torre61$${endif;
if(%#nt%=62);}$$/home torre62$${endif;
if(%#nt%=63);}$$/home torre63$${endif;
if(%#nt%=64);}$$/home torre64$${endif;
if(%#nt%=65);}$$/home torre65$${endif;
if(%#nt%=66);}$$/home torre66$${endif;
if(%#nt%=67);}$$/home torre67$${endif;
if(%#nt%=68);}$$/home torre68$${endif;
if(%#nt%=69);}$$/home torre69$${endif;
if(%#nt%=70);}$$/home torre70$${endif;
if(%#nt%=71);}$$/home torre71$${endif;
if(%#nt%=72);}$$/home torre72$${endif;
if(%#nt%=73);}$$/home torre73$${endif;
if(%#nt%=74);}$$/home torre74$${endif;
if(%#nt%=75);}$$/home torre75$${endif;
if(%#nt%=76);}$$/home torre76$${endif;
if(%#nt%=77);}$$/home torre77$${endif;
if(%#nt%=78);}$$/home torre78$${endif;
if(%#nt%=79);}$$/home torre79$${endif;
if(%#nt%=80);}$$/home torre80$${endif;
if(%#nt%=81);}$$/home torre81$${endif;
if(%#nt%=82);}$$/home torre82$${endif;
if(%#nt%=83);}$$/home torre83$${endif;
if(%#nt%=84);}$$/home torre84$${endif;
if(%#nt%=85);}$$/home torre85$${endif;
if(%#nt%=86);}$$/home torre86$${endif;
if(%#nt%=87);}$$/home torre87$${endif;
if(%#nt%=88);}$$/home torre88$${endif;
if(%#nt%=89);}$$/home torre89$${endif;
if(%#nt%=90);}$$/home torre90$${endif;
if(%#nt%=91);}$$/home torre91$${endif;
if(%#nt%=92);}$$/home torre92$${endif;
if(%#nt%=93);}$$/home torre93$${endif;
if(%#nt%=94);}$$/home torre94$${endif;
if(%#nt%=95);}$$/home torre95$${endif;
if(%#nt%=96);}$$/home torre96$${endif;
if(%#nt%=97);}$$/home torre97$${endif;
if(%#nt%=98);}$$/home torre98$${endif;
if(%#nt%=99);}$$/home torre99$${endif;
if(%#nt%=100);}$$/home torre100$${endif;
wait(%#delay%);
else;
gui();
log(&6[Macro]&b Ainda ha item no inventario );
endif;
//verifica itens da hotbar
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
log(&6[Macro]&b Verificando itens...);
log(&6[Macro]&b Terra);
getslotitem(7,,#qte);
if(%#qte%<20);
gui(inventory);
wait(1);
#itivt=9;
do;
do;
getslotitem(%#itivt%,#id,#qitivt);
if(%#qitivt%=0);
inc(#itivt,1);
endif;
while(%#qivivt%=0);
slotclick(%#itivt%,l,false);
wait(150ms);
slotclick(42,l,false);
wait(150ms);
getslotitem(%#itivt%,l,false);
wait(150ms);
getslotitem(42,#id,#qte);
until(%#qte%>20);
gui();
log(&6[Macro]&b Terra recolocada !!!);
else;
gui();
endif;
log(&6[Macro]&b Areia);
wait(1);
getslotitem(8,,#qca);
if(%#qca%<20);
gui(inventory);
wait(1);
#itiva=27;
do;
do;
getslotitem(%#itiva%,#id,#qitiva);
if(%#qitiva%=0);
inc(#itiva,1);
endif;
while(%#qiviva%=0);
slotclick(%#itiva%,l,false);
wait(150ms);
slotclick(43,l,false);
wait(150ms);
getslotitem(%#itiva%,l,false);
wait(150ms);
getslotitem(43,#id,#qte);
until(%#qte%>20);
gui();
log(&6[Macro]&b Areia recolocada !!!);
else;
gui();
endif;
log(&6[Macro]&b Cacto);
wait(1);
getslotitem(9,,#qar);
if(%#qar%<20);
gui(inventory);
wait(1);
#itivc=18;
do;
do;
getslotitem(%#itivc%,,#qitivc);
if(%#qitivc%=0);
inc(#itivc,1);
endif;
while(%#qivitc%=0);
slotclick(%#itivc%,l,false);
wait(150ms);
slotclick(44,l,false);
wait(150ms);
getslotitem(%#itivc%,l,false);
wait(150ms);
getslotitem(44,,#qte);
until(%#qte%>20);
gui();
log(&6[Macro]&b Cacto recolocado !!!);
else;
gui();
endif;
slot(%#pa%);
getslotitem(%#pa%,&spa,);
ifmatches(%&spa%,air);
#pa=1;
else;
if(%DURABILITY%<5);
inc(#pa,1);
if(%#pa%=7);
log(&6[Macro]&b Pás gastas !!!);
endif;
endif;
endif;
wait(500ms);
loop;
//torre
logto(debug,&aTorre: &6%#nt% &aAndar: &6%#alt%);
inc(#nt,1);
inc(#tor,1);
#alt=1;
until(%#torre%<%#nt%);
log(&6[Macro]&b Todas as torres concluidas!!!);
log(&6[Macro]&b Finalizando macro !!!);
log(&6[Macro]&b Torre de cactos &4[OFF]);
keyup(forward);
keyup(sneak);
keyup(back);
keyup(jump);
unset(cac);
stop;
endif;
}$$