diff options
Diffstat (limited to 'src/LivingVillage.Desktop/MenuState.fs')
| -rw-r--r-- | src/LivingVillage.Desktop/MenuState.fs | 12 |
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 -> "退出" |