diff options
Diffstat (limited to 'src/LivingVillage.Kernel.Tests/DeterminismTests.fs')
| -rw-r--r-- | src/LivingVillage.Kernel.Tests/DeterminismTests.fs | 19 |
1 files changed, 15 insertions, 4 deletions
diff --git a/src/LivingVillage.Kernel.Tests/DeterminismTests.fs b/src/LivingVillage.Kernel.Tests/DeterminismTests.fs index cc1944f..52cae89 100644 --- a/src/LivingVillage.Kernel.Tests/DeterminismTests.fs +++ b/src/LivingVillage.Kernel.Tests/DeterminismTests.fs @@ -233,10 +233,21 @@ type DeterminismTests () = | Rest -> 0.4f | Pay -> 0.2f | Hungry -> -0.4f - | Chatted _ -> Sim.chatValence - | Rumor _ -> 0.1f - | Bought _ -> 0.3f - | Sold _ -> 0.3f + | Chatted _ -> Sim.chatValence + | Rumor _ -> 0.1f + | Bought _ -> 0.3f + | Sold _ -> 0.3f + | Dialogue (_, _, response) -> + match response with + | Friendly -> 0.4f + | Helpful -> 0.5f + | Bargaining -> 0.2f + | Amused -> 0.35f + | Forgiving -> 0.45f + | Hostile -> -0.5f + | Reserved -> 0.0f + | Refused -> -0.1f + | Offended -> -0.4f if e.Valence <> expected then Assert.Fail($"valence/kind mismatch: {e.Kind} -> {e.Valence}") if e.Valence < -1.0f || e.Valence > 1.0f then |