fix(desktop): P19 白天色调去偏黄（day tint 中性白平衡，黄昏暖橙保留）p19-daylight-taming

1 files changed, 17 insertions, 0 deletions

diff --git a/src/LivingVillage.Desktop.Tests/DesktopTests.fs b/src/LivingVillage.Desktop.Tests/DesktopTests.fs
index 00e445b..b78f4e0 100644
--- a/src/LivingVillage.Desktop.Tests/DesktopTests.fs
+++ b/src/LivingVillage.Desktop.Tests/DesktopTests.fs
@@ -143,6 +143,23 @@ type DesktopTests () =
         Assert.IsTrue(day.WorldTint.G > day.WorldTint.B)
 
     [<TestMethod>]
+    member _.NoonLightingIsWarmthFreeWithNeutralWhiteBalance () =
+        let noonTick = 12L * Sim.ticksPerDay / 24L
+        let noon = M6Presentation.profileAtTick noonTick
+
+        Assert.AreEqual<M6DayNight>(Day, noon.Mode)
+        Assert.AreEqual<float32>(0.0f, noon.SkyWarmth)
+        Assert.AreEqual<float32>(0.0f, noon.LanternGlow)
+        Assert.AreEqual<int>(0, M6Presentation.goldenVeilAlpha noonTick)
+        // P19 offender was the day world tint attenuating blue (255/248/224); it is neutral now.
+        Assert.AreEqual<int>(255, int noon.WorldTint.R)
+        Assert.AreEqual<int>(int noon.WorldTint.R, int noon.WorldTint.G)
+        Assert.AreEqual<int>(int noon.WorldTint.G, int noon.WorldTint.B)
+        // The sky stays a plain blue, never warm.
+        Assert.IsTrue(noon.Background.B > noon.Background.G)
+        Assert.IsTrue(noon.Background.B > noon.Background.R)
+
+    [<TestMethod>]
     member _.DaylightAutoplayBootstrapStartsAtDawnAndPreservesDefaultStart () =
         let dawnTick = 6L * Sim.ticksPerDay / 24L
         let daylightWorld = WorldBootstrap.initialWorldForDaylight true 42UL Sim.npcCount