/// Create_Gradient(col1, col2, array, size)

var col1 = argument0;
var col2 = argument1;
var array = argument2;
var size = argument3;
var amount = 1 / (size - 1);
for (var i = 0; i < size; ++i)
{
      array[@ i] = merge_colour(col1, col2, amount * i);
}

var col1 = c_red;
var col2 = c_yellow;
var duration = 5;
var sz = room_speed * duration;
col[sz-1] = 0;
Create_Gradient(col1, col2, col, sz);

col_index = 0;

if col_index < array_length_1d(col)
     {
     image_blend = col[col_index];
     ++col_index;
     }

++col_index

image_blend += (c_red - image_blend) * 0.1; // цвет, хранящийся в image_blend, плавно будет меняться на красный
// 0.1 — коэффициент, чем он ближе к 1.0, тем быстрее переход, а при 1.0 он будет моментальный

image_blend = merge_colour(image_blend, c_red, 0.1);