ENTREGUE Separar livros por nivel

[AmaurikJunior]

Macro de separar Livros por Nível.
Ele somente separar os livros da hotbar guardando os em um bau.
Te perguntara qual o nível do livro e irá guardar no bau a sua frente o nível digitado
Obs: Macro simples sem tutorial
Feito por mim o código não tive ajuda apenas pesquisei os comandos para ter conhecimento e trabalhar no macro

Spoiler

$${if(x);unset(x);log("&6&lSeparar Off");stop();else;
log("&6&lSeparar On");#c=0;
&monitorar=Não;
achievementget("By:Amaurik10",387);
prompt(#fora,$$?,Nível);
for(#slot,1,9);slot(%#slot%);wait(100ms);#var=0;
match(%ITEMNAME%,"&6Tesouro Nível ([0-9]+)",#var,3);
if(%#var%=%#fora%);set(&Slot_%#slot%,&4&lTrue);else;unset(&Slot_%#slot%,&4&lTrue);endif;
if(%&monitorar%="Sim");
if(%#slot%=1);log(%&slot_1%);endif;
if(%#slot%=2);log(%&slot_2%);endif;
if(%#slot%=3);log(%&slot_3%);endif;
if(%#slot%=4);log(%&slot_4%);endif;
if(%#slot%=5);log(%&slot_5%);endif;
if(%#slot%=6);log(%&slot_6%);endif;
if(%#slot%=7);log(%&slot_7%);endif;
if(%#slot%=8);log(%&slot_8%);endif;
if(%#slot%=9);log(%&slot_9%);endif;
endif;next;
key(use);wait(4);
if(%&slot_1%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(81,l,true);endif;
if(%&slot_2%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(82,l,true);endif;
if(%&slot_3%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(83,l,true);endif;
if(%&slot_4%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(84,l,true);endif;
if(%&slot_5%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(85,l,true);endif;
if(%&slot_6%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(86,l,true);endif;
if(%&slot_7%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(87,l,true);endif;
if(%&slot_8%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(88,l,true);endif;
if(%&slot_9%="&4&lTrue");inc(#c,1);wait(50ms);slotclick(89,l,true);endif;
wait(1);gui();log("&6&l%#c% Livros Nível %#fora% &8&l[&4&l!&8&l]&6Guardos");endif;}$$

glr esse é um macro de tesouro testem para mim e se tiver algum bug entre em contato?

Spoiler

$${if(x);log(Off);unset(x);keyup(forward);stop();else;set(x);log(on);
"south z aumenta - north z diminui - weast x diminui - east x aumenta"
&b=air;
&pott=VELOCIDADE;
#paro=0;
#stas=373;

prompt(#xtesouro,$$?,"Cordenada X");
prompt(#ztesouro,$$?,"Cord z");
log("&8&lX=&9&l%#xtesouro%");
log("&8&lZ=&9&l%#ztesouro%");
log("&6&lVou somente achar o tesouro,mobs e por sua conta");
if(%ZPOS%<%#ztesouro%);&dir1=SOUTH;else;endif;"Almento do z"
if(%ZPOS%>%#ztesouro%);&dir1=NORTH;else;endif;"Redução do z"
if(%XPOS%<%#xtesouro%);&dir2=EAST;else;endif;"Almento do x"
if(%XPOS%>%#xtesouro%);&dir2=WEST;else;endif;"Redução do x"
log("&4&lEm busca de z");
look(%&dir1%);wait(1);
if(%&dir1%= "SOUTH");If(%#xtesouro%<%XPOS%);&key=right;endif;endif;
if(%&dir1%= "SOUTH");If(%#xtesouro%>%XPOS%);&key=left;endif;endif;
if(%&dir1%= "NORTH");If(%#xtesouro%>%XPOS%);&key=right;endif;endif;
if(%&dir1%= "NORTH");If(%#xtesouro%<%XPOS%);&key=left;endif;endif;
if(%&dir2%= "WEST");If(%#ztesouro%<%ZPOS%);&keya=right;endif;endif;
if(%&dir2%= "WEST");If(%#ztesouro%>%ZPOS%);&keya=left;endif;endif;
if(%&dir2%= "EAST");If(%#ztesouro%>%ZPOS%);&keya=right;endif;endif;
if(%&dir2%= "EAST");If(%#ztesouro%<%ZPOS%);&keya=left;endif;endif;

look(%&dir2%);keydown(forward);sprint;wait(7);unsprint;keyup(forward);
#if=0;

&k=jump;keydown(%&key%);
do;keydown(%&k%);if(%#if%=0);keydown(%&key%);endif;
//
#xresult=0;#zresul=0;
IF(KEY_1);#xresult=%#xtesouro%-%XPOS%;
#zresult=%#ztesouro%-%ZPOS%;
log((%#xtesouro%)-(%XPOS%)=%#xresult%);
log((%#ztesouro%)-(%ZPOS%)=%#zresult%);endif;
//
getidrel(+1,0,0,#blocoid1);
getidrel(-1,0,0,#blocoid2);
getidrel(0,0,+1,#blocoid3);
getidrel(0,0,-1,#blocoid4);
if(%#blocoid1%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid2%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid3%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid4%!=0);keydown(jump);wait(1);keyup(jump);endif;

look(%&dir1%);keydown(forward);wait(1ms);SPRINT;
#p=1;
FOREACH(effects);#p=0;next;pick(potion:8226,potion:8258,373:8226,373:8258);wait(100ms);if(%ITEM%=%#stas%);
if(%#p%=1);do(40);key(use);loop;endif;endif;
if(%HUNGER%<=6);
pick(cooked_porkchop,cooked_fish,melon,cooked_beef,cooked_chicken,apple,carrot,baked_potato,bread,pumpkin_pie);
pick(400,320,260,297,350,357,364,391,393);do;
pick(400,320,260,297,350,357,364,391,393);key(use);while(%HUNGER%<20);
endif;
if(%ZPOS%=%#ztesouro%-1);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%-2);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%-3);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%+1);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%+2);#zpos=1;keydown(sneak);endif;
if(%ZPOS%=%#ztesouro%+3);#zpos=1;keydown(sneak);endif;
if(%XPOS%=%#xtesouro%+3);keyup(%&key%);endif;
if(%XPOS%=%#xtesouro%+2);keyup(%&key%);#if=1;endif;
if(%XPOS%=%#xtesouro%+1);keyup(%&key%);#if=1;endif;
if(%XPOS%=%#xtesouro%);keyup(%&key%);#if=1;endif;
if(%XPOS%=%#xtesouro%-1);keyup(%&key%);#if=1;endif;
if(%XPOS%=%#xtesouro%-2);keyup(%&key%);#if=1;endif;
if(%XPOS%=%#xtesouro%-3);keyup(%&key%);endif;
if(KEY_TAB);log(dec);pick(387);wait(10ms);key(use);wait(10ms);else;endif;

until(%#zpos%=1);keyup(forward);UNSPRINT;keyup(jump);
#zpos=0;keyup(jump);
keyup(sneak);
keyup(%&key%);
---------
log("&4&lEm busca de x");
look(%&dir2%);
do;keydown(%&k%);if(%#if%=0);keydown(%&keya%);endif;
//
#xresult=0;#zresul=0;
IF(KEY_1);#xresult=%#xtesouro%-%XPOS%;
#zresult=%#ztesouro%-%ZPOS%;
log((%#xtesouro%)-(%XPOS%)=%#xresult%);
log((%#ztesouro%)-(%ZPOS%)=%#zresult%);endif;
//
getidrel(+1,0,0,#blocoid1);
getidrel(-1,0,0,#blocoid2);
getidrel(0,0,+1,#blocoid3);
getidrel(0,0,-1,#blocoid4);
if(%#blocoid1%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid2%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid3%!=0);keydown(jump);wait(1);keyup(jump);endif;
if(%#blocoid4%!=0);keydown(jump);wait(1);keyup(jump);endif;



look(%&dir2%);keydown(forward);wait(1ms);SPRINT;
#p=1;
FOREACH(effects);#p=0;next;pick(potion:8226,potion:8258,373:8226,373:8258);wait(100ms);if(%ITEM%=%#stas%);
if(%#p%=1);do(40);key(use);loop;
endif;endif;



if(%HUNGER%<=6);
pick(cooked_porkchop,cooked_fish,melon,cooked_beef,cooked_chicken,apple,carrot,baked_potato,bread,pumpkin_pie);
pick(400,320,260,297,350,357,364,391,393);
do;pick(400,320,260,297,350,357,364,391,393);key(use);while(%HUNGER%<20);endif;
if(%XPOS%=%#xtesouro%-1);#xpos=1;endif;
if(%XPOS%=%#xtesouro%-2);#xpos=1;endif;
if(%XPOS%=%#xtesouro%-3);#xpos=1;endif;
if(%XPOS%=%#xtesouro%);#xpos=1;endif;
if(%XPOS%=%#xtesouro%+1);#xpos=1;endif;
if(%XPOS%=%#xtesouro%+2);#xpos=1;endif;
if(%XPOS%=%#xtesouro%+3);#xpos=1;endif;
if(%ZPOS%=%#ztesouro%+3);keyup(%&keya%);endif;
if(%ZPOS%=%#ztesouro%+2);keyup(%&keya%);#if=1;endif;
if(%ZPOS%=%#ztesouro%+1);keyup(%&keya%);#if=1;endif;
if(%ZPOS%=%#ztesouro%);keyup(%&keya%);#if=1;endif;
if(%ZPOS%=%#ztesouro%-1);keyup(%&keya%);#if=1;endif;
if(%ZPOS%=%#ztesouro%-2);keyup(%&keya%);#if=1;endif;
if(%ZPOS%=%#ztesouro%-3);keyup(%&keya%);endif;
until(%#xpos%=1);#xpos=0;keyup(jump);
keyup(forward);UNSPRINT;keyup(jump);

if(%KEY_TAB%);log(dec);pick(387);wait(10ms);key(use);wait(10ms);else;endif;

endif;

}$$

Aceito ideias de coisas que possa ser automatizadas por macros,mande mp!, apesar do fato que estou muito ocupado posso analisar e tentar fazer!

 

[PeedroAlmeida]

otimo macro irei usar

 

[rapierdot]

opa, muito bom vou usar!

 

[mutico12 imperios]

Opa gg vou usar

 

[Roodrigo]

sabendo que você soube usar com facilidade o comando match da para ter noção que você vai bem no mod macro, Parabéns!

 

[BigMikeGR]

ótimo macro

 

[StorngherH1]

Eita GG macro boa

 

[Jaaaozaum]

Amaurik e suas macros bolosas e.e

 

[zM0S812]

Parabéns, ótimos macros! Joga no Heaven, certo?

 

[AmaurikJunior]

otimo macro irei usar

vlw =)

 

[caiovs]

MANO TE AMO MELHOR MACRO DA VIDA <3

 

[zSunlight]

Boa gg! bai ajudar mt ahshusa

 

[AmaurikJunior]

Vlw glr =)

Boa gg! bai ajudar mt ahshusa

MANO TE AMO MELHOR MACRO DA VIDA <3

Eita GG macro boa

ótimo macro

Opa gg vou usar

opa, muito bom vou usar!

vlw glr =)

 

[Caryston]

opa gg usar agr

 

[AmaurikJunior]

Parabéns, ótimos macros! Joga no Heaven, certo?

Sim vlw =)

 

[zM0S812]

Sim vlw =)

=) mos812 aq

 

[AmaurikJunior]

Amaurik e suas macros bolosas e.e

Vlw jaaao, o de pesca ta blz né?

sabendo que você soube usar com facilidade o comando match da para ter noção que você vai bem no mod macro, Parabéns!

Sim,Já tenho um tempo que estou aprendendo a usar o mod macro,o comando match foi um dos últimos que eu aprendi a usar,ainda falta alguns para aprender

 

[zInter00]

Vou usar provavelmente :3
Macro top

Enviado de meu GT-S5303B usando Tapatalk

 

[ShakeNervoso]

Vou usar provavelmente

 

[theomeme]

Irei Usar!