Expose recoil, torque etc as item parameters

2022-03-03 22:59:59 +00:00
parent 2a3c001a53
commit 98c66204cd
7 changed files with 101 additions and 49 deletions
@@ -149,7 +149,17 @@ defItDimCol col = ItemDimension
        }
    , _dimSPic = const $ noPic $ colorSH col $ upperPrismPoly 3 $ square 4
    }
-
+defBulletShooter :: ItemParams
+defBulletShooter = BulletShooter
+    { _muzVel = 1
+    , _rifling = 0.8
+    , _bore = 2
+    , _gunBarrels = SingleBarrel 0
+    , _recoil = 0
+    , _torqueAfter = 0
+    , _randomOffset = 0
+    }
+    
 defaultAutoGun :: Item
 defaultAutoGun = defaultGun 
    & itUse . useAim . aimStance .~ TwoHandTwist