ENTREGUE [Macro] Venda de Peixes e Discos /warp vip

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.

Bzerka333

Razoavel
VIP
Entrou
Jun 15, 2013
Mensagens
175
Pontuação de reação
50
Idade
26
Localização
SP
Cubos
0
Bom galera, esse tópico conterá 3 macros.

1. [Venda de Discos /warp vip] (Com o novo sistema das placas)
2. [Venda de Peixes na /warp vip] (Também contendo o novo sistema)
3. [Joga os itens ruins da pesca na lava]

1. Vamos começar com o macro de [Venda de Discos].

Primeiramente você terá que marcar /sethome bau1 em frente do baú. Exemplo:

chR5Btn.png



(Lembrando, o número de baús é infinito, então você somente precisara marcar /sethome bau1, /sethome bau2 até o número que você quiser! sendo assim baús infinitos!)

Quando o Macro for ativado ele fará a seguinte pergunta:

jdl7kW4.png



E você respondendo à essa pergunta colocara o número de baús que você gostaria que fossem pegos os discos e vende-los na /warp vip. Exemplo (Você tem discos até a sethome /home bau10, então nessa pergunta você respondera 10.)

Depois disso ele ira começar ir da /home bau1 até a home equivalente ao número de baús que você respondeu na pergunta. Ele pegará todos os discos , ira para a /warp vip e passará batendo em cada placa de discos, tudo automaticamente.

Código:
$${
if(esvazia);
unset(esvazia);
log(&6[MACRO] &9Disco &4OFF);
stop;
else;
log(&6[MACRO] &9Disco &aON);
#bau=1;
set(esvazia);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;

do;
gui(chat);wait(500ms);type(/home bau%#bau%);press(return);
wait(3);
key(use);
wait(2);
for(#i,0,53);
getslotitem(%#i%,#id,#stack);
if(%#id%>2255);
slotclick(%#i%,l,true);wait(75ms);
endif;
next;
gui();

gui(inventory);getslotitem(9,#idi,#stacki);gui();

if(%#stacki%=0);
INC(#bau);

if(%#bau%=%#chests%);
stop;
endif;

endif;
wait(1);
until(%#stacki%!=0);

}$$
/warp vip
$${
wait(3);
}$$

$${
do;
look(EAST);
keydown(forward);
until(%XPOS%=711);
keyup(forward);
do;look(WEST);keydown(right);until(%ZPOS%=653);keyup(right);
do;look(WEST);look(,0);keydown(right);keydown(sneak);key(attack);wait(1ms);until(%ZPOS%=645);wait(10ms);keyup(right);keyup(sneak);do;look(WEST);look(+180,);keydown(forward);until(%XPOS%=733);keyup(forward);do;look(WEST);look(+180,);look(,0);keydown(right);keydown(sneak);key(attack);wait(1ms);until(%ZPOS%=653);wait(10ms);keyup(right);keyup(sneak)


type(t);
next;
loop;
endif;
}$$


2. Agora iremos para o macro de [Venda de Peixes].

Esse macro é muito parecido com o de venda de discos. Ele fará a mesma pergunta e as homes são as mesmas , a única diferença é que ele pega peixes , não discos. (Ava!)

Ele pegará somente os peixes, então não se preocupe em deixar outros itens como: sets, espadas, machados, etc. Ele somente pegará os peixes, nada mais!

Código:
$${
if(bad);
unset(bad);
log(&3[MACRO] &dVendedor De Peixes &4OFF);
stop;else;log(&3[MACRO] &dVendedor De Peixes &cON);#bau=1;
set(bad);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;
do;
gui(chat);
wait(500ms);
type(/home bau%#bau%);
press(return);
wait(2);key(use);
wait(2);for(#i,0,53);
getslotitem(%#i%,#id);
if(%#id%=349);
slotclick(%#i%,l,true);
endif;
wait(75ms);
if(%#id%>349);
getslotitem(%#i%,#id,#stack);
endif;
next;
gui();
gui(inventory);
getslotitem(9,#idi,#stacki);
gui();
if(%#stacki%=0);
INC(#bau);
if(%#bau%=%#chests%);
stop;
endif;
endif;
wait(2);
until(%#stacki%!=0);
}$$/warp vip$${wait(3);
}$$ . $${next;
keydown(jump);
wait(100ms);
keyup(jump);
wait(2);
do;
look(SOUTH);
keydown(forward);
until(%ZPOS%=666);
look(EAST);
do;
keydown(forward);
until(%XPOS%=721);
keyup(forward);
wait(250ms);
keydown(forward);
do;
look(SOUTH);
keydown(JUMP);
until(%ZPOS%=668);
keyup(JUMP);
do;
look(SOUTH);
keydown(forward);
until(%ZPOS%=672);
keyup(forward);
look(,-32);
wait(2);
do(6);
key(ATTACK);
wait(500ms);
loop;
endif;
endif;
loop;
endif;
}$$


3. E por último mas não menos importante o [Limpador de itens ruins]

[ATENÇÃO] Tome muito cuidado com esse macro! pois ele pegará tudo que se encontra no baú e jogará na lava! Então nunca deixe algum item valioso ou que você não queira que seja jogado fora nos baús que você irá limpar.


Esse macro também tem o mesmo sistema que os 2 outros. Ele fará a mesma pergunta, você respondera com a quantidade de baús, que as sethomes também serão as mesmas: /home bau1, /home bau2 etc...

Porém nesse macro você terá que marcar uma /sethome l1xo , enfrente a lava! Exemplo:

yZX1OYP.png

Depois do macro iniciado ele pegará todos os itens que ficaram nos baús, dará /home l1xo e jogará TUDO na lava.

Código:
$${

if(esvazia);
unset(esvazia);
log(&d[MACRO] &6Bzerka333 &9Limpador &4OFF);
stop;
else;
log(&d[MACRO] &6Bzerka333 &9Limpador &aON);
#bau=1;
set(esvazia);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;

do;
gui(chat);wait(500ms);type(/home bau%#bau%);press(return);
wait(3);
key(use);
wait(2);
for(#i,0,53);
getslotitem(%#i%,#id,#stack);
if(%#id%>351:4);
slotclick(%#i%,l,true);wait(75ms);
endif;
next;
gui();

gui(inventory);getslotitem(9,#idi,#stacki);gui();

if(%#stacki%=0);
INC(#bau);

if(%#bau%=%#chests%);
stop;
endif;

endif;
wait(1);
until(%#stacki%!=0);

type(t);
wait(500ms);
type(/home l1xo);

wait(500ms);
press(return);
wait(1500ms);
gui(inventory);
for(#ab,9,45);
slotclick(%#ab%,right,false);
wait(50ms);
slotclick(-999,right,false);
next;
loop;
endif;
}$$


Então é isso galera, se você curtiu os macros ou te ajudaram deixe seu LIKE Beleza?


Créditos: [FroesPvp , Phodalao , Jacek231]​
Sem eles não teria essas macros, pois eu somente editei alguns pontos das macros originais desses caras.
 
Bo

Bzerka333 disse:
Bom galera, esse tópico conterá 3 macros.

1. [Venda de Discos /warp vip] (Com o novo sistema das placas)
2. [Venda de Peixes na /warp vip] (Também contendo o novo sistema)
3. [Joga os itens ruins da pesca na lava]

1. Vamos começar com o macro de [Venda de Discos].

Primeiramente você terá que marcar /sethome bau1 em frente do baú. Exemplo:

chR5Btn.png



(Lembrando, o número de baús é infinito, então você somente precisara marcar /sethome bau1, /sethome bau2 até o número que você quiser! sendo assim baús infinitos!)

Quando o Macro for ativado ele fará a seguinte pergunta:

jdl7kW4.png



E você respondendo à essa pergunta colocara o número de baús que você gostaria que fossem pegos os discos e vende-los na /warp vip. Exemplo (Você tem discos até a sethome /home bau10, então nessa pergunta você respondera 10.)

Depois disso ele ira começar ir da /home bau1 até a home equivalente ao número de baús que você respondeu na pergunta. Ele pegará todos os discos , ira para a /warp vip e passará batendo em cada placa de discos, tudo automaticamente.

Código:
$${
if(esvazia);
unset(esvazia);
log(&6[MACRO] &9Disco &4OFF);
stop;
else;
log(&6[MACRO] &9Disco &aON);
#bau=1;
set(esvazia);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;

do;
gui(chat);wait(500ms);type(/home bau%#bau%);press(return);
wait(3);
key(use);
wait(2);
for(#i,0,53);
getslotitem(%#i%,#id,#stack);
if(%#id%>2255);
slotclick(%#i%,l,true);wait(75ms);
endif;
next;
gui();

gui(inventory);getslotitem(9,#idi,#stacki);gui();

if(%#stacki%=0);
INC(#bau);

if(%#bau%=%#chests%);
stop;
endif;

endif;
wait(1);
until(%#stacki%!=0);

}$$
/warp vip
$${
wait(3);
}$$

$${
do;
look(EAST);
keydown(forward);
until(%XPOS%=711);
keyup(forward);
do;look(WEST);keydown(right);until(%ZPOS%=653);keyup(right);
do;look(WEST);look(,0);keydown(right);keydown(sneak);key(attack);wait(1ms);until(%ZPOS%=645);wait(10ms);keyup(right);keyup(sneak);do;look(WEST);look(+180,);keydown(forward);until(%XPOS%=733);keyup(forward);do;look(WEST);look(+180,);look(,0);keydown(right);keydown(sneak);key(attack);wait(1ms);until(%ZPOS%=653);wait(10ms);keyup(right);keyup(sneak)


type(t);
next;
loop;
endif;
}$$


2. Agora iremos para o macro de [Venda de Peixes].

Esse macro é muito parecido com o de venda de discos. Ele fará a mesma pergunta e as homes são as mesmas , a única diferença é que ele pega peixes , não discos. (Ava!)

Ele pegará somente os peixes, então não se preocupe em deixar outros itens como: sets, espadas, machados, etc. Ele somente pegará os peixes, nada mais!

Código:
$${
if(bad);
unset(bad);
log(&3[MACRO] &dVendedor De Peixes &4OFF);
stop;else;log(&3[MACRO] &dVendedor De Peixes &cON);#bau=1;
set(bad);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;
do;
gui(chat);
wait(500ms);
type(/home bau%#bau%);
press(return);
wait(2);key(use);
wait(2);for(#i,0,53);
getslotitem(%#i%,#id);
if(%#id%=349);
slotclick(%#i%,l,true);
endif;
wait(75ms);
if(%#id%>349);
getslotitem(%#i%,#id,#stack);
endif;
next;
gui();
gui(inventory);
getslotitem(9,#idi,#stacki);
gui();
if(%#stacki%=0);
INC(#bau);
if(%#bau%=%#chests%);
stop;
endif;
endif;
wait(2);
until(%#stacki%!=0);
}$$/warp vip$${wait(3);
}$$ . $${next;
keydown(jump);
wait(100ms);
keyup(jump);
wait(2);
do;
look(SOUTH);
keydown(forward);
until(%ZPOS%=666);
look(EAST);
do;
keydown(forward);
until(%XPOS%=721);
keyup(forward);
wait(250ms);
keydown(forward);
do;
look(SOUTH);
keydown(JUMP);
until(%ZPOS%=668);
keyup(JUMP);
do;
look(SOUTH);
keydown(forward);
until(%ZPOS%=672);
keyup(forward);
look(,-32);
wait(2);
do(6);
key(ATTACK);
wait(500ms);
loop;
endif;
endif;
loop;
endif;
}$$


3. E por último mas não menos importante o [Limpador de itens ruins]

[ATENÇÃO] Tome muito cuidado com esse macro! pois ele pegará tudo que se encontra no baú e jogará na lava! Então nunca deixe algum item valioso ou que você não queira que seja jogado fora nos baús que você irá limpar.


Esse macro também tem o mesmo sistema que os 2 outros. Ele fará a mesma pergunta, você respondera com a quantidade de baús, que as sethomes também serão as mesmas: /home bau1, /home bau2 etc...

Porém nesse macro você terá que marcar uma /sethome l1xo , enfrente a lava! Exemplo:

yZX1OYP.png

Depois do macro iniciado ele pegará todos os itens que ficaram nos baús, dará /home l1xo e jogará TUDO na lava.

Código:
$${

if(esvazia);
unset(esvazia);
log(&d[MACRO] &6Bzerka333 &9Limpador &4OFF);
stop;
else;
log(&d[MACRO] &6Bzerka333 &9Limpador &aON);
#bau=1;
set(esvazia);
prompt(#chests,$$?,"Quantos baus?");
INC(#chests);
do;

do;
gui(chat);wait(500ms);type(/home bau%#bau%);press(return);
wait(3);
key(use);
wait(2);
for(#i,0,53);
getslotitem(%#i%,#id,#stack);
if(%#id%>351:4);
slotclick(%#i%,l,true);wait(75ms);
endif;
next;
gui();

gui(inventory);getslotitem(9,#idi,#stacki);gui();

if(%#stacki%=0);
INC(#bau);

if(%#bau%=%#chests%);
stop;
endif;

endif;
wait(1);
until(%#stacki%!=0);

type(t);
wait(500ms);
type(/home l1xo);

wait(500ms);
press(return);
wait(1500ms);
gui(inventory);
for(#ab,9,45);
slotclick(%#ab%,right,false);
wait(50ms);
slotclick(-999,right,false);
next;
loop;
endif;
}$$


Então é isso galera, se você curtiu os macros ou te ajudaram deixe seu LIKE Beleza?


Créditos: [FroesPvp , Phodalao , Jacek231]​
Sem eles não teria essas macros, pois eu somente editei alguns pontos das macros originais desses caras.
Bom você pode fazer uma alteração pra mim?

Seja pra peixes /home peixe0~14

Armaduras /home set0~14

Ferramentas /home ferra0~14?

Tentei editar e não consegui, fica dando /home algumacoisa0 toda vez.
 
EvilGamer disse:
Bo


Bom você pode fazer uma alteração pra mim?

Seja pra peixes /home peixe0~14

Armaduras /home set0~14

Ferramentas /home ferra0~14?

Tentei editar e não consegui, fica dando /home algumacoisa0 toda vez.
Ok, tentarei fazer. Você quer somente de peixes,sets e ferramentas ou também de discos com uma home diferenciada? E lembrando também que os baús são infinitos, você pediu para colocar do 1 ao 14, mas não precisa, porque quando o macro fizer a pergunta você só precisará responder o número de baús equivalentes com os números de homes ou de baús com os itens.

Ah, uma dica, você tem que marcar as sethomes a partir do /home bau1 , porque se você responder na pergunta que o números de baús desejados é de 2, ele vai 1º ao /home bau1 depois ao /home bau2. Então não marque por exemplo: /sethome bau ou /sethome bau0.
 
o de disco ele vai no primeiro bau e pega os discos quando ele vai no seguundo bau ele pega e guarda de novo no bau oO ??
 
lagado da /warp vip dae tipo da uma lagada ae eele vai pro lado errado vendendo...'-'
 
Ta bugado, na /warp vip ele não faz as cordenadas em direçao da placa de de peixe :/
 
pode editar uma coisa ? a velocidade que ele anda quando esta vendendo os discos... ele passa rapido demais e nao vende tudo! Se puder fazer com que ande mais devagar agradeço
 
Status
Não está aberto para novas respostas.

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

Voltar
Topo