if (vspeed > -16)
    vspeed -= 0.05
alarm[0] = 1