Manjadores de Macro >>

Bem-vindo!

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

Registrar agora!
  • PROMOÇÃO DE NATAL NO AR

    Novo servidor: CraftLandia Olimpo


Status
Não está aberto para novas respostas.
Homeless disse:
Meu deus, só vem pra cubar msm *-*
Minhas especialidade Homeless é cubar, por que vip por 33 $ tá difícil, entenda a situação ;-;
 
Homeless disse:
Para verificar o bau, voce deve estar usando um ciclo "FOR".

Quando o id do item for igual ao da pá, vc deve estar clicando no slot dela, com o shift ou colocando em um slot determindado.

Após pegar 1 pa, use o comando "break;", assim vc interromperá o comando FOR, pegando apenas 1 pá.

Se não conseguir fazer, eu te mando um exemplo de código depois, mas cite minha msg, se nao não irei ver.


Esse cara sabe o que fala =P


Aproveitem por enquanto, saindo de férias vou desenvolver um meu também.

Muahuahuahauahua (risada malévola)


vi agora, esse também manja o que fala hahaha


Achei outro, estou gostando de ver hahaha
Pode me passar também, fiquei curioso, ira ajudar a macro que estou pensando...
 
Homeless disse:
Eu ja te passei um macro que fazia isso:

$${
gui(inventory); //abre o inv
wait(300ms);
for(#homeless_inc,9,35); //set parametros para o inventario
getslotitem(%#homeless_inc%,#homeless_id); //pega o id de cada item no inv
if(%#homeless_id%=388); // se for igual esmeralda, entra aqui
slotclick(%#homeless_inc%,l,true); //pega a esmeralda
wait(50ms);
break; //quebra o ciclo de varredura do inv, como ja peguei a esmeralda, não quero que continue a procurar mais, assim, se ela estiver no slot 9, não quero que verifique ate o slot 35, pode parar de buscara aew mesmo.
endif; //final do if
next; //final do for
gui();
}$$

Entendeu como funciona? serve para qualquer ciclo.
Se nao conseguir fazer me manda PM e te mando o código que vc precisa. mas quero que tente!
vlw fera usei seu exemplo funfo 100%
pra min ta dificel programar macro pois sou iniciante mas agora sei onde procurar ajuda <3
 
snak disse:
Minhas especialidade Homeless é cubar, por que vip por 33 $ tá difícil, entenda a situação ;-;
Não sei qual server voce joga, mas no meu, vip esta 10kk, 10kk d apara fazer em 1 semana, poe suas contas para pescar!
Ainda é mais facil que ficar se matando no fórum!


zSanto disse:
Pode me passar também, fiquei curioso, ira ajudar a macro que estou pensando...
Ja mandei aqui no post


evertonschuster disse:
vlw fera usei seu exemplo funfo 100%
pra min ta dificel programar macro pois sou iniciante mas agora sei onde procurar ajuda <3
Qualquer coisa só pedir. Se ja resolveu da resolvido aew para encerrar o tópico
 
Homeless disse:
Não sei qual server voce joga, mas no meu, vip esta 10kk, 10kk d apara fazer em 1 semana, poe suas contas para pescar!
Ainda é mais facil que ficar se matando no fórum!


Ja mandei aqui no post


Qualquer coisa só pedir. Se ja resolveu da resolvido aew para encerrar o tópico
Sim, o vip no meu server tá uns 12kk por aí, tenho 2k de pesca acabo o vip ;-; tenho mob de blaze mais sem vip é foda emfim, só preciso de +3 dias pra pega vip .-.
 
$${

if(cav);
unset(cav);
log( );
log("&6&l[VIP] &d&lCava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
log( );

unset(@cav);
stop();

else;
set(cav);
log( );
log("&6&l[VIP] &d&lCava-Cava &2(ON)");
log( );

set(@cav);

IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;


#exp = 0;
#bau = 1;

PROMPT(#bloco,$$i, Que bloco usar para cavar?);
#pa = 277;
#rep = 256;
#dur = 950;
#del = 300;
#vel = 1;
#a = 1;


#dur=%#dur%;
#repq=0;

look(%&near%);
look(,55);

set(cav2);
do;
do(%#del%);
pick(%#bloco%);
key(use);
wait(%#vel%ms);
pick(%#pa%);
if(%DURABILITY%<30);
}$$/home paruim$${
wait(7);
key(use);
wait(1);

slotclick(89,l,true);
wait(1);
gui();
wait(1);
look(north);
wait(1);
key(use);
wait(1);
FOR(#u,0,53);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=277);
wait(140ms);
SLOTCLICK(%#u%);

SLOTCLICK(+999);
SLOTCLICK(89);
gui();
ENDIF;
NEXT;


}$$/home macroesc$${
wait(6);

if(%#repq%=0);


else(%#repq%>0%);

#repq=0;
look(%&near%);
look(,90);
key(use);
wait(2);
#repq=0;

endif;endif;

endif;

look(%&near%);
look(,55);

do(%#vel%);
key(attack);
loop;

inc(#exp, 2);
loop;


if(cav2);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
gui();
}$$
/home esc1
$${
wait(6);
gui(inventory);
wait(150ms);
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=2267);
wait(140ms);
SLOTCLICK(%#u%);

SLOTCLICK(-999);
ENDIF;
NEXT;
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=88);
wait(140ms);
SLOTCLICK(%#u%);

SLOTCLICK(-999);
ENDIF;
NEXT;
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=354);
wait(140ms);
SLOTCLICK(%#u%);

SLOTCLICK(-999);
ENDIF;
NEXT;
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=351);
wait(140ms);
SLOTCLICK(%#u%);

SLOTCLICK(-999);
ENDIF;
NEXT;
gui();
do;
}$$


$${if(%#bau%=1);}$$
$${wait(1);look(220,340);endif;}$$

$${if(%#bau%=2);}$$
$${wait(1);look(240,340);endif;}$$

$${if(%#bau%=3);}$$
$${wait(1);look(270,340);endif;}$$

$${if(%#bau%=4);}$$
$${wait(1);look(300,340);endif;}$$

$${if(%#bau%=5);}$$
$${wait(1);look(320,340);endif;}$$

$${if(%#bau%=6);}$$
$${wait(1);look(220,0);endif;}$$

$${if(%#bau%=7);}$$
$${wait(1);look(240,0);endif;}$$

$${if(%#bau%=8);}$$
$${wait(1);look(270,0);endif;}$$

$${if(%#bau%=9);}$$
$${wait(1);look(300,0);endif;}$$

$${if(%#bau%=10);}$$
$${wait(1);look(320,0);endif;}$$

$${if(%#bau%=11);}$$
$${wait(1);look(220,25);endif;}$$

$${if(%#bau%=12);}$$
$${wait(1);look(240,25);endif;}$$

$${if(%#bau%=13);}$$
$${wait(1);look(270,25);endif;}$$

$${if(%#bau%=14);}$$
$${wait(1);look(300,25);endif;}$$

$${if(%#bau%=15);}$$
$${wait(1);look(320,25);endif;}$$


$${
wait(1);
key(use);
wait(1);


for(#slotn,54,89);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
else;
slotclick(%#slotn%,l,true);wait(30ms);
endif;
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);inc(#bau);

endif;
if(%#bau%=16);
unset(cav2);
log(&d&l[MACRO] Cava-Cava &b"Baus cheios! Voltando a escavar.");
gui();
else;
gui();
endif;
until(%#stack%=0);

}$$

/home macroesc

$${
wait(6);
endif;
endif;


gui(inventory);
wait(600ms);
for(#slot,9,35);
GETSLOTITEM(%#slot%,#id,#stack);
if((%#id%=%#pa%) || (%#id%=%#bloco%));
slotclick(%#slot%,l,true);wait(30ms);
endif;
next;
gui();

loop;
endif;
}$$
 
Status
Não está aberto para novas respostas.

Usuários que estão visualizando este tópico

Voltar
Topo