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.

Inscreva-se agora!
Status
Não está aberto para novas respostas.

Bzerka333

Razoavel
VIP
Entrou
Jun 15, 2013
Mensagens
175
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.

Users who are viewing this thread

Voltar
Topo