+// 0 <= daylight_factor <= 1000
+// 0 <= lightday, lightnight <= LIGHT_SUN
+// 0 <= return value <= LIGHT_SUN
+inline u8 blend_light(u32 daylight_factor, u8 lightday, u8 lightnight)
+{
+ u32 c = 1000;
+ u32 l = ((daylight_factor * lightday + (c-daylight_factor) * lightnight))/c;
+ if(l > LIGHT_SUN)
+ l = LIGHT_SUN;
+ return l;
+}
+