if place_free(x,y+3)
    gravity = 0.90
else
    gravity = 0

if vspeed < 0 and !place_free(x,y-12)
{
    y = yprevious
    vspeed = 2
}

if vspeed > 0 and !place_free(x,y+vspeed)
{
    move_contact_solid(270, vspeed)
    gravity = 0
    vspeed = 0
}
if keyboard_check(vk_left) and !keyboard_check(vk_right)
{
    image_xscale = -1
    if place_free(x-4,y)
    {
        x -= 2
    }
}
if !keyboard_check(vk_left) and keyboard_check(vk_right)
{
    image_xscale = 1
    if place_free(x+4,y)
    {
        x += 2
    }
}
if keyboard_check_pressed(vk_up) and place_free(x,y-9) and !place_free(x,y+5)
    vspeed -= 7


if bbox_top>room_height
   room_restart()