ENTREGUE [Macro] Pegando Itens

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Inscreva-se agora!
Status
Não está aberto para novas respostas.

RR0N4N

Neutro
VIP
Entrou
Set 25, 2016
Mensagens
72
Cubos
0
*Função Da Macro:
*Esta Macro Ira Permitir Com Que Você Escolha Quais Itens Pegar No Bau Apertando a Tecla Selecionada.(Feito Pensando em Quem Pesca)
*Os Itens Possiveis Para Se Pegar São:
*Armaduras
*Ferramentas
*Armaduras/Ferramentas (Ambos)
*Ferramentas
*Minerios
*Todas Os Itens Citados De Uma Vez

*Macro Funcionando:
d5AnPjI.png
*Codigo:
$${
ACHIEVEMENTGET(§4§lRRonan§f§l-§4§lDestiny,322:1);
exec=0;
&sets="^310$|^311$|^312$|^313$";
&fer="^276$|^277$|^278$|^279$";
&armfer="^310$|^311$|^312$|^313$|^276$|^277$|^278$|^279$";
&min="^264$|^265$|^266$|^369$|^370$";
&all="^310$|^311$|^312$|^313$|^276$|^277$|^278$|^279$|^264$|^265$|^266$|^369$|^370$";
&lap="^351$";
CLEARCHAT;
log(" &2»&8Itens à &2Pegar!");
log("&2»&8Pegar &2Sets &8»&f1");
log("&2»&8Pegar &2Ferramentas &8»&f2");
log("&2»&8Pegar &2Sets&f/&2Ferramentas &8»&f3");
log("&2»&8Pegar &2Minerios &8»&f4");
log("&2»&8Pegar &2Tudo &8»&f5");
log("&2»&8Aperte &f0 &8Para &4Cancelar");
do;
if(KEY_1);#exec=1;break;endif;
if(KEY_2);#exec=2;break;endif;
if(KEY_3);#exec=3;break;endif;
if(KEY_4);#exec=4;break;endif;
if(KEY_5);#exec=5;break;endif;
if(KEY_0);log("");log("&2» &8Finalizado");log("");break;endif;loop;wait(500ms);

if(%#exec%=1);
ACHIEVEMENTGET(§4§lPegando§f§l-§4§lArmaduras,311);
key(use);
wait(3);
for(#w,0,53);
getslotitem(%#w%,#idx,%&sets%);
ifmatches(%#idx%,%&sets%|^0$);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
CLEARCHAT;
log("&2»&8Todos Os &2Sets &8Foram Pegos!");
endif;
endif;
if(%#exec%=2);
ACHIEVEMENTGET(§4§lPegando§f§l-§4§lFerramentas,276);
key(use);
wait(3);
for(#w,0,53);
getslotitem(%#w%,#idx,%&fer%);
ifmatches(%#idx%,%&fer%|^0$);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
CLEARCHAT;
log("&2»&8Todos As &2Ferramentas &8Foram Pegas!");
endif;
endif;
if(%#exec%=3);
ACHIEVEMENTGET(§4§lPegando§f§l-§4§lSet§f§l/§4§lArm,277);
key(use);
wait(3);
for(#w,0,53);
getslotitem(%#w%,#idx,%&armfer%);
ifmatches(%#idx%,%&armfer%|^0$);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
CLEARCHAT;
log("&2»&8Todos Os &2Sets&f/&2Armaduras &8Foram Pegos!");
endif;
endif;
if(%#exec%=4);
ACHIEVEMENTGET(§4§lPegando§f§l-§4§lMinerios,264);
key(use);
wait(3);
for(#w,0,53);
getslotitem(%#w%,#idx,%&min%);
ifmatches(%#idx%,%&min%|^0$);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
log("&2»&8Todos Os &2Minerios &8Foram Pegos!");
endif;
endif;
if(%#exec%=5);
ACHIEVEMENTGET(§4§lPegando§f§l-§4§lTudo,54);
key(use);
wait(3);
for(#w,0,53);
getslotitem(%#w%,#idx,%&all%);
ifmatches(%#idx%,%&all%|^0$);
slotclick(%#w%,l,true);
wait(15ms);
endif;
next;
wait(1);
gui();
CLEARCHAT;
log("&2»&8Todos Os &2Itens &8Foram Pegos!");
endif;
endif;
}$$


QpBoQiF.jpg
 
seria mais fácil editar o macro para guardar somente itens escolhidos risos.
 
netin disse:
seria mais fácil editar o macro para guardar somente itens escolhidos risos.
Desculpa mais nao tenho tanto conhecimento de macro, meu conhecimento é bem limitado.
 
RR0N4N disse:
Desculpa mais nao tenho tanto conhecimento de macro, meu conhecimento é bem limitado.
ah se você fez esse macro da horinha até, dá pra mudar algumas coisas for dos baus kkj
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo