diff options
Diffstat (limited to 'src/LivingVillage.Desktop/MenuState.fs')
| -rw-r--r-- | src/LivingVillage.Desktop/MenuState.fs | 48 |
1 files changed, 24 insertions, 24 deletions
diff --git a/src/LivingVillage.Desktop/MenuState.fs b/src/LivingVillage.Desktop/MenuState.fs index 78d846c..452d233 100644 --- a/src/LivingVillage.Desktop/MenuState.fs +++ b/src/LivingVillage.Desktop/MenuState.fs @@ -55,20 +55,20 @@ module MenuState = [ OneXSetting; TwoXSetting; FiveXSetting; PauseSetting ] let controlRows : ControlRow list = - [ { Keys = "WASD"; Action = "MOVE" } - { Keys = "E"; Action = "INTERACT" } - { Keys = "1-6"; Action = "DIALOGUE" } - { Keys = "Q"; Action = "OBSERVE" } - { Keys = "TAB"; Action = "NEEDS" } - { Keys = "C"; Action = "CHRONICLE" } - { Keys = "L"; Action = "RELATIONS" } - { Keys = "P"; Action = "PAUSE" } - { Keys = "F1/F2/F3"; Action = "SPEED" } - { Keys = "F6"; Action = "SAVE" } - { Keys = "F7"; Action = "LOAD" } - { Keys = "ESC"; Action = "MENU OR CLOSE" } - { Keys = "UP/DOWN"; Action = "SELECT" } - { Keys = "ENTER"; Action = "CONFIRM" } ] + [ { Keys = "WASD"; Action = "移动" } + { Keys = "E"; Action = "互动" } + { Keys = "1-6"; Action = "对话" } + { Keys = "Q"; Action = "观察" } + { Keys = "TAB"; Action = "需求" } + { Keys = "C"; Action = "年鉴" } + { Keys = "L"; Action = "关系" } + { Keys = "P"; Action = "暂停" } + { Keys = "F1/F2/F3"; Action = "速度" } + { Keys = "F6"; Action = "保存" } + { Keys = "F7"; Action = "读取" } + { Keys = "ESC"; Action = "菜单或关闭" } + { Keys = "UP/DOWN"; Action = "选择" } + { Keys = "ENTER"; Action = "确认" } ] let create (simulationControl: SimulationControl) (hasCurrentWorld: bool) : MenuState = { Page = MainMenu @@ -86,19 +86,19 @@ module MenuState = let settingsLabel setting : string = match setting with - | OneXSetting -> "1X" - | TwoXSetting -> "2X" - | FiveXSetting -> "5X" - | PauseSetting -> "PAUSE" + | OneXSetting -> "1倍速" + | TwoXSetting -> "2倍速" + | FiveXSetting -> "5倍速" + | PauseSetting -> "暂停" let itemLabel item : string = match item with - | ContinueItem -> "CONTINUE" - | NewGameItem -> "NEW GAME" - | LoadItem -> "LOAD SAVE" - | SettingsItem -> "SETTINGS" - | ControlsItem -> "CONTROLS" - | ExitItem -> "QUIT" + | ContinueItem -> "继续游戏" + | NewGameItem -> "开始新游戏" + | LoadItem -> "读取存档" + | SettingsItem -> "设置" + | ControlsItem -> "操作说明" + | ExitItem -> "退出" let private optionsFor (state: MenuState) : int = match state.Page with |