Move towards moving muzzles out of records

2025-06-05 08:16:20 +01:00
parent e05061a268
commit b2a971d8c3
12 changed files with 226 additions and 234 deletions
@@ -15,10 +15,9 @@ data ItemParams
    | FlatShieldParams
        {_flatShieldWlMIX :: Maybe Int}
    | Arcing
-        { _currentArc :: [ArcStep]
--        , _arcSize :: Float
--        , _arcNumber :: Int
-        }
+        { _currentArc :: [ArcStep]}
+    | NozzleAngle {_nzAngle :: Float}
+    | VolleyUnfiredBarrels {_unfiredBarrels :: [Int]}

 data ShrinkGunStatus = FullSize | Shrunk
    --deriving (Eq, Ord, Show, Read) --Generic, Flat)