Fix minigun inter-frame bullet speed

This commit is contained in:
2024-06-22 11:42:33 +01:00
parent a9ac974a2c
commit 35a56eef56
7 changed files with 96 additions and 80 deletions
+7 -5
View File
@@ -4,12 +4,13 @@ module Dodge.Item.Weapon.Bullet (
defaultBullet,
) where
import Dodge.Data.Item.Use.Consumption.Ammo
import Control.Lens
import Dodge.Data.Item.Use.Consumption.Ammo
import Geometry.Data
basicBulletAmmo :: AmmoType
basicBulletAmmo = SmallBulletAmmo
-- , _amBullet = defaultBullet
defaultBullet :: Bullet
@@ -34,10 +35,11 @@ basicBulDams =
]
hvBulletAmmo :: Bullet
hvBulletAmmo = defaultBullet
& buWidth .~ 6
& buVel .~ V2 80 0
& buDamages .~ heavyBulDams
hvBulletAmmo =
defaultBullet
& buWidth .~ 6
& buVel .~ V2 80 0
& buDamages .~ heavyBulDams
heavyBulDams :: [Damage]
heavyBulDams =