if (obj_mainchara.y <= 3720)
{
    if (redalpha < 1)
        redalpha += 0.02;
}
else if (redalpha > 0)
{
    redalpha -= 0.1;
}