Macro de contagem de livros encontrados
Uma macro que me pediram muito no servidor que eu jogo (Premium), é essa que hoje estou trazendo à vocês.
Ela simplesmente faz a contagem dos livros encontrados durante o período que ela estiver ligada.
Informações adicionaisEla específica todos os livros encontrados, independente do nível e também diz o total de livros pegos.

Sistema LIGA/DESLIGA.

Sistema de reset de livros

Mostra uma conquista super estilosa quando você pega um livro.

Faz som quando você pega um livro.
Comandos
Para usar todos os comandos, você deverá digitar somente no chat LOCAL. (Para não haver a possibilidade de outros players digitarem o comando por você).
Para ver quantos livros pegou, digite no chat local:
" qlivros? "
Para resetar os livros pegos, digite no chat local:
" reset lv "
Para ver os créditos da macro, digite no chat local:
" creditos lv "
Tutorial
Primeiro, vamos a criação da label que exibira o total de livros pegos.

Em "nome" colocar: " LV ".
Em "Label texto" não colocar nada.
Em "Vinculação" colocar: " LV ".
Em "Primeiro Plano" a sua escolha.
Em "Plano de Fundo" a sua escolha.
Em "Alinhar Texto" a sua escolha.
Em "Sombra" a sua escolha.
Códigos
Colocar em OnChat:
$${
if(@livro);
&pl = %PLAYER%;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro:");
#livro=%#livro%+1;
setlabel(LV,&7&lLivros: %#livro%,LV);
log(&e&lVocê encontrou um livro!);
ACHIEVEMENTGET("Parabéns! By:Casal WIN",351:4)
playsound(random.click);
wait(50ms);
playsound(tile.piston.out);
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 1");
#nv1=%#nv1%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 2");
#nv2=%#nv2%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 3");
#nv3=%#nv3%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 4");
#nv4=%#nv4%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 5");
#nv5=%#nv5%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 6");
#nv6=%#nv6%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 7");
#nv7=%#nv7%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 8");
#nv8=%#nv8%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 9");
#nv9=%#nv9%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 10");
#nv10=%#nv10%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 11");
#nv11=%#nv11%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl%: qlivros?");
log( &a\o/ );
log(&f&lLivros pegos
;
#total=%#nv1%+%#nv2%+%#nv3%+%#nv4%+%#nv5%+%#nv6%+%#nv7%+%#nv8%+%#nv9%+%#nv10%+%#nv11%;
log(&f&lNivel &6&l1&f&l: &a&l%#nv1%);
log(&f&lNivel &6&l2&f&l: &a&l%#nv2%);
log(&f&lNivel &6&l3&f&l: &a&l%#nv3%);
log(&f&lNivel &6&l4&f&l: &a&l%#nv4%);
log(&f&lNivel &6&l5&f&l: &a&l%#nv5%);
log(&f&lNivel &6&l6&f&l: &a&l%#nv6%);
log(&f&lNivel &6&l7&f&l: &a&l%#nv7%);
log(&f&lNivel &6&l8&f&l: &a&l%#nv8%);
log(&f&lNivel &6&l9&f&l: &a&l%#nv9%);
log(&f&lNivel &c&l10&f&l: &a&l%#nv10%);
log(&f&lNivel &4&l11&f&l: &a&l%#nv11%);
log(&f&lTOTAL: &d&l%#total%);
endif;
ifmatches(%CHATCLEAN%,"%&pl%: reset lv");
#livro=0;
#nv1=0;
#nv2=0;
#nv3=0;
#nv4=0;
#nv5=0;
#nv6=0;
#nv7=0;
#nv8=0;
#nv9=0;
#nv10=0;
#nv11=0;
setlabel(LV,&7&lLivros: %#livro%,LV);
log(&e&lLivros resetados!);
endif;
ifmatches(%CHATCLEAN%,"%&pl%: creditos lv");
log( );
log(&fMacro idealizado por: &5&lJohnnyWin);
log(&fCores e decoração: &d&lPequena20);
log(&5&lWIN &fOwna!);
log(&f&lObrigado!);
log( );
endif;
endif;
}$$
if(@livro);
&pl = %PLAYER%;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro:");
#livro=%#livro%+1;
setlabel(LV,&7&lLivros: %#livro%,LV);
log(&e&lVocê encontrou um livro!);
ACHIEVEMENTGET("Parabéns! By:Casal WIN",351:4)
playsound(random.click);
wait(50ms);
playsound(tile.piston.out);
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 1");
#nv1=%#nv1%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 2");
#nv2=%#nv2%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 3");
#nv3=%#nv3%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 4");
#nv4=%#nv4%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 5");
#nv5=%#nv5%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 6");
#nv6=%#nv6%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 7");
#nv7=%#nv7%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 8");
#nv8=%#nv8%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 9");
#nv9=%#nv9%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 10");
#nv10=%#nv10%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl% encontrou um livro: Tesouro Nível 11");
#nv11=%#nv11%+1;
endif;
ifmatches(%CHATCLEAN%,"%&pl%: qlivros?");
log( &a\o/ );
log(&f&lLivros pegos

#total=%#nv1%+%#nv2%+%#nv3%+%#nv4%+%#nv5%+%#nv6%+%#nv7%+%#nv8%+%#nv9%+%#nv10%+%#nv11%;
log(&f&lNivel &6&l1&f&l: &a&l%#nv1%);
log(&f&lNivel &6&l2&f&l: &a&l%#nv2%);
log(&f&lNivel &6&l3&f&l: &a&l%#nv3%);
log(&f&lNivel &6&l4&f&l: &a&l%#nv4%);
log(&f&lNivel &6&l5&f&l: &a&l%#nv5%);
log(&f&lNivel &6&l6&f&l: &a&l%#nv6%);
log(&f&lNivel &6&l7&f&l: &a&l%#nv7%);
log(&f&lNivel &6&l8&f&l: &a&l%#nv8%);
log(&f&lNivel &6&l9&f&l: &a&l%#nv9%);
log(&f&lNivel &c&l10&f&l: &a&l%#nv10%);
log(&f&lNivel &4&l11&f&l: &a&l%#nv11%);
log(&f&lTOTAL: &d&l%#total%);
endif;
ifmatches(%CHATCLEAN%,"%&pl%: reset lv");
#livro=0;
#nv1=0;
#nv2=0;
#nv3=0;
#nv4=0;
#nv5=0;
#nv6=0;
#nv7=0;
#nv8=0;
#nv9=0;
#nv10=0;
#nv11=0;
setlabel(LV,&7&lLivros: %#livro%,LV);
log(&e&lLivros resetados!);
endif;
ifmatches(%CHATCLEAN%,"%&pl%: creditos lv");
log( );
log(&fMacro idealizado por: &5&lJohnnyWin);
log(&fCores e decoração: &d&lPequena20);
log(&5&lWIN &fOwna!);
log(&f&lObrigado!);
log( );
endif;
endif;
}$$
Colocar em uma Tecla de sua preferência (Sistema LIGA/DESLIGA):
$${
if(@livro);
log("&e&l[Macro] &dContador de livros &bdesativado &f&l
");
ACHIEVEMENTGET("Casal WIN Agradece!",351:4)
unset(@livro);
stop();
else;
log("&e&l[Macro] &dContador de livros &9ativado &f&l
");
ACHIEVEMENTGET("Casal WIN Agradece!",351:4)
set(@livro);
endif;
}$$
if(@livro);
log("&e&l[Macro] &dContador de livros &bdesativado &f&l

ACHIEVEMENTGET("Casal WIN Agradece!",351:4)
unset(@livro);
stop();
else;
log("&e&l[Macro] &dContador de livros &9ativado &f&l

ACHIEVEMENTGET("Casal WIN Agradece!",351:4)
set(@livro);
endif;
}$$