Sei lá pra que serve isso.

Bem-vindo!

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

Registrar agora!
  • PROMOÇÃO DE NATAL NO AR

    Novo servidor: CraftLandia Olimpo


Status
Não está aberto para novas respostas.

zNorton21

Bom
Banido
Entrou
Abr 24, 2015
Mensagens
717
Pontuação de reação
193
Cubos
0
$${
if(pesca);
unset(pesca);
log("&c&lPesca &4&l[OFF]");stop();
else;
log("&c&lPesca &2&l[ON]");
set(pesca);unset(@stopvenda);#bau=1;#capa=1;#peito=1;#calca=1;#bota=1;
endif;
//================================================ direçao, itens e encantamentos
&dir=EAST;
&venc = "^310$|^311$|^312$|^313$|^276$|^279$";
&guardar = "^387|^264$|^265$|^266$|^369$|^370$|^349$";
&sharp5=Sharpness V;
&p4=Protection IV;
gui(inventory);
do;
//================================================ preparar
pick(346);
look(%&dir%);look(,-90);
//================================================ repara
if(%DURABILITY%<20);look(,90);
wait(500ms);
do(2);key(use);wait(500ms);loop;
endif;
//================================================ pesca
look(%&dir%);look(,-90);
do(19);key(use);wait(1ms);loop;
//================================================ verifica inventario
if(bausok);wait(10ms);gui(inventory);
getslotitem(35,#id,#stack);
//================================================ limpa
if(%#stack%!=0);wait(800ms);keydown(jump);wait(100ms);keyup(jump);wait(500ms);keydown(jump);wait(100ms);keyup(jump);wait(1);
look(%&dir%);look(,0);
for(#slotn,9,44);
GETSLOTITEM(%#slotn%,#id,#stack);
IFMATCHES(%#id%,%&guardar%|%&venc%|^346$|^287$|^0$);
else;
SLOTCLICK(%#slotn%);SLOTCLICK(-999);WAIT(250ms);
ENDIF;
next;
//================================================ desbuga o ultimo item do inventário
slotclick(35);wait(100ms);
for(#desbuga,9,34);
getslotitem(%#desbuga%,#idvar,#stackvar);
if(%#stackvar%=0);slotclick(%#desbuga%);endif;
next;
//================================================ verifica enc
gui(inventory);
slotclick(36,l,true);
slot(1);
wait(300ms);
for(#cheio,9,44);
getslotitem(%#cheio%,#id);
ifmatches(%#id%,%&venc%);
slotclick(%#cheio%);
wait(300ms);
slotclick(36);
#guardar_enc=0;
foreach(enchantments);
&enchant=%ENCHANTMENT%;
if((%&enchant%=%&p4%)||(%&enchant%=%&sharp5%));#guardar_enc=1;endif;
if((%&enchant%=%&thorns1%)||(%&enchant%=%&thorns2%)||(%&enchant%=%&thorns3%));#guardar_enc=0;break;endif;
endif;
next;
gui(inventory);wait(300ms);
if(%#guardar_enc%=0);slotclick(36);wait(300ms);slotclick(-999);wait(300ms);else;slotclick(36,l,true);wait(300ms);endif;
endif;
next;
//================================================ verifica de novo.
#slotsvazios=0;
for(#invcheio,9,44);
getslotitem(%#invcheio%,#idvar,#stackvar);
if(%#stackvar%=0);inc(#slotsvazios,1);endif;
next;gui();
if(%#slotsvazios%<4);
//================================================ venda
echo(/home peixe);wait(8);keydown(jump);wait(100ms);keyup(jump);wait(500ms);keydown(jump);wait(100ms);keyup(jump);wait(500ms);
do;key(attack);wait(150ms);until(@stopvenda);unset(@stopvenda);
//================================================ guardando minerios, espadas e machados
echo(/home bau);wait(8);keydown(jump);wait(100ms);keyup(jump);wait(500ms);keydown(jump);wait(100ms);keyup(jump);wait(500ms);
do;wait(1);
if(%#bau%=1);look(north);look(60,-45);endif;
if(%#bau%=2);look(north);look(90,-45);endif;
if(%#bau%=3);look(north);look(120,-45);endif;
if(%#bau%=4);look(north);look(60,-20);endif;
if(%#bau%=5);look(north);look(90,-20);endif;
if(%#bau%=6);look(north);look(120,-20);endif;
if(%#bau%=7);look(north);look(60,0);endif;
if(%#bau%=8);look(north);look(90,0);endif;
if(%#bau%=9);look(north);look(120,0);endif;
if(%#bau%=10);look(north);look(60,30);endif;
if(%#bau%=11);look(north);look(90,30);endif;
if(%#bau%=12);look(north);look(120,30);endif;
wait(950ms);
key(use);wait(2);
for(#guardarlucro,54,89);
getslotitem(%#guardarlucro%,#idvar,#stackvar);
ifmatches(%#idvar%,%&guardar%);
slotclick(%#guardarlucro%,r,true);wait(300ms);
endif;
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau);endif;
gui();
//================================================ guardando capacetes p4
do;wait(1);
if(%#capa%=1);look(north);look(-120,-45);endif;
if(%#capa%=2);look(north);look(-90,-45);endif;
if(%#capa%=3);look(north);look(-60,-45);endif;
wait(950ms);
key(use);wait(2);
for(#guardarlucro,54,89);
getslotitem(%#guardarlucro%,#idvar,#stackvar);
ifmatches(%#idvar%,310);
slotclick(%#guardarlucro%,r,true);wait(300ms);
endif;
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau);endif;
gui();
//================================================ guardando peitos p4
do;wait(1);
if(%#peito%=1);look(north);look(-120,-20);endif;
if(%#peito%=2);look(north);look(-90,-20);endif;
if(%#peito%=3);look(north);look(-60,-20);endif;
wait(950ms);
key(use);wait(2);
for(#guardarlucro,54,89);
getslotitem(%#guardarlucro%,#idvar,#stackvar);
ifmatches(%#idvar%,311);
slotclick(%#guardarlucro%,r,true);wait(300ms);
endif;
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau);endif;
gui();
//================================================ guardando calcas p4
do;wait(1);
if(%#calca%=1);look(north);look(-120,0);endif;
if(%#calca%=2);look(north);look(-90,0);endif;
if(%#calca%=3);look(north);look(-60,0);endif;
wait(950ms);
key(use);wait(2);
for(#guardarlucro,54,89);
getslotitem(%#guardarlucro%,#idvar,#stackvar);
ifmatches(%#idvar%,312);
slotclick(%#guardarlucro%,r,true);wait(300ms);
endif;
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau);endif;
gui();
//================================================ guardando botas p4
do;wait(1);
if(%#bota%=1);look(north);look(-120,30);endif;
if(%#bota%=2);look(north);look(-90,30);endif;
if(%#bota%=3);look(north);look(-60,30);endif;
wait(950ms);
key(use);wait(2);
for(#guardarlucro,54,89);
getslotitem(%#guardarlucro%,#idvar,#stackvar);
ifmatches(%#idvar%,313);
slotclick(%#guardarlucro%,r,true);wait(300ms);
endif;
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau);endif;
gui();
until(%#stack%=0);
until(%#stack%=0);
until(%#stack%=0);
until(%#stack%=0);
until(%#stack%=0);
//================================================ voltando para pescar
}$$/home$${wait(8);keydown(jump);wait(100ms);keyup(jump);wait(500ms);keydown(jump);wait(100ms);keyup(jump);wait(500ms);
gui(inventory);
endif;endif;endif;loop;
}$$

onchat

$${ifmatches(%CHATCLEAN%,"você não tem itens suficientes para vender!");
set(@stopvenda);
endif;}$$


quem descobrir como funciona pode usar, de preferencia no origens/fênix <3
 
edupt disse:
Como se tem de por os báus?
E é uma macro de Pesca.
vou fazer um tutorial, mas até lá esperava que alguém o "desvendasse" só olhando o script.
 
zMiguelVieira disse:
vou fazer um tutorial, mas até lá esperava que alguém o "desvendasse" só olhando o script.
1º Da para ver nos log(Pesca OFF); e tals
2º ja sabia vendo o script :)
 
Macro De Pesca. So Falta Os Baus ksksk

Enviado de meu LG-E455f usando Tapatalk
 
Isto é um macro.. faz um tópico explicando isso aí..

Enviado de meu XT1068 usando Tapatalk
 
Status
Não está aberto para novas respostas.

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

Voltar
Topo