From d85cce460fd7fbb8854fb11ba547be1baf576de7 Mon Sep 17 00:00:00 2001 From: "Somhairle H. Marisol" Date: Tue, 22 Sep 2026 00:08:15 +0800 Subject: feat(desktop): P16 启动画面淡入(Esc/空格跳过)+ 开始界面收敛三项(开始/读档/退出)+ CJK 补字 238 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/LivingVillage.Desktop/MenuState.fs | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'src/LivingVillage.Desktop/MenuState.fs') 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 -> "退出" -- cgit v1.2.3