b = scr_approach(b, 128, 16);
image_blend = make_color_rgb(r, g, b);
speed *= 0.9;
if (point_distance(x, y, xgoal, ygoal) < 16)
    approach = false;
if (approach)
{
    x += ((xgoal - x) * 0.01);
    y += ((ygoal - y) * 0.01);
}
if (!stop)
    speed = max(speed, 0.5);
if (speed <= 0.5)
    direction += spindir;
image_angle += (spindir * (((speed - 0.5) * 4) + 2));