Muito bom :mellow:
Enviado do meu batmovel o/
Enviado do meu batmovel o/
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.
Inscreva-se agora!OwenWinner disse:Ótima macro, irei testar e se tiver um erro eu posto aqui.
Manu poderia alterar pra mostrar quanto de dinheiro ele pegou vendendo cacto? se der agradeço!Eduarte disse:Bom indo direto ao ponto este macro que trago hoje ele conta os itens que pesca peixes/discos/minérios etc. então vamos ao tutorial
Instalação do macro
primeiro abra o meno macro e clique na quela seta amarela
![]()
Agora clique em onPickUpItem
![]()
La escreva $$<item.txt> e clique em Edit File...
![]()
Escreva item e clique em Create
![]()
Em seguida cole este código
$${IF(%PICKUPID% = 349);inc(@#hue,1);SETLABEL(PE1,"&aPeixes Pegos:&4&o %@#hue%",PE1);endif;}$$|
$${
IF(%PICKUPID% = 266);inc(@#minerios,5);SETLABEL(PE2,"&aMinerios Pegos:&4&o %@#minerios%",PE2);endif;
IF(%PICKUPID% = 265);inc(@#minerios,5);SETLABEL(PE2,"&aMinerios Pegos:&4&o %@#minerios%",PE2);endif;
IF(%PICKUPID% = 264);inc(@#minerios,5);SETLABEL(PE2,"&aMinerios Pegos:&4&o %@#minerios%",PE2);endif;
}$$|
$${
IF(%PICKUPID% = 2256);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2257);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2258);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2259);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2260);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2261);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2262);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2263);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2264);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2265);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2266);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
IF(%PICKUPID% = 2267);inc(@#discos,1);SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);endif;
}$$
Agora clique em save 2 vezes até voltar há esta tela então clique em onChat
![]()
crie outro arquivo .txt dentro do onChat igual nas etapas do onPickuoItem só que com outro nome qualquer e em seguida cole este outro código
$${ifmatches(%CHATCLEAN%,"Tesouro encontrado");inc(@#tesouros,1);SETLABEL(PE4,"&aTesouros Pegos:&4&o %@#tesouros%",PE4);endif;}$$|
clique em salvar em tudo.
Tutorial instalação das labels
agora vamos a instalação das labels para ficar maisoumenos assim
![]()
Para quem já sabe instalar label basta instalar de as labels PE1, PE2, PE3, e PE4
para quem não sabe vai um breve tutorial.
Abra o menu do macro e clique em GUI Editor
![]()
Agora entre em ingame
![]()
agora em Button Panel Commands
![]()
Add Label
![]()
escolha o primeiro local para por a primeira label
![]()
digite PE1 em Control Name e em Binding e clique em ok fassa o mesmo processo adicionando label até PE4
pronto assim que começar há a pescar que o macro ira começar há contar os itens
Adicionado meio de resetar a contagem atendendo há diversos pedidos
Nota¹: O macro conta todos os minérios exceto lápis-lazuliApenas cole este código em uma tecla qualquer e o execulte
$${
log("&4&oPara resetar &aTesouros Pegos &6digite 1");
log("&4&oPara resetar &aDiscos Pegos &6digite 2");
log("&4&oPara resetar &aMinerios Pegos &6digite 3");
log("&4&oPara resetar &aPeixes Pegos &6digite 4");
log(" ");
prompt(#ria,$$?,Escreva 1.2.3. ou 4 se não quiser proseguir de enter sem nada escrito);
if(%#ria% = 1);
@#tesouros = 0;
SETLABEL(PE4,"&aTesouros Pegos:&4&o %@#tesouros%",PE4);
endif;
if(%#ria% = 2);
@#discos = 0;
SETLABEL(PE3,"&aDiscos Pegos:&4&o %@#discos%",PE3);
endif;
if(%#ria% = 3);
@#minerios = 0;
SETLABEL(PE2,"&aMinerios Pegos:&4&o %@#minerios%",PE2);
endif;
if(%#ria% = 4);
@#hue = 0;
SETLABEL(PE1,"&aPeixes Pegos:&4&o %@#hue%",PE1);
endif;
}$$
Nota²: ele não consegue identificar quando vem 2 itens agrupados contando apenas 1 por isso o inc 5
nos minérios.
Nota³: Ele é para 1.5
Então é isto espero que o macro seja útil.
Se gostou não se esqueça do UP!
Changelog
Macro postado 24/06/2014
29/06/2014 - adicionado meio de resetar
HolyFreedom disse:vou testa '-'
iTime disse:Opaaa, Bom macro Up'![]()
vlw espero que o macro seja útilzMinerWar disse:Boa macro, Ja estou usando![]()
OwenWinner disse:Ótima macro, irei testar e se tiver um erro eu posto aqui.
Vlw pelo seu vlwlucagorga disse:
- Macro bem legal to usando vlw flw eu recomendo
Valeu !Gabriel Ruan disse:bom macro,vou testar,merece mais 1 cubo =)