ENTREGUE [Macro] Colhe, planta e vende !

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.
E se eu mudar a home "warp vip" para warp loja ele vai funcionar para os "nao vips" ?
 
Substituto disse:
Para quem não é a favor de postar este tipo de macro, sugiro ler este tópico: Introdução
Ou apenas abra o spoiler abaixo.
admin, em 24 Jun 2013 - 2:56 PM, disse:


Prezados,

Como foi definido em enquete que o uso de Macros deve ser permitido nos nossos servidores, decidimos então criar uma área exclusiva em nosso fórum para tratar o assunto e principalmente para levar a informação para os jogadores que ainda não conhecem e/ou não tem acesso aos Macros.

Esse fórum tem portanto o objetivo de tornar global a possibilidade de utilização de Macros e, portanto, eliminar as possíveis vantagens/apelações que o seu uso pode ocasionar - já que todos terão acesso e poderão utilizar -

Pedimos que os jogadores mais experientes no uso de Macros não sejam egoístas e compartilhem informações que contribuam para o andamento desse novo fórum. Toda ajuda será bem vinda, como tutoriais, macros e mesmo no tópico de programação.

Vamos ficar de olho na participação de todos os membros nesse fórum, e, os que mais se destacarem na forma de contribuição/participação serão convidados pela staff para gerenciarem essa área do fórum ou até mesmo entrarem para a nossa equipe como coordenadores. Portanto mais um motivo para todos contribuírem com esse novo fórum de macros.

Atenciosamente,
Equipe CraftLandia

SOBRE O MACRO
1. APENAS PARA VIP.
2. Não precisa informar o tamanho da plantação;
3. O macro pode ser iniciado em qualquer direção;
4. O macro vai começar a colher na direção que for iniciado;
5. Quando termina a colheita o macro inicia a plantação no sentido contrário;
6. Quando termina a plantação o macro abre o inventário e verifica a quantidade de Nether;
7. Se tiver mais de 27 packs o macro salva a home posicao e vai para warp vip e vende;
8. Depois de vender na warp vip, volta para a home posicao e segue para a fileira da direita e repete tudo;
9. Quando o macro terminar toda a colheita vai para a home inicio [que pode ser alterada direto no script]
Obs1.: Coloque sua ferramenta [fortune 3] para colheita no Slot 9 da hotbar!
Obs2.: Este macro foi testado apenas no Servidor Ares, pode não funcionar se o warp vip for diferente.

O MACRO
$${
if(z);
log("&4[Macro] Colheita GoGo Magnata [OFF]");
keyup(FORWARD);
unset(z);
stop();
else;
log("&2[Macro] Colheita GoGo Magnata [ON]");
set(z);
#cont=0;
endif;

&d=%DIRECTION%;
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;

do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
gui(INVENTORY);
for(#i,9,43);
getslotitem(%#i%,#id,#stack);
if((%#id%=372)&&(%#stack%=64));
inc(#cont);
wait(50ms);
endif;
next;
gui();
if(%#cont%<27);
#cont=0;
else;
#cont=0;
}$$/sethome posicao$${
wait(1);
}$$/warp vip$${
wait(3);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+10)|(%XPOS%=%#posx%-10)|(%ZPOS%=%#posz%+10)|(%ZPOS%=%#posz%-10));
wait(100ms);
keyup(FORWARD);
look(-90,);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+19)|(%XPOS%=%#posx%-19)|(%ZPOS%=%#posz%+19)|(%ZPOS%=%#posz%-19));
wait(150ms);
keyup(FORWARD);
look(+90,);
look(,75);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
wait(200ms);
do;
keydown(JUMP);
wait(100ms);
keyup(JUMP);
while(%HITID%=35);
do;
wait(10ms);
until(%HITID%=68);
keyup(FORWARD);
do(6);
key(ATTACK);
wait(500ms);
loop;
}$$/home posicao$${
wait(3);
endif;
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(150ms);
keyup(FORWARD);
else;
}$$/home inicio$${
wait(8);
endif;
loop;
}$$

Posição inicial do macro:
dymALZS.png

Sobre a plantação:
1. Não deve ter corredores;
2. Não precisa ter baús;
3. Se tiver baús não precisa tirar, mas devem estar encima de soulsand.

Exemplo da plantação:
RlKWv0f.png

Se você é novo com macros acesse este [Tutorial] Guia de macro para iniciantes

Agradecimento e crédito a todos os Script Makers que de alguma forma acrescentaram conhecimentos:

[member='BeetleJuice'] | [member='DeathStroker'] | [member='Felipesferreira'] | [member='Furionz'] | [member='Giooovani'] | [member='iBieel'] | [member='jimmyfilips'] | [member='Kilbyre'] | [member='MetiCrefiti'] | [member='Phodalao'] | [member='ShaDoWBR190'] | [member='Web1000'] | [member='Yao Fei']
Clique para expandir...
pode fazer no kratom pf
 
Bem eu jogo no servidor heaven e o warp vip fica para o outro lado
eu acertei o script para q ele fosso para o lado certo já esta ok testado e aprovado
Obs: todos os creditos da macro são do Substituto eu só alterei o lado da warp vip

segue o script

$${
if(z);
log("&4[Macro] Colheita GoGo Magnata [OFF]");
keyup(FORWARD);
unset(z);
stop();
else;
log("&2[Macro] Colheita GoGo Magnata [ON]");
set(z);
#cont=0;
endif;

&d=%DIRECTION%;
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;

do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
gui(INVENTORY);
for(#i,9,43);
getslotitem(%#i%,#id,#stack);
if((%#id%=372)&&(%#stack%=64));
inc(#cont);
wait(50ms);
endif;
next;
gui();
if(%#cont%<27);
#cont=0;
else;
#cont=0;
}$$/sethome posicao$${
wait(1);
}$$/warp vip$${wait(10);look(South);keydown(forward);wait(100ms);keyup(forward);keydown(left);wait(4180ms);keyup(left);keydown(forward);wait(3000ms);keydown(jump);wait(300ms);keyup(jump);keyup(forward);keydown(forward);wait(800ms);keyup(forward);keydown(left);wait(600ms);keyup(left);keydown(forward);wait(100ms);look(+0,80);do(34);key(attack);wait(1t);loop;wait(1);}$$/home posicao$${
wait(3);
endif;
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(150ms);
keyup(FORWARD);
else;
}$$/home fungo$${
wait(1);
endif;
loop;

}$$
 
o meu nao esta funcionando direito ele fica todo doido nao replanta a mesma fileira passa replantando e a proxima e asim so colhe uma sim ou nao e nao replanta de jeito nenhum nao tenho sorte com esse macros
\o/
 
Substituto você poderia me ajudar. Meu problema e o o seguinte o macro colhe e planta só em 1 bloco ele não anda para nenhum lado e fica dando /home inicio. Minha duvida onde devo setar home e qual o nome da home como eu devo apontar a seta se e para baixo ou para frente, e se esse macro funciona no server Region 2.0.
Obrigado pela sua atenção e tenha um Bom Dia.
 
Man ajuda aee please, ao ir vender no warp vip o char tenta vender é onde tem trigo. Podes ajustar isso ou será que o problema é no meu jogo?
Grato.

SanguessugaBR disse:
Substituto você poderia me ajudar. Meu problema e o o seguinte o macro colhe e planta só em 1 bloco ele não anda para nenhum lado e fica dando /home inicio. Minha duvida onde devo setar home e qual o nome da home como eu devo apontar a seta se e para baixo ou para frente, e se esse macro funciona no server Region 2.0.
Obrigado pela sua atenção e tenha um Bom Dia.
Clique para expandir...
Man esse problema eu já tive, e era a linguagem do jogo. Então se está em português do Brasil vc muda para inglês da Inglaterra.(English UK).
abraços!
 
Substituto disse:
Para quem não é a favor de postar este tipo de macro, sugiro ler este tópico: Introdução
Ou apenas abra o spoiler abaixo.
admin, em 24 Jun 2013 - 2:56 PM, disse:


Prezados,

Como foi definido em enquete que o uso de Macros deve ser permitido nos nossos servidores, decidimos então criar uma área exclusiva em nosso fórum para tratar o assunto e principalmente para levar a informação para os jogadores que ainda não conhecem e/ou não tem acesso aos Macros.

Esse fórum tem portanto o objetivo de tornar global a possibilidade de utilização de Macros e, portanto, eliminar as possíveis vantagens/apelações que o seu uso pode ocasionar - já que todos terão acesso e poderão utilizar -

Pedimos que os jogadores mais experientes no uso de Macros não sejam egoístas e compartilhem informações que contribuam para o andamento desse novo fórum. Toda ajuda será bem vinda, como tutoriais, macros e mesmo no tópico de programação.

Vamos ficar de olho na participação de todos os membros nesse fórum, e, os que mais se destacarem na forma de contribuição/participação serão convidados pela staff para gerenciarem essa área do fórum ou até mesmo entrarem para a nossa equipe como coordenadores. Portanto mais um motivo para todos contribuírem com esse novo fórum de macros.

Atenciosamente,
Equipe CraftLandia

SOBRE O MACRO
1. APENAS PARA VIP.
2. Não precisa informar o tamanho da plantação;
3. O macro pode ser iniciado em qualquer direção;
4. O macro vai começar a colher na direção que for iniciado;
5. Quando termina a colheita o macro inicia a plantação no sentido contrário;
6. Quando termina a plantação o macro abre o inventário e verifica a quantidade de Nether;
7. Se tiver mais de 27 packs o macro salva a home posicao e vai para warp vip e vende;
8. Depois de vender na warp vip, volta para a home posicao e segue para a fileira da direita e repete tudo;
9. Quando o macro terminar toda a colheita vai para a home inicio [que pode ser alterada direto no script]
Obs1.: Coloque sua ferramenta [fortune 3] para colheita no Slot 9 da hotbar!
Obs2.: Este macro foi testado apenas no Servidor Ares, pode não funcionar se o warp vip for diferente.

O MACRO
$${
if(z);
log("&4[Macro] Colheita GoGo Magnata [OFF]");
keyup(FORWARD);
unset(z);
stop();
else;
log("&2[Macro] Colheita GoGo Magnata [ON]");
set(z);
#cont=0;
endif;

&d=%DIRECTION%;
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;

do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
gui(INVENTORY);
for(#i,9,43);
getslotitem(%#i%,#id,#stack);
if((%#id%=372)&&(%#stack%=64));
inc(#cont);
wait(50ms);
endif;
next;
gui();
if(%#cont%<27);
#cont=0;
else;
#cont=0;
}$$/sethome posicao$${
wait(1);
}$$/warp vip$${
wait(3);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+10)|(%XPOS%=%#posx%-10)|(%ZPOS%=%#posz%+10)|(%ZPOS%=%#posz%-10));
wait(100ms);
keyup(FORWARD);
look(-90,);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+19)|(%XPOS%=%#posx%-19)|(%ZPOS%=%#posz%+19)|(%ZPOS%=%#posz%-19));
wait(150ms);
keyup(FORWARD);
look(+90,);
look(,75);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
wait(200ms);
do;
keydown(JUMP);
wait(100ms);
keyup(JUMP);
while(%HITID%=35);
do;
wait(10ms);
until(%HITID%=68);
keyup(FORWARD);
do(6);
key(ATTACK);
wait(500ms);
loop;
}$$/home posicao$${
wait(3);
endif;
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(120ms);
keyup(FORWARD);
else;
}$$/home inicio$${
wait(8);
endif;
loop;
}$$

Posição inicial do macro:
dymALZS.png

Sobre a plantação:
1. Não deve ter corredores;
2. Não precisa ter baús;
3. Se tiver baús não precisa tirar, mas devem estar encima de soulsand.

Exemplo da plantação:
RlKWv0f.png

Se você é novo com macros acesse este [Tutorial] Guia de macro para iniciantes

Agradecimento e crédito a todos os Script Makers que de alguma forma acrescentaram conhecimentos:

[member='BeetleJuice'] | [member='DeathStroker'] | [member='Felipesferreira'] | [member='Furionz'] | [member='Giooovani'] | [member='iBieel'] | [member='jimmyfilips'] | [member='Kilbyre'] | [member='MetiCrefiti'] | [member='Phodalao'] | [member='ShaDoWBR190'] | [member='Web1000'] | [member='Yao Fei']
Clique para expandir...
Man está tentando vender nos trigos, e as vezes bate na coluna bem ao lado de onde vende. Ajuda aee please
 
SanguessugaBR disse:
Substituto você poderia me ajudar. Meu problema e o o seguinte o macro colhe e planta só em 1 bloco ele não anda para nenhum lado e fica dando /home inicio. Minha duvida onde devo setar home e qual o nome da home como eu devo apontar a seta se e para baixo ou para frente, e se esse macro funciona no server Region 2.0.
Obrigado pela sua atenção e tenha um Bom Dia.
Clique para expandir...
Man, fica no lado WEST e olhando para o NORTH, e se o seu Minecraft está em português (BR) põe em ENGLISH (UK), se está em English põe em portugês.
Abraços!
 
testei mas não funfo, ele quebra 1 bloco nem replanta e da /home inicio e faz msm coisa.
alguem ajuda ?
 
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
2
Total de visitantes
2
Os totais podem incluir visitantes ocultos.

Em alta

Novos membros

Stay Connected

Voltar
Topo