diff options
Diffstat (limited to 'src/LivingVillage.Desktop/Game.fs')
| -rw-r--r-- | src/LivingVillage.Desktop/Game.fs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/LivingVillage.Desktop/Game.fs b/src/LivingVillage.Desktop/Game.fs index 3a9a004..ea5272b 100644 --- a/src/LivingVillage.Desktop/Game.fs +++ b/src/LivingVillage.Desktop/Game.fs @@ -383,6 +383,16 @@ type LivingVillageGame() as this = world <- initialWorldForMode state |> withStartTick + // §3 身份条目：带职业开局即写入年鉴，形成个人传记线 + match state with + | Some occupationState -> + world <- + Sim.appendAnnal + { Tick = world.Tick + Kind = StoryAnnal + Summary = Occupation.Story.identitySummaryOf occupationState.Profile.Kind } + world + | None -> () this.ResetWorldView() m5View <- { m5View with Task = state } menu <- menu |> MenuState.setCurrentWorld true |> MenuState.enterGame |