summaryrefslogtreecommitdiff
path: root/src/LivingVillage.Desktop/MenuState.fs
diff options
context:
space:
mode:
authorSomhairle H. Marisol <[email protected]>2026-09-22 00:35:03 +0800
committerSomhairle H. Marisol <[email protected]>2026-09-22 00:35:03 +0800
commit1cef3b1544ff8574c7b56bc1a84e3be0846a9b22 (patch)
tree5aa705bf3e9cfe82e5e3637cdc699bc52f93c559 /src/LivingVillage.Desktop/MenuState.fs
parent1f1c502ba750c4c55ac2aca28eacafcd0c3ae932 (diff)
parent81a84f9f86d59387a349caa339148c7a7a6d1e72 (diff)
downloadliving-village-1cef3b1544ff8574c7b56bc1a84e3be0846a9b22.tar.gz
merge: P16 启动画面/开始界面/HUD 精美化(独立复验全绿 Desktop 106/Kernel 89)
Diffstat (limited to 'src/LivingVillage.Desktop/MenuState.fs')
-rw-r--r--src/LivingVillage.Desktop/MenuState.fs12
1 files changed, 7 insertions, 5 deletions
diff --git a/src/LivingVillage.Desktop/MenuState.fs b/src/LivingVillage.Desktop/MenuState.fs
index 619ac58..0155472 100644
--- a/src/LivingVillage.Desktop/MenuState.fs
+++ b/src/LivingVillage.Desktop/MenuState.fs
@@ -80,11 +80,13 @@ module MenuState =
Settings = simulationControl
Error = None }
+ /// P16 开始界面收敛为三项:开始(无存档)或继续(回到进行中的世界)/ 读档 / 退出。
+ /// 设置与操作说明不再占用开始界面,仍可在游戏内通过 F1/F2/F3 与 P 打开。
let items (state: MenuState) : MenuItem list =
if state.HasCurrentWorld then
- [ ContinueItem; NewGameItem; LoadItem; SettingsItem; ControlsItem; ExitItem ]
+ [ ContinueItem; LoadItem; ExitItem ]
else
- [ NewGameItem; LoadItem; SettingsItem; ControlsItem; ExitItem ]
+ [ NewGameItem; LoadItem; ExitItem ]
let settingsLabel setting : string =
match setting with
@@ -95,9 +97,9 @@ module MenuState =
let itemLabel item : string =
match item with
- | ContinueItem -> "继续游戏"
- | NewGameItem -> "开始新游戏"
- | LoadItem -> "读取存档"
+ | ContinueItem -> "继续"
+ | NewGameItem -> "开始"
+ | LoadItem -> "读档"
| SettingsItem -> "设置"
| ControlsItem -> "操作说明"
| ExitItem -> "退出"