ENTREGUE [MACRO] Sleep Herbalismo V1 \o/

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.

SLEEPP

Mito
VIP
Entrou
Jan 3, 2014
Mensagens
10,482
Cubos
0
Macro SleepHerbalismo (Upgrade 0) mais recente [CLIQUE AQUI]

SleepHerbalismo v1 (Caso realmente queira)
SLEEP HERBALISMO V1
Vou ser rápido e direto, portando caso não saiba fazer o preceso de instalação, desculpe-me, vai ter que pesquisar com o SrGoogle.​
OBS: Macro para 1.5.2 e 1.7.2 \o/




1. O que a macro faz ??
  • O macro vai upar Herbalismo infinitamente até que você desligue ou por ventura (raramente) o item usado para upar acabar (Ex: Cana).
  • O macro pode upar até com 3 Hotbar de item no inventário, e pegara mais em um bau duplo caso venha a acabar.
  • O macro possui uma Economia de Plantas, parando de upar por 5 segundos quando o chão está para ser limpo.
  • O macro vai ficar 24h 'atento' ao chat, caso você peguei um tesouro, automaticamente o macro vai parar para guarda-lo, após guardar, volta a upar.
  • O macro vai realizar verificações durando o upe, então, não estranhe se ele abrir o inventário.



2. Instalando a macro !!

2.1. Primeiro instale em uma tecla livre (Com a cor cinza) este código, mais lembrando, este código deve ser instalado no Edit-File.

ovsi5t4.png

Selecione a letra e coloque o seguinte código: $$<SlepHerb.txt>
Crie um novo arquivo no 'Edit-File' com o mesmo nome (SlepHerb) e cole o seguinte código:

Código 1º Parte do Macro 1.5.2
$${

if(slepherb);

log("&d&l[MACRO] &6Sleep Herbalismo v1&4&l (OFF)");
ACHIEVEMENTGET("Desligando, by SLEEP",388:4);
unset(slepherb);
unset(slepverif);
unset(sleplook);
unset(@sleplivr);
unset(@slep5s);
stop();

else;

log("&d&l[MACRO] &6Sleep Herbalismo v1&2&l (ON)");
ACHIEVEMENTGET("Iniciando, by SLEEP",264:4);
set(slepherb);
set(slepverif);
set(sleplook);
endif;


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


PROMPT(#plant,$$i,"Escreva o ID do item que vai ser ultilizado para Upar.");
if(%#plant%=nothing);log("&4Stop !! Nao deixe em Branco.");unset(slepherb);unset(slepverif);unset(sleplook);unset(@slep5s);stop();endif;

CLEARCHAT;
log("&a-> &6Insira o número referente a Velocidade de funcionamento da Macro:");log("");
log("&4-> &8Lembrando que, quando maior o tempo, menos Upara !!");
log("&4-> &8Quanto maior o tempo, menos risco de ser banido por Macro Bugado !!");

log("");
log("&4----------------------------------");
log("&9[1] &7Menor e mais Rapida Velocidade.");log("&9[50] &7Recomendada Velocidade.");log("&9[100+] &7Lenta Velocidade.");
log("&4----------------------------------");
log("");

PROMPT(#velo,$$?,"Insira o número referente a Velocidade de funcionamento da Macro.");
if(%#velo%=nothing);log("&4Stop !! Nao deixe em Branco.");unset(slepherb);unset(slepverif);unset(sleplook);unset(@slep5s);stop();endif;


#livr = 387;
#drag = 122;
#temp = 1000;

endif;

unset(@sleplivr);
unset(@slep5s);
set(sleplook);
if(sleplook);
look(%&loc%);
look(,90);


//=========================================== Herbalizando


do;
do(%#temp%);
do(%#temp%);

if(@sleplivr);

unset(slepverif);
wait(600ms);
look(180,0);
wait(600ms);
key(attack);
wait(600ms);
key(use);
wait(4500ms);
for(#slotn,54,62);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=%#plant%) || (%#id%=%#drag%));
else;
slotclick(%#slotn%,l,true);
wait(185ms);
endif;
next;
wait(185ms);
getslotitem(53,#id,#stack);
wait(185ms);
if(%#stack%!=0);
endif;
until(%#stack%=0);
wait(600ms);
set(slepverif);
unset(@sleplivr);
gui();
wait(600ms);
look(,90);
wait(600ms);
}$$/home slepherb$${
wait(4);
endif;


if(@slep5s);
log("&d&l[MACRO] &6Parei até Limpar !! &4&o#SleepMacros");
unset(slepverif);
wait(9);
log("&d&l[MACRO] &6Limpo !! Continuando. &4&o#SleepMacros");
unset(@slep5s);
set(slepverif);
endif;
pick(%#plant%);
key(use);
wait(%#velo%ms);
key(attack);

look(%&loc%);
look(,90);
loop;

//=========================================== Verificando

if(slepverif);

gui(inventory);
wait(1000ms);
for(#slot,37,44);
getslotitem(%#slot%,#id,#stack);
if(%#id%=%#plant%);
next;
else;
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
for(#slot,9,35);
getslotitem(%#slot%,#id,#stack);
if(%#id%=%#plant%);
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
getslotitem(42,#id,#stack);
if(%#id%=%#plant%);
gui();
else;

//=========================================== Guardando possíveis Livros

wait(600ms);
look(180,0);
wait(600ms);
key(attack);
wait(600ms);
key(use);
wait(4500ms);
for(#slotn,54,62);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=%#plant%) || (%#id%=%#drag%));
else;
slotclick(%#slotn%,l,true);
wait(185ms);
endif;
next;
wait(185ms);
getslotitem(53,#id,#stack);
wait(185ms);
if(%#stack%!=0);
endif;
until(%#stack%=0);
wait(600ms);
gui();
wait(600ms);

//=========================================== Coletando mais Plant

wait(600ms);
look(0,0);
wait(600ms);
key(use);
wait(4500ms);
#click=0;
#id=%#plant%;
do;
getslotitem(64,#id,#stack);
wait(185ms);
if(%#id%=%#plant%);
#tem=1;
else;
#tem=0;
endif;
slotclick(%#click%,l,true);
wait(185ms);
inc(#click,1);
until(%#tem%=1);
gui();
wait(600ms);
look(,90);
wait(600ms);
}$$/home slepherb$${
wait(4);
next;


endif;
endif;
endif;
endif;
gui();
loop;
endif;
}$$

Código 1º Parte do macro 1.7.2
$${

if(slepherb);

log("&d&l[MACRO] &6Sleep Herbalismo v1&4&l (OFF)");
ACHIEVEMENTGET("Desligando, by SLEEP",388:4);
unset(slepherb);
unset(slepverif);
unset(sleplook);
unset(@sleplivr);
unset(@slep5s);
stop();

else;

log("&d&l[MACRO] &6Sleep Herbalismo v1&2&l (ON)");
ACHIEVEMENTGET("Iniciando, by SLEEP",264:4);
set(slepherb);
set(slepverif);
set(sleplook);
endif;


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


PROMPT(&plant,$$i,"Escreva o ID do item que vai ser ultilizado para Upar.");
if(%&plant%=nothing);log("&4Stop !! Nao deixe em Branco.");unset(slepherb);unset(slepverif);unset(sleplook);unset(@slep5s);stop();endif;

CLEARCHAT;
log("&a-> &6Insira o número referente a Velocidade de funcionamento da Macro:");log("");
log("&4-> &8Lembrando que, quando maior o tempo, menos Upara !!");
log("&4-> &8Quanto maior o tempo, menos risco de ser banido por Macro Bugado !!");

log("");
log("&4----------------------------------");
log("&9[1] &7Menor e mais Rapida Velocidade.");log("&9[50] &7Recomendada Velocidade.");log("&9[100+] &7Lenta Velocidade.");
log("&4----------------------------------");
log("");

PROMPT(#velo,$$?,"Insira o número referente a Velocidade de funcionamento da Macro.");
if(%#velo%=nothing);log("&4Stop !! Nao deixe em Branco.");unset(slepherb);unset(slepverif);unset(sleplook);unset(@slep5s);stop();endif;


&livr = written_book;
#drag = 122;
#temp = 1000;

endif;


unset(@sleplivr);
unset(@slep5s);
set(sleplook);
if(sleplook);
look(%&loc%);
look(,90);


//=========================================== Herbalizando


do;
do(%#temp%);
do(%#temp%);

if(@sleplivr);

unset(slepverif);
wait(600ms);
look(180,0);
wait(600ms);
key(attack);
wait(600ms);
key(use);
wait(4500ms);
for(#slotn,54,62);
GETSLOTITEM(%#slotn%,&id,#stack);
if((%&id%=%&plant%) || (%&id%=%#drag%));
else;
slotclick(%#slotn%,l,true);
wait(185ms);
endif;
next;
wait(185ms);
getslotitem(53,#id,#stack);
wait(185ms);
if(%#stack%!=0);
endif;
until(%#stack%=0);
wait(600ms);
set(slepverif);
unset(@sleplivr);
gui();
wait(600ms);
look(,90);
wait(600ms);
}$$/home slepherb$${
wait(4);
endif;


if(@slep5s);
log("&d&l[MACRO] &6Parei até Limpar !! &4&o#SleepMacros");
unset(slepverif);
wait(9);
log("&d&l[MACRO] &6Limpo !! Continuando. &4&o#SleepMacros");
unset(@slep5s);
set(slepverif);
endif;
pick(%&plant%);
key(use);
wait(%#velo%ms);
key(attack);

look(%&loc%);
look(,90);
loop;

//=========================================== Verificando

if(slepverif);

gui(inventory);
wait(1000ms);
for(#slot,36,44);
getslotitem(%#slot%,&id,#stack);
if(%&id%=%&plant%);
next;
else;
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
for(#slot,9,35);
getslotitem(%#slot%,&id,#stack);
if(%&id%=%&plant%);
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
getslotitem(42,&id,#stack);
if(%&id%=%&plant%);
gui();
else;

//=========================================== Guardando possíveis Livros

wait(600ms);
look(180,0);
wait(600ms);
key(attack);
wait(600ms);
key(use);
wait(4500ms);
for(#slotn,54,62);
GETSLOTITEM(%#slotn%,&id,#stack);
if((%&id%=%&plant%) || (%#id%=%#drag%));
else;
slotclick(%#slotn%,l,true);
wait(185ms);
endif;
next;
wait(185ms);
getslotitem(53,#id,#stack);
wait(185ms);
if(%#stack%!=0);
endif;
until(%#stack%=0);
wait(600ms);
gui();
wait(600ms);

//=========================================== Coletando mais Plant

wait(600ms);
look(0,0);
wait(600ms);
key(attack);
wait(600ms);
key(use);
wait(4500ms);
#click=0;
&id=%&plant%;
do;
getslotitem(64,&id,#stack);
wait(185ms);
if(%&id%=%&plant%);
#tem=1;
else;
#tem=0;
endif;
slotclick(%#click%,l,true);
wait(185ms);
inc(#click,1);
until(%#tem%=1);
gui();
wait(600ms);
look(,90);
wait(600ms);
}$$/home slepherb$${
wait(4);
next;


endif;
endif;
endif;
endif;
gui();
loop;
endif;
}$$



1.7.2 Editado por DjRafael.

OBS: Após colar, clique em 'Save' duas vezes.

2.2. Este 2º código, é na parte 'OnChat' do Macro, caso não saiba onde fique, SrGoogle sabe. Lembrando, este código deve ser instalado no Edit-File.

QuQHN56.png

Clique em 'Onchat' e coloque o seguinte código: $$<SlepHerb2.txt>
Crie um novo arquivo no 'Edit-File' com o mesmo nome (SlepHerb2) e cole o seguinte código:

Código 2º Parte do Macro
OBS: Caso não use este da qui, o macro todo não vai funcionar completamente.
$${

ifmatches(%CHAT%,"Limpando itens do chao em 20s");
wait(13);
set(@slep5s);
endif;

&ply = %PLAYER%;

ifmatches(%CHATCLEAN%,"%&ply% encontrou um livro:");
set(@sleplivr);
endif;

}$$

OBS: Após colar, clique em 'Save' duas vezes.
OBS: Caso você já use um macro no 'OnChat' utilize o caractere | para separa-los.




3. Construção da Trap

j2Zg3y5.png

Pegue: 10 Blocos de sua preferência, 4 baús. No centro coloque o bloco em que sua planta (Item) possa ser plantado.
OBS: Utilize a tecla 'F3' para se localizar.

A trap é simples, basta prestar atenção nas imagens.

Imagens:
y50mDAq.png



tO84M7Y.png



hOHnT1U.png

Caso utilize a Cana para upar, coloque água para poder planta-la na areia.




4. Organização do inventário

QmqYCrI.png

O inventário antes de ligar a macro, deverá ficar como na imagem a baixo, como eu uso cana para upar. Se não for cana o seu caso, apenas troque.
OBS: Não coloque item nos primeiros 9 slots do inventário, é lá que vão parar os livros.

Imagens:
FVSqsDk.png




5. Sethomes

Od0K5Ye.png

Simples e facil. Marque /sethome slepherb olhando para baixo (Onde o macro vai colocar e tirar a plantação).




6. Ligando a macro

Ao ligar a macro vai abrir uma lista com todos os itens do jogo, ache o item que você estará upando Herbalismo e insira o ID na caixa de dialogo. (Aconselho dar /iteminfo segurando o item para já saber o ID, pois a lista que a macro abre, pode ser traiçoeira e bugar todo o funcionamento da macro).

uV852nq.png

Logo após inserir o ID do item que será usado, a macro vai peguntar qual delay (tempo) você deseja executar. Insira o número de sua preferência e pronto.

bdMs93r.png




E por fim, fim. Até o próximo macro =)​
Mereço um cubo, vai, de like =)​
Bjos.​







 
partiu testa o/
tipo se eu nao quise colcoa esse bagulho no on chat vai buga o macro ?? o de economia?
 
DamnHP disse:
Sleep esse macro funciona na 1.7???
Não testei.

Kheltz disse:
Ae sim em, vou usar junto com seu modpack os dois são pikas :D
Ai sim, é noiz

malukored disse:
Prefiro o do #playMOd
Tudo bem =)

VoltzNinja disse:
partiu testa o/
tipo se eu nao quise colcoa esse bagulho no on chat vai buga o macro ?? o de economia?
Sim e não, agora com a volta do plugin que junta os itens dropados, a planta acaba muito rapido... Alem disso, se não usar a do OnChat você só tem limite de 9 Livros no Inventário.

Bjos.
 
vou testar adoro suas macros.. só da uma corrigina em umas palavrinhas que estão erradas ou mal colocadas porque tem umas criança que vai reclamar que não entendem ;)

é nois
 
iLero disse:
Sou seu fã sabia ? Macro muito bom Parabéns!
Owwwnt, tbm sou seu meu magnata lindo

Musquitu disse:
vou testar adoro suas macros.. só da uma corrigina em umas palavrinhas que estão erradas ou mal colocadas porque tem umas criança que vai reclamar que não entendem ;)

é nois
Obrigado =)

#rumo a um Homeless da vida
Bjos.
 
Boa..
Mas vai ter varius ban issu nao pode ja levei ban por issu e tal....
 
YuriK1NG disse:
Tou com 1 aki zikão, mais vai ajudar geral
Hehe =)

patrickgamer disse:
Boa..
Mas vai ter varius ban issu nao pode ja levei ban por issu e tal....
Justamente por isso, ao ligar a macro, vai ser perguntado qual delay (tempo) que você quer upar....

Bjos.
 
SLEEPP disse:
Owwwnt, tbm sou seu meu magnata lindo

Obrigado =)

#rumo a um Homeless da vida
Bjos.
vai q vai.. por enquanto to arrcando só editar algumas macrs ;(
 
SLEEPP disse:
Hehe =)


Justamente por isso, ao ligar a macro, vai ser perguntado qual delay (tempo) que você quer upar....

Bjos.
Um entao essa e boa vlw Vai ajudar pakas
#Apoio
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo