Game Maker Smooth Platform movements v2

//------------------------------------------------------------------------------------
//  This goes in the create event
//------------------------------------------------------------------------------------
move_speed = 6;  // The speed to move left and right. Change it to run faster or slower
jump_speed = 12; // The height of the jump. Change this to go higher or lower
grav_speed = 1;  // The gravity force. Change this to fall faster or float longer
fall_speed = 0;  // The verticall speed, leave this to 0. You're not falling when the game starts.





//------------------------------------------------------------------------------------
//  This goes in the step event
//------------------------------------------------------------------------------------
var dist, dir, is_moving;  // Define some local variables
is_moving = false;     // We ain't moving... yet

// Get the keyboard inputs
dir = keyboard_check( vk_right )-keyboard_check( vk_left ); // Save the horizontal direction (-1,0,1)
if( dir != 0 ) image_xscale = dir;

// Move horizontaly
dist = move_speed;      // The distance in pixels to move

if( dir != 0 ) // No point trying to move if the direction is 0 ( aka no keys or both keys are pressed )
{
        is_moving = true; // We are moving
    while( !place_meeting( x+dir, y, obj_platform ) && dist > 0 )   // As long as there is no collision and we aren't done moving...
        {
                x += dir;       // Move one pixel in the direction.
                dist--;         // Decrease the distance to move
        }
}

// Apply gravity
fall_speed += grav_speed;

// Check if jumping
if( keyboard_check( vk_up ) && place_meeting( x,y+1, obj_platform ) ) fall_speed = -jump_speed;

// Move vertically ( same as horizontal )
dist = abs( fall_speed );
dir = sign( fall_speed );

if( dir != 0 )
{
    while( !place_meeting( x, y+dir, obj_platform ) && dist > 0 )
        {
                y += dir;
                dist--;
        }
    else fall_speed = 0;
}

if( fall_speed < 0 )
{
    // You are currently jumping
}
else if( fall_speed > 0 )
{
    // You are currently falling
}
else if( is_moving )
{
    // You are walking / running
}
else
{
    // You aren't moving
}