ENTREGUE [MACRO] Vender Fungo na "WARP VIP"

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.
Ernanik disse:
[MACRO] [VIP] VENDA DE FUNGOS NA "WARP VIP"​
___________________________________________________________________________________________________________________________________________
Eae glra mais um macro de venda de colheita ai,

O que esse macro faz: esse macro ao ligar ele da /home fungo01 e pega os fungos(em 21 homes) do bau e vende na "warp vip".

Instalação
1 - Vá em "Controles" > "Macro Settings"
2 - escolha uma tecla
3 - agora coloque ali: $$<fungo.txt>
4 - agora clique em "Arquivos"
5 - agora ali onde esta escrito "Criar um novo arquivo" coloque: fungo , e clique em "Criar"
6 - Cole o MACRO(Script) ali, agora clique em "Salvar", depois clique em "Salvar" e de ESC
7 - Pronto!





Para usar vc precisa dar /sethome fungo01 ate /sethome fungo021, e dai é so ligar e ele vai buscar os fungos nos baus e vender na warp vip

[MACRO]
$${
if(macrodfungo);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou. &5<>");
unset(macrodfungo);
stop();
else;
#fung=1;
log("&d[VENDER FUNGOS] &2 Seu Macro Iniciou .&5<>");
set(macrodfungo);
do;
do;
if(%#fung%=1);}$$
/home fungo01
$${endif;}$$
$${if(%#fung%=2);}$$
/home fungo02
$${endif;}$$
$${if(%#fung%=3);}$$
/home fungo03
$${endif;}$$
$${if(%#fung%=4);}$$
/home fungo04
$${endif;}$$
$${if(%#fung%=5);}$$
/home fungo05
$${endif;}$$
$${if(%#fung%=6);}$$
/home fungo06
$${endif;}$$
$${if(%#fung%=7);}$$
/home fungo07
$${endif;}$$
$${if(%#fung%=8);}$$
/home fungo08
$${endif;}$$
$${if(%#fung%=9);}$$
/home fungo09
$${endif;}$$
$${if(%#fung%=10);}$$
/home fungo010
$${endif;}$$
$${if(%#fung%=11);}$$
/home fungo011
$${endif;}$$
$${if(%#fung%=12);}$$
/home fungo012
$${endif;}$$
$${if(%#fung%=13);}$$
/home fungo013
$${endif;}$$
$${if(%#fung%=14);}$$
/home fungo014
$${endif;}$$
$${if(%#fung%=15);}$$
/home fungo015
$${endif;}$$
$${if(%#fung%=16);}$$
/home fungo016
$${endif;}$$
$${if(%#fung%=17);}$$
/home fungo017
$${endif;}$$
$${if(%#fung%=18);}$$
/home fungo018
$${endif;}$$
$${if(%#fung%=19);}$$
/home fungo019
$${endif;}$$
$${if(%#fung%=20);}$$
/home fungo020
$${endif;}$$
$${if(%#fung%=21);}$$
/home fungo021
$${endif;}$$
$${if(%#fung%=22);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou. &5<>");
log("&d[VENDER FUNGOS] &2 Acabo os baus!");
unset(macrodfungo);
unset(oioi);
keyup(forward);
keyup(left);
stop;
endif;
wait(7);
key(use);
wait(3);
for(#bau132,0,53);
slotclick(%#bau132%,l,true);
wait(50ms);
next;
getslotitem(53,#id,#stack1);
getslotitem(54,#id1,#stack);
wait(200ms);
gui();
if(%#stack1%=0);
inc(#fung);
#return=0;
else;
#return=1;
endif;
if(%#stack%=64);
#return=1;
endif;
if(%#fung%>20);
#return=1;
endif;
until(%#return%);
}$$
/warp vip
$${
wait(4200ms);
do;
look(east);
keydown(forward);
until(%XPOS%==718);
keyup(forward)
do;
look(south);
keydown(forward);
until(%ZPOS%==667);
do;
keydown(jump);
until(%ZPOS%==670);
keyup(jump);
do;
until(%ZPOS%==673);
keyup(forward);
do;
look(east);
keydown(forward);
until(%XPOS%==722);
keyup(forward);
look(south);
look(,45);
do(8);
key(attack);
wait(400ms);
loop;
loop;
endif;
}$$

@EDIT 02/08/2014 - Resolvido um bug no macro.
@EDIT 21/07/2014 - Resolvido alguns bugs no macro e no topico.
SO USAR GLRA..
bugs? comente.
LINK de todos os meus macros >> http://forum.craftla...orums/ernanikk/
Clique para expandir...
Vc tem um que ele colhe plant de fungo e dps que inv encher ele vende warp vip e volta onde parou ?
 
Fedorento disse:
Teria como aumentar para 120 baus?
Clique para expandir...
ai
Código: 
$${
 if(macrodfungo);
  log("&d[VENDER FUNGOS] &2 Seu Macro Parou. &5<>");
  unset(macrodfungo);
  stop();
 else;
  #fung=1;
  log("&d[VENDER FUNGOS] &2 Seu Macro Iniciou .&5<>");
  set(macrodfungo);

endif;

do;
  do;
   if(%#fung%<121);
    gui(CHAT);
    type(/home fungo0%#fung%);
    press(return);
   endif;
   if(%#fung%=121);
    log("&d[VENDER FUNGOS] &2 Seu Macro Parou.");
    log("&d[VENDER FUNGOS] &2 Acabo os baus!");
    unset(macrodfungo);
    unset(oioi);
    keyup(forward);
    keyup(left);
    stop;
   endif;
   wait(7);
   key(use);
   wait(3);
   for(#bau132,0,53);
    slotclick(%#bau132%,l,true);
    wait(50ms);
   next;
   getslotitem(53,#id,#stack1);
   getslotitem(54,#ie,#ste);
   wait(200ms);
   gui();
   if(%#ste%!=0);
   #return=1;
   else;
   if(%#stack1%=0);
    inc(#fung);
    #return=0;
   else;
    #return=1;
   endif;
   endif;
   if(%#fung%>98);
    #return=1;
   endif;
  until(%#return%);
  }$$/warp vip$${
  wait(4200ms);
  do;look(east);keydown(forward);until(%XPOS%==718);keyup(forward);
  do;look(south);keydown(forward);until(%ZPOS%==667);

 do;keydown(jump);until(%ZPOS%==670);keyup(jump);
  do;until(%ZPOS%==673);keyup(forward);
  do;look(east);keydown(forward);until(%XPOS%==722);keyup(forward);
  look(south);look(,45);

 do(8);key(attack);wait(200ms);loop;
 loop;

}$$
 
Ernanik disse:
ai

$${
if(macrodfungo);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou. &5<>");
unset(macrodfungo);
stop();
else;
#fung=1;
log("&d[VENDER FUNGOS] &2 Seu Macro Iniciou .&5<>");
set(macrodfungo);

endif;

do;
do;
if(%#fung%<121);
gui(CHAT);
type(/home fungo0%#fung%);
press(return);
endif;
if(%#fung%=121);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou.");
log("&d[VENDER FUNGOS] &2 Acabo os baus!");
unset(macrodfungo);
unset(oioi);
keyup(forward);
keyup(left);
stop;
endif;
wait(7);
key(use);
wait(3);
for(#bau132,0,53);
slotclick(%#bau132%,l,true);
wait(50ms);
next;
getslotitem(53,#id,#stack1);
getslotitem(54,#ie,#ste);
wait(200ms);
gui();
if(%#ste%!=0);
#return=1;
else;
if(%#stack1%=0);
inc(#fung);
#return=0;
else;
#return=1;
endif;
endif;
if(%#fung%>98);
#return=1;
endif;
until(%#return%);
}$$/warp vip$${
wait(4200ms);
do;look(east);keydown(forward);until(%XPOS%==718);keyup(forward);
do;look(south);keydown(forward);until(%ZPOS%==667);

do;keydown(jump);until(%ZPOS%==670);keyup(jump);
do;until(%ZPOS%==673);keyup(forward);
do;look(east);keydown(forward);until(%XPOS%==722);keyup(forward);
look(south);look(,45);

do(8);key(attack);wait(200ms);loop;
loop;

}$$
Clique para expandir...
Vou testar aqui, de qualquer forma já agradeço pela atenção. Brigadoo
 
Ernanik manow ta com um probleminha, ele pega os fungos no bau e vai para warp vip, até ai ta blz, só que quando ele chega no local para vender os fungos a seta não fica em cima da placa, dai ele nao vende! É só coloca a seta um pouco para baixo na hora de vender que o macro fica bom!
 
Ernanik disse:
ai

$${
if(macrodfungo);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou. &5<>");
unset(macrodfungo);
stop();
else;
#fung=1;
log("&d[VENDER FUNGOS] &2 Seu Macro Iniciou .&5<>");
set(macrodfungo);

endif;

do;
do;
if(%#fung%<121);
gui(CHAT);
type(/home fungo0%#fung%);
press(return);
endif;
if(%#fung%=121);
log("&d[VENDER FUNGOS] &2 Seu Macro Parou.");
log("&d[VENDER FUNGOS] &2 Acabo os baus!");
unset(macrodfungo);
unset(oioi);
keyup(forward);
keyup(left);
stop;
endif;
wait(7);
key(use);
wait(3);
for(#bau132,0,53);
slotclick(%#bau132%,l,true);
wait(50ms);
next;
getslotitem(53,#id,#stack1);
getslotitem(54,#ie,#ste);
wait(200ms);
gui();
if(%#ste%!=0);
#return=1;
else;
if(%#stack1%=0);
inc(#fung);
#return=0;
else;
#return=1;
endif;
endif;
if(%#fung%>98);
#return=1;
endif;
until(%#return%);
}$$/warp vip$${
wait(4200ms);
do;look(east);keydown(forward);until(%XPOS%==718);keyup(forward);
do;look(south);keydown(forward);until(%ZPOS%==667);

do;keydown(jump);until(%ZPOS%==670);keyup(jump);
do;until(%ZPOS%==673);keyup(forward);
do;look(east);keydown(forward);until(%XPOS%==722);keyup(forward);
look(south);look(,45);

do(8);key(attack);wait(200ms);loop;
loop;

}$$
Clique para expandir...
manow ta com um probleminha, ele pega os fungos no bau e vai para warp vip, até ai ta blz, só que quando ele chega no local para vender os fungos a seta não fica em cima da placa, dai ele nao vende! É só coloca a seta um pouco para baixo na hora de vender que o macro fica bom!
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Total: 1 (membros: 0, visitantes: 1)

Estatísticas online

Membros online
0
Visitantes online
3
Total de visitantes
3
Os totais podem incluir visitantes ocultos.

Em alta

Novos membros

Stay Connected

Voltar
Topo