ENTREGUE [Macro][VIP]Venda de Peixes

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.

G0dzilla88

Neutro
VIP
Entrou
Jul 7, 2013
Mensagens
36
Cubos
0
Macro vip de vender peixes:

-Precisa setar uma home!
-Baus infinitos
-Venda rápida na Warp vip

Como funciona:

A macro é bem simples, você terá que fazer uma fileira de baus de peixe(duplos ou simples), basta apenas setar 1 home na frente do baú mais da esquerda, logo em seguida ligue a macro, e ele ira andar para direita lotando o inventario, quando o inventario lotar de peixe, ele vai para warp vip sozinho, anda até a placa de peixe e vende, depois volta para a home e fica fazendo isso até os peixes acabar :)

MKrX2Jk.png



A Macro:
$${
IF(discos);
UNSET(discos);
LOG(&6Venda de Peixe &4OFF &3&l[G0dzilla88]);
STOP;
ELSE;
LOG(&6Venda de Peixe &2ON &3&l[G0dzilla88]);
SET(discos);
ENDIF;

DO;
DO;
DO;KEY(USE);WAIT(1);UNTIL(%GUI%="GUICHEST");
FOR(#i,349,349);
DO;
GETSLOT(%#i%,#u);
GETSLOTITEM(54,#id,#stack);
WAIT(10ms);
IF((%#u%=-1)||(%#u%>53)||(%#stack%>0));
BREAK;
ELSE;
SLOTCLICK(%#u%,l,true);
ENDIF;
LOOP;
NEXT;
IF(%#stack%=0);
GUI;
#posx=%XPOS%;
#posz=%ZPOS%;
KEYDOWN(SNEAK);
KEYDOWN(RIGHT);
DO;UNTIL((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
WAIT(150ms);
KEYUP(RIGHT);
KEYUP(SNEAK);
WAIT(1);
IF((%HITID%=54)||(%HITID%=146));
}$$/sethome venderpeixe$${
ELSE;
UNSET(discos);
LOG(&6Venda de Peixe &4OFF &3&l[G0dzilla88]);
STOP;
ENDIF;
ENDIF;
UNTIL(%#stack%!=0);

FOR(#id,349);
SET(#d%#id%,0);
WAIT(100ms);
NEXT;

FOR(#c,54,89);
GETSLOTITEM(%#c%,#id,#stack);
WAIT(10ms);
IF(%#id%=349);INC(#d349,1);NEXT;ENDIF;
NEXT;
#ztemp=%ZPOS%;
#xtemp=%XPOS%;
}$$/warp vip$${
/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;

}$$/home venderpeixe$${
wait(9);
DO;UNTIL((%ZPOS%=%#ztemp%)&&(%ZPOS%=%#ztemp%));
LOOP;
}$$

Obs: Se tiverem dificuldade em utilizar a macro, postem aqui no tópico que faria um video explicativo, beijinhos <3
 
G0dzilla88 disse:
Macro vip de vender peixes:

-Precisa setar uma home!
-Baus infinitos
-Venda rápida na Warp vip

Como funciona:

A macro é bem simples, você terá que fazer uma fileira de baus de peixe(duplos ou simples), basta apenas setar 1 home na frente do baú mais da esquerda, logo em seguida ligue a macro, e ele ira andar para direita lotando o inventario, quando o inventario lotar de peixe, ele vai para warp vip sozinho, anda até a placa de peixe e vende, depois volta para a home e fica fazendo isso até os peixes acabar :)

MKrX2Jk.png



A Macro:
$${
IF(discos);
UNSET(discos);
LOG(&6Venda de Peixe &4OFF &3&l[G0dzilla88]);
STOP;
ELSE;
LOG(&6Venda de Peixe &2ON &3&l[G0dzilla88]);
SET(discos);
ENDIF;

DO;
DO;
DO;KEY(USE);WAIT(1);UNTIL(%GUI%="GUICHEST");
FOR(#i,349,349);
DO;
GETSLOT(%#i%,#u);
GETSLOTITEM(54,#id,#stack);
WAIT(10ms);
IF((%#u%=-1)||(%#u%>53)||(%#stack%>0));
BREAK;
ELSE;
SLOTCLICK(%#u%,l,true);
ENDIF;
LOOP;
NEXT;
IF(%#stack%=0);
GUI;
#posx=%XPOS%;
#posz=%ZPOS%;
KEYDOWN(SNEAK);
KEYDOWN(RIGHT);
DO;UNTIL((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
WAIT(150ms);
KEYUP(RIGHT);
KEYUP(SNEAK);
WAIT(1);
IF((%HITID%=54)||(%HITID%=146));
}$$/sethome venderpeixe$${
ELSE;
UNSET(discos);
LOG(&6Venda de Peixe &4OFF &3&l[G0dzilla88]);
STOP;
ENDIF;
ENDIF;
UNTIL(%#stack%!=0);

FOR(#id,349);
SET(#d%#id%,0);
WAIT(100ms);
NEXT;

FOR(#c,54,89);
GETSLOTITEM(%#c%,#id,#stack);
WAIT(10ms);
IF(%#id%=349);INC(#d349,1);NEXT;ENDIF;
NEXT;
#ztemp=%ZPOS%;
#xtemp=%XPOS%;
}$$/warp vip$${
/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;

}$$/home venderpeixe$${
wait(9);
DO;UNTIL((%ZPOS%=%#ztemp%)&&(%ZPOS%=%#ztemp%));
LOOP;
}$$
}$$

Obs: Se tiverem dificuldade em utilizar a macro, postem aqui no tópico que faria um video explicativo, beijinhos <3
Digno do meu like!

Eu tentei fazer isso noites e não consegui '-'
 
Cara nmrl pensa se alguém usa macro do homeless por exemplo ela vai ter q tirar os peixes e colocar em outros baus isso é ruim mano da uma melhorada ainda mais q é pra vips pode ser várias homes e.e
 
R3XPEITA011 disse:
Cara nmrl pensa se alguém usa macro do homeless por exemplo ela vai ter q tirar os peixes e colocar em outros baus isso é ruim mano da uma melhorada ainda mais q é pra vips pode ser várias homes e.e
ja pensei mano, isso aqui é pra quem tem macro q deixa os peixes apenas em uma fileira, e o objetivo desta macro é ter q setar apenas 1 home e depois tanto faz, é muito chato setar varias homes, ainda mais quem tem 4k de pesca, e se quiser uma macro de pesca assim usa a do substituto, obrigado pela atenção e pela dica, optei por fazer assim mesmo

zPlanner disse:
Gostei , vou usar hehe :3
vlww ai zPlaner <3 se tiver algum bug manda mp que eu corrijo em breve, Obrigado!
 
G0dzilla88 disse:
ja pensei mano, isso aqui é pra quem tem macro q deixa os peixes apenas em uma fileira, e o objetivo desta macro é ter q setar apenas 1 home e depois tanto faz, é muito chato setar varias homes, ainda mais quem tem 4k de pesca, e se quiser uma macro de pesca assim usa a do substituto, obrigado pela atenção e pela dica, optei por fazer assim mesmo


vlww ai zPlaner <3 se tiver algum bug manda mp que eu corrijo em breve, Obrigado!
Okay se tiver falo sim ;)
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo