Some TDD for Ribbit

CHANGELOG.md

@@ -6,6 +6,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ## [Unreleased]
 Add DFRPG character generation
+Add Ribbit language for defining and controlling generic RPG rulesets. Declarative language centered on rolls and state manipulation via independent, scoped rules.
 
 ## [0.1.0] - 2020-12-01
 First release

test/Ribbit.Accept.fs

@@ -0,0 +1,26 @@
+module Ribbit.Accept
+open Expecto
+open Swensen.Unquote
+
+let bardsTaleSimple = """
+number properties: HP, SP, AC, XP, GP
+text properties: Name
+property race: Elf, Dwarf, Human, Hobbit, Half-orc, Gnome, Half-elf
+flags: Dead, Poisoned, Stoned, Insane
+derived flag: OK when not Dead | Stoned | Insane
+
+roll AttackRoll: roll-at-least on 1d20
+// todo: define my current weapon, damage roll, damage type, ST, damage for ST, takeDamage
+
+action attack (target) [requires turn when OK]:
+    attack: AttackRoll vs target's AC
+    if attack succeeds
+        damage: my current weapon's mode's damage roll for my ST
+        let injury = target.takeDamage(damage, my current weapon's mode's damage type)
+        if target is Dead
+            log "<Name> kills <target's Name>!" [attack, damage, injury, target.HP] // would auto-log all variables in scope, i.e. attack, damage, injury, but we'll be explicit here so we can include target's new HP
+        else
+            log "<Name> hits <target's Name> for <injury>" [+target.HP] // another way of specifying that we want to log target.HP even though it's not a variable
+    else
+        log "<Name> misses <target's Name>"
+"""

test/test.fsproj

@@ -9,6 +9,7 @@
   <ItemGroup>
     <Compile Include="Chargen.Accept.fs" />
     <Compile Include="Packrat.Accept.fs" />
+    <Compile Include="Ribbit.Accept.fs" />
     <Compile Include="Main.fs" />
   </ItemGroup>