Implement bullet synth

2024-11-27 20:37:40 +00:00
parent b21513c4dd
commit 0d5e578f07
12 changed files with 365 additions and 298 deletions
@@ -77,7 +77,7 @@ data CraftType

 data AttachType
    = ZOOMSCOPE
-    | BULLETSYNTHESIZER
+    | BULLETSYNTH
    | REMOTESCREEN
    | HOMINGMODULE
    | AUGMENTEDHUD
@@ -74,6 +74,7 @@ data AttachParams
        {_apLinkedProjectile :: Maybe Int}
    | APItEffect
        {_apItEffect :: ItEffect }
+    | APInt {_apInt :: Int}
    | APNothing
    deriving (Eq, Show, Read)