ENTREGUE [MACRO] Vender Fungo na "WARP VIP"

[MCXtremer]

quanta treta '-' macro ja tá de boa?

 

[ZG4brielplayer]

[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

Spoiler

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]

Spoiler

$${
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/

Vc tem um que ele colhe plant de fungo e dps que inv encher ele vende warp vip e volta onde parou ?

 

[Sd Rene]

Tem hora que o macro buao, não sei por que...

 

[Ernanik]

Vc tem um que ele colhe plant de fungo e dps que inv encher ele vende warp vip e volta onde parou ?

Não

 

[GarotoCraftORIGINAL]

Bom macro , pena que e só para vips..

 

[Ernanik]

@EDIT

 

[ChaatinxD]

Muito bom macro )

 

[Fedorento]

Teria como aumentar para 120 baus?

 

[Ernanik]

Teria como aumentar para 120 baus?

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;

}$$

 

[Anamicba]

gostei pena que nao tenho plant de fungo dao grande mais vlw flw

 

[iHead]

Queria tanto pra 96 baus :c Edita pra mim?​

 

[Hellspring]

Bela macro vou usar quando terminar minha plant

 

[Fedorento]

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;

}$$

Vou testar aqui, de qualquer forma já agradeço pela atenção. Brigadoo

 

[Fedorento]

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!

 

[Fedorento]

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;

}$$

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!

 

[Sheldon00]

Ooo partiu dexa mais duas comtas colhendo

 

[Ernanik]

Queria tanto pra 96 baus :c Edita pra mim?​

Teria como aumentar para 120 baus?

Glra postem na area de pedidos,

 

[Gabriel Ruan]

bom macro,vou testar,mais um cubo pra vc

 

[lucas123lu]

BOTA PARA 50 BAUS DUPLOS PF

 

[TriTonnN]

bom macro