Partial refactor of bullet weapon effect chain

2024-09-16 13:05:59 +01:00
parent 6f372109d9
commit abc0dd1106
23 changed files with 655 additions and 510 deletions
@@ -13,10 +13,20 @@ defaultAimParams =
        , _aimStance = OneHand
        , --, _aimHandlePos = 10
          _aimHandlePos = V2 3 0
-        , _aimMuzzles = [Muzzle (V2 20 0) 0 0 0]
+        , _aimMuzzles = [defaultMuzzle]
        --        , _aimMuzPos = 20
        }

+defaultMuzzle :: Muzzle
+defaultMuzzle = Muzzle
+    { _mzPos = V2 20 0
+    , _mzRot = 0
+    , _mzInaccuracy = 0.05
+    , _mzAmmoSlot = 0
+    , _mzFlareType = DefaultFlareType
+    }
+
+
 defaultItZoom :: ItZoom
 defaultItZoom =
    ItZoom