ENTREGUE [MACRO] Sleep Herbalismo V1 \o/

Nitrow · Jun 28, 2015

SLEEPP disse:
Isso não aconteceu comigo, caso o chão limpe na hora em que o macro está guardando itens, quando ele voltar a upar ele vai aguardar 5 segundos, mais nada que atrapalhe o UP.

Veja o Tutorial novamente e veja se você está fazendo tudo como manda.

Bjos.

Vlw cara =)

Bjos.

Cara eu vo gravar e te mando o link do video por MP ( daki a 1h te mando o link ) demora pra renderiza e talz.

bieelsz · Jun 28, 2015

Boa, vou testar

SLEEPP · Jun 28, 2015

BielTPzinhoo disse:
Boa, vou testar

Vlw manin.
Voltei pra dizer o que achou.

Bjos.

bieelsz · Jun 28, 2015

SLEEPP disse:
Vlw manin.
Voltei pra dizer o que achou.

Bjos.

Top demais, não vi nenhum bug até agora, coloquei 1 livro nivel 3 que eu pesquei no inv e ele guardou na hora, mto bom msm

oAllanddin · Jun 28, 2015

Obrigado Slep , ajudou bastante mano , agora funfou !!! Like! Caso tenha algum outro bug eu peço ajuda aqui ok? Up

ManuBrau · Jun 28, 2015

Testado ,, Aprovado ,, Não deu Ban ^^ ,, UP!

TheBrKill · Jun 28, 2015

Tô levando dc por spam toda hora..

Bangert · Jun 28, 2015

SLEEPP disse:
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.

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.

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

$${

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;

}$$/g ligando o macro ->#Sleep herbalismo<- sleep my love, até mais =) #sleepmacros$${
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;
}$$

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.

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

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:

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

4. Organização do inventário

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:

5. Sethomes

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).

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.

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

Bjos.

Eu Tb

SLEEPP · Jun 28, 2015

TheBrKill disse:
Tô levando dc por spam toda hora..

Pode explicar melhor ? Apenas você está reclamando disso.

Bjos.

N3RV0Z · Jun 30, 2015

Já to usando

SLEEPP · Jul 6, 2015

NervozVRUM disse:
Já to usando

Obrigado =) Conheça a versão 2.0

Bjos.

xHorrazo · Jul 7, 2015

Boa vou usar

Enviado de meu LG-E435g usando Tapatalk

FR4PS · Jul 15, 2015

Boa macro

KeJiBR · Jul 15, 2015

Macro top, vo usar.

DjRafael · Jul 16, 2015

Ótima macro, muito eficiente.
Editei para a versão 1.7. Preservei todo o seu código e testei durante alguns dias upando herbalismo sem bugs se quiser seria legal adicionar essa versão no seu post inicial. A segunda parte do código permanece inalterada para a 1.7.
Deixo meu like e o meu obrigado.

$${

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;

}$$/g ligando o macro ->#Sleep herbalismo<- sleep my love, até mais =) #sleepmacros$${
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;
}$$

RedSpace · Jul 16, 2015

Ótimo macro, UP. SLEEPP <3

SLEEPP · Jul 16, 2015

DjRafael disse:
Ótima macro, muito eficiente.
Editei para a versão 1.7. Preservei todo o seu código e testei durante alguns dias upando herbalismo sem bugs se quiser seria legal adicionar essa versão no seu post inicial. A segunda parte do código permanece inalterada para a 1.7.
Deixo meu like e o meu obrigado.

$${

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;

}$$/g ligando o macro ->#Sleep herbalismo<- sleep my love, até mais =) #sleepmacros$${
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;
}$$

Opah vlw, só na fiz pois não conheço nada da 1.7.

Adicionada ao tópico.

Bjos.

OrienteMESTRE · 2015-08-01T15:15:19-0300

SLEEPP disse:
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.

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;

}$$/g ligando o macro ->#Sleep herbalismo<- sleep my love, até mais =) #sleepmacros$${
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;

}$$/g ligando o macro ->#Sleep herbalismo<- sleep my love, até mais =) #sleepmacros$${
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.

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

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:

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

4. Organização do inventário

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:

5. Sethomes

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).

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.

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

Bjos.

a Macro pra versão 1.7 está bugada.

Pik4Fumo · 2015-08-03T17:21:30-0300

mano ajuda eu, o macro esta muito bugado, ele fica abrindo os baus toda hora tira e poe as canas, fica confundindo os baus de livro e cana, e os baus ficam mais tempo abertos que upando

talyson valenzuela · 2015-08-12T15:40:06-0300

estou com mesmo problema que o pik4fumo,

ENTREGUE [MACRO] Sleep Herbalismo V1 \o/

Bem-vindo!

Neutro

Hardcore

Mito

Hardcore

Neutro

Neutro

Neutro

Hardcore

Mito

Craftlandiano

Mito

Neutro

Guerreiro

Craftlandiano

Neutro

Excelente

Mito

Excelente

Neutro

Neutro

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected