ENTREGUE [Macro] Colheita Hiper Feliz (Update)

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.
PRA QUEM TEM END OF STREAM, MODIFIQUE A LINHA EM VERMELHO

$${
if(running);
log("&4[Craftlandia] Finalizando o macro...");
keyup(FORWARD);
unset(running);
stop();
else;
log("&2[Craftlandia] Iniciando o macro... Passe as informações necessárias para seu funcionamento!");
set(running);
endif;
do;
prompt(#slot,$$?,"[Macro] Digite em qual slot do HotBar está o item a ser utilizado na colheita (1-9) :");
while((%#slot%<1)|(%#slot%>9));
do;
prompt(#storeys,$$?,"[Macro] Digite o numero de anderes que sua plantação tem :");
if(%#storeys%=0);#storeys = 1;endif;
while((%#storeys%<0));
if(%#storeys%>1);prompt(&name,$$?,"[Macro] Digite o nome do /home dos andares :");endif;
&dire=%DIRECTION%;
ifmatches(%&dire%,N);&dire=NORTH;endif;
ifmatches(%&dire%,S);&dire=SOUTH;endif;
ifmatches(%&dire%,E);&dire=EAST;endif;
ifmatches(%&dire%,W);&dire=WEST;endif;
#storey=1;
do;
slot(%#slot%);wait(100ms);
look(%&dire%);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(50ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
key(USE);
wait(1);
for(#i,54,88);
getslotitem(%#i%,#id,#stack);
if(%#id%=372);
slotclick(%#i%,l,true);
wait(50ms);
endif;
next;
gui();
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(FORWARD);
else;
wait(100ms);
if(%#storeys%>1);
wait(100ms);
if(%#storey%=%#storeys%);
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
else;
inc(#storey,1);
key(CHAT);wait(1);
type(/home %&name%%#storey%);wait(1);
press(RETURN);
wait(8);
endif;
else;
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
endif;
endif;
loop;
}$$



Mude para:
key(ATTACK);wait(350ms);

Isso fará ele colher com o machado mais devagar (dando menos batidas), não dando o maldito end of stream.
OBS.: Não prejudica em nada o macro, continua tudo igual.

Não tirando os créditos do autor!
 
PROBLEMA!

Na minha plant 100x100 ele chega até o fim e não troca de andar, fica só parado.

Mas quando vou fazer o teste em uma plant bem menor, tipo 10x10, ele funciona de boa, porque??

Alguém aew se habilita?
 
iKillerx disse:
Eu peguei o script([topic='197681']esse[/topic]) feito pelo [member='Substituto'] e fiz as alterações:

- Fixei o erro de pular fileiras;
- Adicionei a opção de escolher em qual HotBar está o item a ser utilizado (Por padrão era o 9);
- Adicionei a opção que vi muitos pedirem sobre colher em vários andares;

O seu funcionamento básico continua o mesmo feito pelo seu autor original.

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------

Como usar?

As regras de funcionamento permanecem as mesmas, porém o início mudou:

- Ao liga-lo, ele perguntará em qual HotBar está o item a ser utilizado na colheita (digite o número entre 1 e 9). O valor do HotBar passado deverá estar com algum item, não importando qual seja, só não pode estar vazio.
- Depois perguntará quando andares tem sua plantação. Caso tenha apenas um único andar, pode apenas dá enter, ou digitar 0 ou 1. Se tiver mais que um andar, digite quantos.
- Caso tenha mais de um andar, ele perguntará qual é o nome do /home da plantação, caso ao contrário inicia a colheita. O nome da home funciona assim: Ex. Sua plantação tem 5 andares, e você definiu os /home de cada um sendo /home plant1, /home plant2, etc. Então você vai digitar 'plant' (sem aspas). Atenção: Todos os andares devem estar com /home definido no local inicial da colheita seguindo o padrão já explicado.
- Ao terminar ele irá para o seu /home.

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Change Log:

25/01/2014 :
- Com o aviso do [member='malucostf'], foi detectado erros ao mudar de andar ou dar qualquer /home em ambientes com LAG;

26/01/2012 :
- Foi corrigido o erro ao dar /home e script atualizado;
- Foi adicionado um pouco mais de delay para prevenir erros referente a LAG;
- Foi corrigido erros ao mudar de andar da plantação;

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Futuros update:

- Adicionar a venda automática dos itens colhidos.

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Script atual:

$${
if(running);
log("&4[Craftlandia] Finalizando o macro...");
keyup(FORWARD);
unset(running);
stop();
else;
log("&2[Craftlandia] Iniciando o macro... Passe as informações necessárias para seu funcionamento!");
set(running);
endif;
do;
prompt(#slot,$$?,"[Macro] Digite em qual slot do HotBar está o item a ser utilizado na colheita (1-9) :");
while((%#slot%<1)|(%#slot%>9));
do;
prompt(#storeys,$$?,"[Macro] Digite o numero de anderes que sua plantação tem :");
if(%#storeys%=0);#storeys = 1;endif;
while((%#storeys%<0));
if(%#storeys%>1);prompt(&name,$$?,"[Macro] Digite o nome do /home dos andares :");endif;
&dire=%DIRECTION%;
ifmatches(%&dire%,N);&dire=NORTH;endif;
ifmatches(%&dire%,S);&dire=SOUTH;endif;
ifmatches(%&dire%,E);&dire=EAST;endif;
ifmatches(%&dire%,W);&dire=WEST;endif;
#storey=1;
do;
slot(%#slot%);wait(100ms);
look(%&dire%);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(50ms);
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(50ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
key(USE);
wait(1);
for(#i,54,88);
getslotitem(%#i%,#id,#stack);
if(%#id%=372);
slotclick(%#i%,l,true);
wait(50ms);
endif;
next;
gui();
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(FORWARD);
else;
wait(100ms);
if(%#storeys%>1);
wait(100ms);
if(%#storey%=%#storeys%);
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
else;
inc(#storey,1);
key(CHAT);wait(1);
type(/home %&name%%#storey%);wait(1);
press(RETURN);
wait(8);
endif;
else;
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
endif;
endif;
loop;
}$$

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Espero que gostem ;)


Bug's, erros, dúvidas, sugestões, agradecimentos, etc... Deixem aqui mesmo que tentarei responder o mais breve.



Obs: É necessário que a parede a direita da plantação esteja completamente fechada, para que o script detecte o fim do andar, e mude para o próximo ou finalize a plantação.
Clique para expandir...
Bom, voltei aqui para dizer que ocorre um erro, bom a 1ª versão do macro hiper feliz não digitava para mudar de andar, tipo, o seu macro é como apertar o "T" para abrir o chat e digitar, o mesmo não fazia isto, o seu ocorre que se eu tiver com a tela minimizada ( 2º plano ) ele não muda de andar!
 
A macro em breve vai ser atualizada para a versão 1.7.2/1.7.4.

Eu já comecei os estudos do que mudou, mas to meio sem tempo pra fazer a macro por enquanto.
 
iKillerx disse:
Eu peguei o script([topic='197681']esse[/topic]) feito pelo [member='Substituto'] e fiz as alterações:

- Fixei o erro de pular fileiras;
- Adicionei a opção de escolher em qual HotBar está o item a ser utilizado (Por padrão era o 9);
- Adicionei a opção que vi muitos pedirem sobre colher em vários andares;

O seu funcionamento básico continua o mesmo feito pelo seu autor original.

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------

Como usar?

As regras de funcionamento permanecem as mesmas, porém o início mudou:

- Ao liga-lo, ele perguntará em qual HotBar está o item a ser utilizado na colheita (digite o número entre 1 e 9). O valor do HotBar passado deverá estar com algum item, não importando qual seja, só não pode estar vazio.
- Depois perguntará quando andares tem sua plantação. Caso tenha apenas um único andar, pode apenas dá enter, ou digitar 0 ou 1. Se tiver mais que um andar, digite quantos.
- Caso tenha mais de um andar, ele perguntará qual é o nome do /home da plantação, caso ao contrário inicia a colheita. O nome da home funciona assim: Ex. Sua plantação tem 5 andares, e você definiu os /home de cada um sendo /home plant1, /home plant2, etc. Então você vai digitar 'plant' (sem aspas). Atenção: Todos os andares devem estar com /home definido no local inicial da colheita seguindo o padrão já explicado.
- Ao terminar ele irá para o seu /home.

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Change Log:

25/01/2014 :
- Com o aviso do [member='malucostf'], foi detectado erros ao mudar de andar ou dar qualquer /home em ambientes com LAG;

26/01/2012 :
- Foi corrigido o erro ao dar /home e script atualizado;
- Foi adicionado um pouco mais de delay para prevenir erros referente a LAG;
- Foi corrigido erros ao mudar de andar da plantação;

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Futuros update:

- Adicionar a venda automática dos itens colhidos.

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Script atual:

$${
if(running);
log("&4[Craftlandia] Finalizando o macro...");
keyup(FORWARD);
unset(running);
stop();
else;
log("&2[Craftlandia] Iniciando o macro... Passe as informações necessárias para seu funcionamento!");
set(running);
endif;
do;
prompt(#slot,$$?,"[Macro] Digite em qual slot do HotBar está o item a ser utilizado na colheita (1-9) :");
while((%#slot%<1)|(%#slot%>9));
do;
prompt(#storeys,$$?,"[Macro] Digite o numero de anderes que sua plantação tem :");
if(%#storeys%=0);#storeys = 1;endif;
while((%#storeys%<0));
if(%#storeys%>1);prompt(&name,$$?,"[Macro] Digite o nome do /home dos andares :");endif;
&dire=%DIRECTION%;
ifmatches(%&dire%,N);&dire=NORTH;endif;
ifmatches(%&dire%,S);&dire=SOUTH;endif;
ifmatches(%&dire%,E);&dire=EAST;endif;
ifmatches(%&dire%,W);&dire=WEST;endif;
#storey=1;
do;
slot(%#slot%);wait(100ms);
look(%&dire%);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(50ms);
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(50ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
key(USE);
wait(1);
for(#i,54,88);
getslotitem(%#i%,#id,#stack);
if(%#id%=372);
slotclick(%#i%,l,true);
wait(50ms);
endif;
next;
gui();
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(FORWARD);
else;
wait(100ms);
if(%#storeys%>1);
wait(100ms);
if(%#storey%=%#storeys%);
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
else;
inc(#storey,1);
key(CHAT);wait(1);
type(/home %&name%%#storey%);wait(1);
press(RETURN);
wait(8);
endif;
else;
key(CHAT);wait(1);
type(/home);wait(1);
press(RETURN);
wait(8);
unset(running);
stop();
endif;
endif;
loop;
}$$

------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Espero que gostem ;)


Bug's, erros, dúvidas, sugestões, agradecimentos, etc... Deixem aqui mesmo que tentarei responder o mais breve.



Obs: É necessário que a parede a direita da plantação esteja completamente fechada, para que o script detecte o fim do andar, e mude para o próximo ou finalize a plantação.
Clique para expandir...
Este macro é para a versao 1.7 amigo ?
 
iKillerx disse:
Não! Já sei como atualiza-lo, mas ainda não tive tempo. Provavelmente faço isso hoje ainda, ai quando eu tiver uma graninha eu publico.
Clique para expandir...
Blz kra valeu se caso converter me avisa ae Manim =)
Bom jogo para tiih <3 <3
 
Boa noite srs.! Estou fazendo algo errado, todos os macros de colheita que ponho ñ dão certo.
O char ñ faz a colheita toda, ele apenas colhe o primeiro bloco daee teleporta imediatamente para o próximo.
Por favor expliquem-me pq está dando errado.
Grato.
 
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
1
Visitantes online
1
Total de visitantes
2
Os totais podem incluir visitantes ocultos.

Em alta

Novos membros

Stay Connected

Voltar
Topo