void skychange ()
{
	COLOR oldColor, newColor;
	var factor = 0.0;
	
	vec_set(oldColor.blue, screen_color.blue);
	vec_set(newColor.blue, vector(random(255), random(255), random(255)));
	
	while (1)
	{
		factor += 0.2 * time_step;
		factor = clamp(factor, 0.0, 1.0);
		
		vec_lerp(screen_color.blue, oldColor.blue, newColor.blue, factor);
		vec_set(sky_color.blue, screen_color.blue);
		
		if (factor == 1.0)
		{
			factor = 0.0;
			vec_set(oldColor.blue, screen_color.blue);
			vec_set(newColor.blue, vector(random(255), random(255), random(255)) );
		}	
		
		wait(1);
	}
}