2 files changed, 55 insertions, 0 deletions
diff --git a/src/LivingVillage.Desktop.Tests/LivingVillage.Desktop.Tests.fsproj b/src/LivingVillage.Desktop.Tests/LivingVillage.Desktop.Tests.fsproj
index c509a0b..1ea6349 100644
--- a/src/LivingVillage.Desktop.Tests/LivingVillage.Desktop.Tests.fsproj
+++ b/src/LivingVillage.Desktop.Tests/LivingVillage.Desktop.Tests.fsproj
@@ -48,6 +48,7 @@
     <Compile Include="P74LaunchTransitionTests.fs" />
     <Compile Include="P75HudStripTests.fs" />
     <Compile Include="P76HotbarPanelTests.fs" />
+    <Compile Include="P77LayoutTests.fs" />
     <Compile Include="SampleTests.fs" />
   </ItemGroup>
 
diff --git a/src/LivingVillage.Desktop.Tests/P77LayoutTests.fs b/src/LivingVillage.Desktop.Tests/P77LayoutTests.fs
new file mode 100644
index 0000000..df0e94f
--- /dev/null
+++ b/src/LivingVillage.Desktop.Tests/P77LayoutTests.fs
@@ -0,0 +1,54 @@
+namespace LivingVillage.Desktop.Tests
+
+open Microsoft.VisualStudio.TestTools.UnitTesting
+open Microsoft.Xna.Framework
+open LivingVillage.Desktop
+
+/// P77 回归：日历卡/浮动提示药丸化后的多尺寸不破版、面板与 hotbar 不遮挡、锚定长文本折行。
+[<TestClass>]
+type P77LayoutTests () =
+
+    let sizes = [ (1280, 720); (1024, 768); (800, 600); (640, 480) ]
+
+    [<TestMethod>]
+    member _.LayoutsStayInsideEveryViewportAndClearOfHotbar () =
+        for (w, h) in sizes do
+            let bar = HudLayout.hotbarBarRect w h
+            Assert.IsTrue(bar.X >= 0 && bar.Y >= 0 && bar.X + bar.Width <= w && bar.Y + bar.Height <= h,
+                          sprintf "hotbar 越界 @%dx%d" w h)
+            let cal = HudLayout.calendarCardRect w (HudLayout.calendarReading 2592000L)
+            Assert.IsTrue(cal.X >= 0 && cal.X + cal.Width <= w && cal.Y >= 0, sprintf "日历卡越界 @%dx%d" w h)
+            let model = DialogOverlay.create "互动：村民 1" [ "1 闲聊"; "2 求助"; "3 交易"; "4 开玩笑"; "ESC 关闭" ] w true
+            let dialog = DialogOverlay.rect w h model
+            Assert.IsTrue(dialog.X >= 0 && dialog.Y >= 0 && dialog.X + dialog.Width <= w && dialog.Y + dialog.Height <= h,
+                          sprintf "对话弹层越界 @%dx%d" w h)
+            let panel = HudLayout.panelRect w h 5
+            Assert.IsTrue(panel.X >= 0 && panel.Y >= 0 && panel.X + panel.Width <= w && panel.Y + panel.Height <= h,
+                          sprintf "交互面板越界 @%dx%d" w h)
+
+    [<TestMethod>]
+    member _.DialogAndPanelNeverCoverTheHotbar () =
+        // 上单验收问题：互动面板压住 3-8 号格子。标准与常见尺寸下面板/弹层底边须在 hotbar 顶上方。
+        for (w, h) in [ (1280, 720); (1024, 768); (800, 600) ] do
+            let bar = HudLayout.hotbarBarRect w h
+            let panel = HudLayout.panelRect w h 5
+            Assert.IsTrue(panel.Y + panel.Height <= bar.Y, sprintf "交互面板压 hotbar @%dx%d: panelBottom=%d barTop=%d" w h (panel.Y + panel.Height) bar.Y)
+            let model = DialogOverlay.create "互动：村民 1" [ "1 闲聊"; "2 求助"; "3 交易"; "4 开玩笑"; "ESC 关闭" ] w true
+            let dialog = DialogOverlay.rect w h model
+            Assert.IsTrue(dialog.Y + dialog.Height <= bar.Y, sprintf "对话弹层压 hotbar @%dx%d: dialogBottom=%d barTop=%d" w h (dialog.Y + dialog.Height) bar.Y)
+
+    [<TestMethod>]
+    member _.AnchoredLongPromptWrapsWithoutLossAndStaysInBands () =
+        let text = "E 与河边的货郎交谈并查看今日货品是否齐全以及打听附近村里的传闻"
+        let layout = FloatingPrompt.layoutWrapped 1280 720 640.0f 360.0f 0.0f 0.0f 2 text
+        Assert.IsTrue(layout.Lines.Length >= 2, "长锚定文本须折成多行")
+        for line in layout.Lines do
+            Assert.IsTrue(FloatingPrompt.measureWidth line 2 <= FloatingPrompt.maxPromptWidth, sprintf "折行超宽: %s" line)
+        Assert.AreEqual<string>(text, System.String.Concat layout.Lines)
+        Assert.IsTrue(layout.X >= 0 && layout.X + layout.Width <= 1280, "提示不得越界")
+        Assert.IsTrue(layout.Y >= FloatingPrompt.hudTopBarHeight, "提示不得压顶部条")
+        Assert.IsTrue(layout.Y + layout.Height <= 720 - FloatingPrompt.hudBottomBandHeight, "提示不得压底部带")
+        // 短提示仍是单行，且宽度与既有单行版式一致。
+        let short = FloatingPrompt.layoutWrapped 1280 720 640.0f 360.0f 0.0f 0.0f 2 "E 交谈"
+        Assert.AreEqual<int>(1, short.Lines.Length)
+        Assert.AreEqual<int>(FloatingPrompt.measureWidth "E 交谈" 2, short.Width)