Implement basic laser sensor

2021-11-01 18:20:45 +00:00
parent 0dcb1d2c07
commit 82de39657b
7 changed files with 59 additions and 21 deletions
@@ -561,6 +561,7 @@ data Machine = Machine
    , _mcHP      :: Int
    , _mcSensor  :: Int
    , _mcDamage  :: [DamageType]
+    , _mcLSs     :: [Int]
    }
 data Door = Door
    { _drID :: Int