$${
toggle(walkm);
IF(walkm);
log(walkm on);
//Andar no /minerar até o local de mineraçao

echo("/minerar");
wait(2);
echo("/pvp off");
if(%DIRECTION% = "N"); &frente = "north"; &atras = "south"; &direita = "east" ; &esquerda = "west"; endif;
if(%DIRECTION% = "S"); &frente = "south"; &atras = "north"; &direita = "west" ; &esquerda = "east"; endif;
if(%DIRECTION% = "E"); &frente = "east"; &atras = "west"  ; &direita = "south"; &esquerda = "north"; endif;
if(%DIRECTION% = "W"); &frente = "west"; &atras = "east"  ; &direita = "north"; &esquerda = "east"; endif;

////////// parte de andar para o lado.
#random_direction = 0;
#inc_time_walk = 0;
#distance_block = 0;
	RANDOM(#distance_block,60,40);
    RANDOM(#random_direction,3,1);
        IF(#random_direction = 1); LOG("Indo para esquerda");
            look(%&esquerda%);
        ELSEIF(#random_direction = 2); LOG("Indo para direita");
            look(%&direita%);
        ELSEIF(#random_direction = 3); LOG("Indo para atras");
            look(%&atras%);
        ENDIF;

        wait(1);
            KEYDOWN(right);
        wait(580ms);
            KEYUP(right);

///////

///// parte de andar para frente.
                IF(@mc_none);echo("/mc");ENDIF;
                KEYDOWN(jump);wait(50ms);KEYUP(JUMP);wait(50ms);KEYDOWN(jump);
                wait(2);
                KEYUP(jump);
				LOG(" ");
				LOG("A macro andara até a distancia: %#distance_block%");
				LOG(" ");
            Do();
                KEYDOWN(forward);
                SPRINT;
                INC(#inc_time_walk,1);
                wait(125ms);
                LOG(%#inc_time_walk%);
                    IF(#inc_time_walk = %#distance_block%);
                        log(blocos alcançados);
                        KEYUP(forward);
                        KEYUP(jump);
                        #inc_time_walk = 0;
                        Break;
                    ENDIF;
            Loop;

/////
///// parte onde ja chegou no destino
                     Do();
					 GETIDREL(0,-2,0,#block_down); //0 distancia, -1 altura.
                        keydown(sneak);
							LOG(%#block_down%);
                            IF(#block_down != 0);
								KEYUP(sneak);
								KEYDOWN(jump);wait(50ms);KEYUP(JUMP);wait(50ms);KEYDOWN(jump);wait(50ms);
								KEYUP(jump);wait(1);
								KEYDOWN(forward);wait(1);KEYUP(forward);
                                Break;
                            ENDIF;
                     Loop;

/////
else;
KEYUP(forward);
KEYUP(jump);
KEYUP(sneak);
UNSPRINT;
log(walkm off);
stop;
endif;
}$$