ENTREGUE [Macro] Plant de Cacto automática /mc novo

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.
Otimo macro, só que não acho que da muitos lucros com catus, mas para quem ta começando é otimo
 
Inglad disse:
Explicação:

- Bem esse macro constrói uma plantação de cacto automática com o /mc novo.
- Coloque materiais fora da HotBar e ele também puxará para baixo.
- Coloque no inventário se quiser uma pá com Eficiência 4 para acelerar o macro.

Requisitos:

- Ser VIP.
- Estar de /mc ativado.
- Posicione-se no meio do bloco.

Inventário:

OBS: Deixe cacto, areia e terra na HotBar.

2v2v3ub.png

Código:

$${
if(cacto);
unset(cacto);
keyup(sneak);
keyup(forward);
keyup(left);
keyup(right);
keyup(back);
keyup(jump);
LOG("&8%PLAYER% &bCacto &4[Off]");
stop;
else;
#feitos=0;
set(cacto);
LOG("&8%PLAYER% &bCacto &a[On]");
prompt(#andares,$$?,Quantos andares?);
do(%#andares%);
pick(3);
look(,90);
keydown(jump);
wait(200ms);
key(use);
keyup(jump);
wait(200ms);
pick(3);
look(90,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

pick(3);
look(270,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

#posx=%XPOS%;
#posz=%ZPOS%;
do;
look(180,80);
keydown(right);
until(%XPOS%=%#posx%-1);
keyup(right);

pick(3);
look(180,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

pick(3);
look(360,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

#posx=%XPOS%;
#posz=%ZPOS%;
do;
look(0,80);
keydown(forward);
until(%ZPOS%=%#posz%-1);
keyup(forward);
wait(100ms);
//areia
look(0,90);
pick(12);
look(,90);
keydown(jump);
wait(200ms);
key(use);
keyup(jump);
wait(200ms);
pick(12);
look(360,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(180,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(90,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(270,65);
wait(200ms);
key(use);

wait(200ms);
pick(81);
look(360,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(180,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(90,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(270,65);
wait(200ms);
key(use);
wait(200ms);
look(270,35);
pick(3);
wait(20ms);
key(use);
wait(1500ms);
#posy=%YPOS%;
#posx=%XPOS%;
do;
keydown(jump);wait(10ms);keyup(jump);wait(100ms);keydown(jump);
until(%HITID%!=3);
keyup(jump);
do;
keydown(jump);
until(%YPOS%=%#posy%+2);
keyup(jump);
do;
keydown(forward);
until(%XPOS%=%#posx%-1);
keyup(forward);
keydown(sneak);
wait(300ms);
keyup(sneak);
pick(3);
look(270,80);
wait(10ms);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
keyup(sneak);
wait(15ms);
key(use);
wait(400ms);
pick(277);
do;
look(270,65);
key(attack);
until(%HITID%!=3);
wait(500ms);
gui(inventory);
pick(3);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=3);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
pick(12);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=12);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
pick(81);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=81);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
gui();
LOG(&aAndar concluido.);
INC(#feitos);
LOG(&9Andares: &f%#feitos%/%#andares%);
loop;
endif;
}$$

Vídeo demonstração:

[youtube]http://www.youtube.com/watch?v=ChUb06x4NwI&feature=youtu.be[/youtube]



OBS: Não aconselhado utilizar este macro com muito lag, podendo resultar em morte e perda de itens.
OBS2: Não deixe o inventário aberto.
OBS3: Coloque em Edit File.
OBS4: Aconselhado observar periodicamente a macro.
apenas uma pequena obs: poderia corrigir o problema dele bugar na 2° vez usado.
na 1° ele funçiona perfeito, na 2° vez que o usei ele não voa como devia, ele constroi a primeira parte, depois ele buga o voo, assim que coloca o bloco em çima do cacto, ele deveria subir em çima e voltar pta tras depois quebrar o bloco, mas ele não o faz, fica pulando, varias veses sem sair do lugar, pode corrigir?
 
Inglad disse:
Explicação:

- Bem esse macro constrói uma plantação de cacto automática com o /mc novo.
- Coloque materiais fora da HotBar e ele também puxará para baixo.
- Coloque no inventário se quiser uma pá com Eficiência 4 para acelerar o macro.

Requisitos:

- Ser VIP.
- Estar de /mc ativado.
- Posicione-se no meio do bloco.

Inventário:

OBS: Deixe cacto, areia e terra na HotBar.

2v2v3ub.png

Código:

$${
if(cacto);
unset(cacto);
keyup(sneak);
keyup(forward);
keyup(left);
keyup(right);
keyup(back);
keyup(jump);
LOG("&8%PLAYER% &bCacto &4[Off]");
stop;
else;
#feitos=0;
set(cacto);
LOG("&8%PLAYER% &bCacto &a[On]");
prompt(#andares,$$?,Quantos andares?);
do(%#andares%);
pick(3);
look(,90);
keydown(jump);
wait(200ms);
key(use);
keyup(jump);
wait(200ms);
pick(3);
look(90,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

pick(3);
look(270,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

#posx=%XPOS%;
#posz=%ZPOS%;
do;
look(180,80);
keydown(right);
until(%XPOS%=%#posx%-1);
keyup(right);

pick(3);
look(180,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

pick(3);
look(360,80);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
wait(100ms);
keyup(sneak);
key(use);
wait(100ms);

#posx=%XPOS%;
#posz=%ZPOS%;
do;
look(0,80);
keydown(forward);
until(%ZPOS%=%#posz%-1);
keyup(forward);
wait(100ms);
//areia
look(0,90);
pick(12);
look(,90);
keydown(jump);
wait(200ms);
key(use);
keyup(jump);
wait(200ms);
pick(12);
look(360,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(180,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(90,65);
wait(200ms);
key(use);
wait(200ms);
pick(12);
look(270,65);
wait(200ms);
key(use);

wait(200ms);
pick(81);
look(360,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(180,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(90,65);
wait(200ms);
key(use);
wait(200ms);
pick(81);
look(270,65);
wait(200ms);
key(use);
wait(200ms);
look(270,35);
pick(3);
wait(20ms);
key(use);
wait(1500ms);
#posy=%YPOS%;
#posx=%XPOS%;
do;
keydown(jump);wait(10ms);keyup(jump);wait(100ms);keydown(jump);
until(%HITID%!=3);
keyup(jump);
do;
keydown(jump);
until(%YPOS%=%#posy%+2);
keyup(jump);
do;
keydown(forward);
until(%XPOS%=%#posx%-1);
keyup(forward);
keydown(sneak);
wait(300ms);
keyup(sneak);
pick(3);
look(270,80);
wait(10ms);
keydown(back);
keydown(sneak);
wait(1500ms);
keyup(back);
keyup(sneak);
wait(15ms);
key(use);
wait(400ms);
pick(277);
do;
look(270,65);
key(attack);
until(%HITID%!=3);
wait(500ms);
gui(inventory);
pick(3);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=3);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
pick(12);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=12);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
pick(81);
if(%STACKSIZE%<9);
for(#i,9,35);
getslotitem(%#i%,#id);
if(%#id%=81);
slotclick(%#i%,l,true);
wait(75ms);
endif;
next;
endif;
gui();
LOG(&aAndar concluido.);
INC(#feitos);
LOG(&9Andares: &f%#feitos%/%#andares%);
loop;
endif;
}$$

Vídeo demonstração:

[youtube]http://www.youtube.com/watch?v=ChUb06x4NwI&feature=youtu.be[/youtube]



OBS: Não aconselhado utilizar este macro com muito lag, podendo resultar em morte e perda de itens.
OBS2: Não deixe o inventário aberto.
OBS3: Coloque em Edit File.
OBS4: Aconselhado observar periodicamente a macro.
pega na 1.7?
 
eu nao posso dar alt + tab mesmo com o f3 + p pq tipo ele fica batendo na dirt mas nao quebra :/ se puder fixar ficaria bastante grato!
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo