("calculate_season_light",
[(set_fixed_point_multiplier, 100),
(position_get_x, reg1, pos1), # r
(position_get_y, reg2, pos1), # g
(position_get_z, reg3, pos1), # b
...
(eq, "$shader_season", shader_summer),
(val_mul, reg1, 145),
(val_mul, reg2, 145),
(val_mul, reg3, 130),
_______________________________________
# light
(set_fixed_point_multiplier, 100),
(try_begin),
(store_time_of_day, ":day_time"),
(is_between, ":day_time", 4, 20),
(get_startup_sun_light, pos1),
(call_script, "script_calculate_season_light"),
(set_startup_sun_light, reg1, reg2, reg3),
(get_startup_ambient_light, pos1),
(call_script, "script_calculate_season_light"),
(set_startup_ambient_light, reg1, reg2, reg3),