ENTREGUE [Macro] Mobspawners 2 (Mais Lucro)

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Registrar agora!
Status
Não está aberto para novas respostas.
Será que tem como vc fazer um que não guarde os itens que tão nos slots de 1 à 9? assim poderemos colocar outro
macro para comer qnd estiver com fome e colocar mais packs de diamante
 
Felipesferreira disse:
ufOZWO5.jpg


Sejam todos bem vindos a este novo Tutorial de Macro!
-Obs: Não da End of Stream!
Para usar em segundo plano:
http://forum.craftlandia.com.br/ipb/index.php?/topic/180163-macro-auto-click-em-segundo-plano/

O que ele faz?
-Este código mata os mobs que estiverem a sua frente;
-Repara sua espada quando estiver com 100 usos restantes;
-Guarda em baus por meio de homes (assim, aumenta o seu lucro, ao invés de guardar em apenas 4 baus duplos.
Especifica mais como ele guarda? E é diferente em que do outro?
-Quando seu inventário estiver cheio, ele vai automaticamente na home que você marcou, guarda os itens, e volta para o mob
sem ter risco de guarda a espada e os dimas, pois ele não guarda os slots 8 e 9 da hotbar.
Pode ser para player VIP e Não-VIP?
-Sim, editei pensando nessas pessoas para funcionar perfeitamente.
-O para Não-VIPs, mata os mobs,
e quando a espada estiver com pouca durabilidade,
troca para a próxima espada (slot), até completar os 9 slots da hotbar!
-Só para lembrar que para Não-VIPs,
não vai guardar nenhum slot da hotbar!

Como é a trap:
Lembre de salvar uma home olhando para os mobs chamada: matarmobs (/sethome matarmobs)

Como é o lugar onde irá guardar os itens:
Outro álbum de fotos:
http://imgur.com/a/7oiH7
Lembre de salvar homes como na segunda print na frente do bau, até que chegue à /sethome bau14
O código:
-Para VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

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

do;
pick(276);

if(%DURABILITY%<70);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);}$$
/pvp off
$${log("&4[Macro] &6 Espada reparada!");
endif;

do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$
$${if(%#bau%=10);}$$
/home bau10
$${endif;}$$
$${if(%#bau%=11);}$$
/home bau11
$${endif;}$$
$${if(%#bau%=12);}$$
/home bau12
$${endif;}$$
$${if(%#bau%=13);}$$
/home bau13
$${endif;}$$
$${if(%#bau%=14);}$$
/home bau14
$${endif;}$$

$${wait(5);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=14);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas matará mobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$
-Para Não-VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#un=1;
#bau=1;
set(nf);

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

do;


if(%DURABILITY%<70);

if(%#un%=9);log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
endif;
log("&4[Macro] &6 Durabilidade baixa, espada trocada...");


look(0,90);
inc(#un);
inventoryup(1);
wait(500ms);
endif;


do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$

$${wait(15);
key(use);
wait(1);
for(#i,54,80);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=9);
unset(nf);
log(&4[Macro] &6Baús cheios! Apenas matará mobs agora.);
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$

Como instalar:
Olhe este Álbum de fotos:
http://imgur.com/a/PEyKD
Créditos:
E eu, Felipesferreira, ajustei algumas coisas, corrigi, testei e formei estes códigos.
Obrigado, e bom uso.
Se for útil, dê um UP, para me incentivar a trazer mais tutoriais.
@Edit: Pequeno erro corrigido! (Nos códigos e no tópico)
Obs: A partir do último EDIT, está tudo correto! Desculpa '-'
Change Log:
-(12/09/13) Pequena correção no código de Não VIPS na parte de trocas de espada, baseado nisso: http://forum.craftlandia.com.br/ipb/index.php?/topic/189470-pedido-macro-complet%C3%A3o/?p=1532678
-(15/09/13) Colocado link de como utilizar este código em segundo plano!
-[Bug] 100% arrumado o Bug de quebrar a espada!
-[Bug] Resolvido bug de não estar trocando as espadas quando estiver com durabilidade baixa!
-(24/10/13) Colocado novo sistema de que quando chegar no slot nove o macro pare. (Não-VIPs)
Bom macro, estou usando!
 
Felipesferreira disse:
ufOZWO5.jpg


Sejam todos bem vindos a este novo Tutorial de Macro!
-Obs: Não da End of Stream!
Para usar em segundo plano:
http://forum.craftlandia.com.br/ipb/index.php?/topic/180163-macro-auto-click-em-segundo-plano/

O que ele faz?
-Este código mata os mobs que estiverem a sua frente;
-Repara sua espada quando estiver com 100 usos restantes;
-Guarda em baus por meio de homes (assim, aumenta o seu lucro, ao invés de guardar em apenas 4 baus duplos.
Especifica mais como ele guarda? E é diferente em que do outro?
-Quando seu inventário estiver cheio, ele vai automaticamente na home que você marcou, guarda os itens, e volta para o mob
sem ter risco de guarda a espada e os dimas, pois ele não guarda os slots 8 e 9 da hotbar.
Pode ser para player VIP e Não-VIP?
-Sim, editei pensando nessas pessoas para funcionar perfeitamente.
-O para Não-VIPs, mata os mobs,
e quando a espada estiver com pouca durabilidade,
troca para a próxima espada (slot), até completar os 9 slots da hotbar!
-Só para lembrar que para Não-VIPs,
não vai guardar nenhum slot da hotbar!

Como é a trap:
Lembre de salvar uma home olhando para os mobs chamada: matarmobs (/sethome matarmobs)

Como é o lugar onde irá guardar os itens:
Outro álbum de fotos:
http://imgur.com/a/7oiH7
Lembre de salvar homes como na segunda print na frente do bau, até que chegue à /sethome bau14
O código:
-Para VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

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

do;
pick(276);

if(%DURABILITY%<70);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);}$$
/pvp off
$${log("&4[Macro] &6 Espada reparada!");
endif;

do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$
$${if(%#bau%=10);}$$
/home bau10
$${endif;}$$
$${if(%#bau%=11);}$$
/home bau11
$${endif;}$$
$${if(%#bau%=12);}$$
/home bau12
$${endif;}$$
$${if(%#bau%=13);}$$
/home bau13
$${endif;}$$
$${if(%#bau%=14);}$$
/home bau14
$${endif;}$$

$${wait(5);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=14);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas matará mobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$
-Para Não-VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#un=1;
#bau=1;
set(nf);

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

do;


if(%DURABILITY%<70);

if(%#un%=9);log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
endif;
log("&4[Macro] &6 Durabilidade baixa, espada trocada...");


look(0,90);
inc(#un);
inventoryup(1);
wait(500ms);
endif;


do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$

$${wait(15);
key(use);
wait(1);
for(#i,54,80);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=9);
unset(nf);
log(&4[Macro] &6Baús cheios! Apenas matará mobs agora.);
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$

Como instalar:
Olhe este Álbum de fotos:
http://imgur.com/a/PEyKD
Créditos:
E eu, Felipesferreira, ajustei algumas coisas, corrigi, testei e formei estes códigos.
Obrigado, e bom uso.
Se for útil, dê um UP, para me incentivar a trazer mais tutoriais.
@Edit: Pequeno erro corrigido! (Nos códigos e no tópico)
Obs: A partir do último EDIT, está tudo correto! Desculpa '-'
Change Log:
-(12/09/13) Pequena correção no código de Não VIPS na parte de trocas de espada, baseado nisso: http://forum.craftlandia.com.br/ipb/index.php?/topic/189470-pedido-macro-complet%C3%A3o/?p=1532678
-(15/09/13) Colocado link de como utilizar este código em segundo plano!
-[Bug] 100% arrumado o Bug de quebrar a espada!
-[Bug] Resolvido bug de não estar trocando as espadas quando estiver com durabilidade baixa!
-(24/10/13) Colocado novo sistema de que quando chegar no slot nove o macro pare. (Não-VIPs)
Está dando End os Stream man
 
Boa macro


Enviado do meu iPhone usando Tapatalk
 
Felipesferreira disse:
ufOZWO5.jpg


Sejam todos bem vindos a este novo Tutorial de Macro!
-Obs: Não da End of Stream!
Para usar em segundo plano:
http://forum.craftlandia.com.br/ipb/index.php?/topic/180163-macro-auto-click-em-segundo-plano/

O que ele faz?
-Este código mata os mobs que estiverem a sua frente;
-Repara sua espada quando estiver com 100 usos restantes;
-Guarda em baus por meio de homes (assim, aumenta o seu lucro, ao invés de guardar em apenas 4 baus duplos.
Especifica mais como ele guarda? E é diferente em que do outro?
-Quando seu inventário estiver cheio, ele vai automaticamente na home que você marcou, guarda os itens, e volta para o mob
sem ter risco de guarda a espada e os dimas, pois ele não guarda os slots 8 e 9 da hotbar.
Pode ser para player VIP e Não-VIP?
-Sim, editei pensando nessas pessoas para funcionar perfeitamente.
-O para Não-VIPs, mata os mobs,
e quando a espada estiver com pouca durabilidade,
troca para a próxima espada (slot), até completar os 9 slots da hotbar!
-Só para lembrar que para Não-VIPs,
não vai guardar nenhum slot da hotbar!

Como é a trap:
Lembre de salvar uma home olhando para os mobs chamada: matarmobs (/sethome matarmobs)

Como é o lugar onde irá guardar os itens:
Outro álbum de fotos:
http://imgur.com/a/7oiH7
Lembre de salvar homes como na segunda print na frente do bau, até que chegue à /sethome bau14
O código:
-Para VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

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

do;
pick(276);

if(%DURABILITY%<70);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);}$$
/pvp off
$${log("&4[Macro] &6 Espada reparada!");
endif;

do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$
$${if(%#bau%=10);}$$
/home bau10
$${endif;}$$
$${if(%#bau%=11);}$$
/home bau11
$${endif;}$$
$${if(%#bau%=12);}$$
/home bau12
$${endif;}$$
$${if(%#bau%=13);}$$
/home bau13
$${endif;}$$
$${if(%#bau%=14);}$$
/home bau14
$${endif;}$$

$${wait(5);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=14);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas matará mobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$
-Para Não-VIPs:
$${
if(sword1);
log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
else;
log("&4[Macro] &6Matar mobs ativado.");
set(sword1);

&dir = %DIRECTION%;
#un=1;
#bau=1;
set(nf);

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

do;


if(%DURABILITY%<70);

if(%#un%=9);log("&4[Macro] &6Matar mobs desativado.");
unset(sword1);
stop();
endif;
log("&4[Macro] &6 Durabilidade baixa, espada trocada...");


look(0,90);
inc(#un);
inventoryup(1);
wait(500ms);
endif;


do(50);
look(%&dir%);
look(,-20);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$

$${wait(15);
key(use);
wait(1);
for(#i,54,80);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=9);
unset(nf);
log(&4[Macro] &6Baús cheios! Apenas matará mobs agora.);
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${endif;
endif;
loop;
endif;
}$$

Como instalar:
Olhe este Álbum de fotos:
http://imgur.com/a/PEyKD
Créditos:
E eu, Felipesferreira, ajustei algumas coisas, corrigi, testei e formei estes códigos.
Obrigado, e bom uso.
Se for útil, dê um UP, para me incentivar a trazer mais tutoriais.
@Edit: Pequeno erro corrigido! (Nos códigos e no tópico)
Obs: A partir do último EDIT, está tudo correto! Desculpa '-'
Change Log:
-(12/09/13) Pequena correção no código de Não VIPS na parte de trocas de espada, baseado nisso: http://forum.craftlandia.com.br/ipb/index.php?/topic/189470-pedido-macro-complet%C3%A3o/?p=1532678
-(15/09/13) Colocado link de como utilizar este código em segundo plano!
-[Bug] 100% arrumado o Bug de quebrar a espada!
-[Bug] Resolvido bug de não estar trocando as espadas quando estiver com durabilidade baixa!
-(24/10/13) Colocado novo sistema de que quando chegar no slot nove o macro pare. (Não-VIPs)
top cara,mais tipo,ele deixa morrer como os outros,por que um macro que tenho aqui quando eu to no neutro ele morre,não sei se é para blaze ou algo assim.
 
Status
Não está aberto para novas respostas.

Usuários que estão visualizando este tópico

Voltar
Topo