Alguem passa ?

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.

SrKelvin

Razoavel
Banido
Entrou
Jan 31, 2015
Mensagens
447
Pontuação de reação
64
Idade
26
Localização
Porto Alegre --RS
Cubos
0
Alguem passa um macro de correr com inventario aberto que quando bate na parede muda a direçao ????
 
:p

$${
if(x);unset(x);unsprint;log(&3 Desligado);STOP;
else;set(x);log(&3 Correndo!);
endif;

do;
ifmatches(%GUI%,None);
if(%#tr%>0);keyup(ForWard);endif;
dec(#tr,%#tr%);
if(KEY_W);sprint;else;unsprint;endif;

else;
&dir=%DIRECTION%;

ifmatches(%GUI%,Inventory|Chat|Chest|Furnace);
keydown(FORWARD);SPRINT;
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&op=NORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));;&dir=%&op%;endif;look(%&dir%);

if(KEY_S);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(back);else;keyup(back);endif;

if(KEY_A);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(left);else;keyup(left);endif;


if(KEY_D);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(right);else;keyup(right);endif;

if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
inc(#tr,1);
endif;

endif;
loop;
}$$
 
TranerX disse:
:P

$${
if(x);unset(x);unsprint;log(&3 Desligado);STOP;
else;set(x);log(&3 Correndo!);
endif;

do;
ifmatches(%GUI%,None);
if(%#tr%>0);keyup(ForWard);endif;
dec(#tr,%#tr%);
if(KEY_W);sprint;else;unsprint;endif;

else;
&dir=%DIRECTION%;

ifmatches(%GUI%,Inventory|Chat|Chest|Furnace);
keydown(FORWARD);SPRINT;
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&op=NORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));;&dir=%&op%;endif;look(%&dir%);

if(KEY_S);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(back);else;keyup(back);endif;

if(KEY_A);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(left);else;keyup(left);endif;


if(KEY_D);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(right);else;keyup(right);endif;

if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
inc(#tr,1);
endif;

endif;
loop;
}$$
tem esse macro, mas se quiser um que vc controle pra onde ir no inv tem esse aki $${if(invfunc);unset(invfunc);log(&aLogic Invent &bOFF);STOP;
else;set(invfunc);log(&aLogic Invent &bON);endif;
do;
ifmatches(%GUI%,inventory);
if(KEY_W);keydown(forward);else;keyup(forward);endif;
if(KEY_S);keydown(back);else;keyup(back);endif;
if(KEY_A);keydown(left);else;keyup(left);endif;
if(KEY_D);keydown(right);else;keyup(right);endif;
if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
endif;
loop;
}$$
 
iGabriel 1010 disse:
tem esse macro, mas se quiser um que vc controle pra onde ir no inv tem esse aki $${if(invfunc);unset(invfunc);log(&aLogic Invent &bOFF);STOP;
else;set(invfunc);log(&aLogic Invent &bON);endif;
do;
ifmatches(%GUI%,inventory);
if(KEY_W);keydown(forward);else;keyup(forward);endif;
if(KEY_S);keydown(back);else;keyup(back);endif;
if(KEY_A);keydown(left);else;keyup(left);endif;
if(KEY_D);keydown(right);else;keyup(right);endif;
if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
endif;
loop;
}$$
Vlw mlk [emoji6]

Enviado de meu XT1032 usando Tapatalk
 
TranerX disse:
:P

$${
if(x);unset(x);unsprint;log(&3 Desligado);STOP;
else;set(x);log(&3 Correndo!);
endif;

do;
ifmatches(%GUI%,None);
if(%#tr%>0);keyup(ForWard);endif;
dec(#tr,%#tr%);
if(KEY_W);sprint;else;unsprint;endif;

else;
&dir=%DIRECTION%;

ifmatches(%GUI%,Inventory|Chat|Chest|Furnace);
keydown(FORWARD);SPRINT;
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&op=NORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));;&dir=%&op%;endif;look(%&dir%);

if(KEY_S);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(back);else;keyup(back);endif;

if(KEY_A);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(left);else;keyup(left);endif;


if(KEY_D);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(right);else;keyup(right);endif;

if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
inc(#tr,1);
endif;

endif;
loop;
}$$
obg
 
$${
if(x);unset(x);unsprint;log(&3 Desligado);STOP;
else;set(x);log(&3 Correndo!);
endif;

do;
ifmatches(%GUI%,None);
if(%#tr%>0);keyup(ForWard);endif;
dec(#tr,%#tr%);
if(KEY_W);sprint;else;unsprint;endif;

else;
&dir=%DIRECTION%;

ifmatches(%GUI%,Inventory|Chat|Chest|Furnace);
keydown(FORWARD);SPRINT;
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&op=NORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));;&dir=%&op%;endif;look(%&dir%);

if(KEY_S);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(back);else;keyup(back);endif;

if(KEY_A);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(left);else;keyup(left);endif;


if(KEY_D);
ifmatches(%DIRECTION%,N);#a=-1;#b=0;&op=SOUTH;endif;ifmatches(%DIRECTION%,S);#a=+1;#b=0;&opNORTH;endif;
ifmatches(%DIRECTION%,W);#a=0;#b=-1;&op=EAST;endif;ifmatches(%DIRECTION%,E);#a=0;#b=+1;&op=WEST;endif;
getidrel(%#b%,1,%#a%,#d,);getidrel(%#b%,0,%#a%,#c,);if((%#c%!=0)|(%#d%!=0));&dir=%&op%;endif;look(%&dir%);keydown(right);else;keyup(right);endif;

if(KEY_SPACE);keydown(jump);else;keyup(jump);endif;
inc(#tr,1);
endif;

endif;
loop;
}$$
 
Status
Não está aberto para novas respostas.

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

Voltar
Topo