Cleanup
This commit is contained in:
@@ -1,9 +1,9 @@
|
||||
module Dodge.Item.Weapon.Bullet (
|
||||
hvBulletAmmo,
|
||||
-- hvBulletAmmo,
|
||||
defaultBullet,
|
||||
) where
|
||||
|
||||
import Control.Lens
|
||||
--import Control.Lens
|
||||
import Dodge.Data.Item.Use.Consumption.Ammo
|
||||
import Geometry.Data
|
||||
|
||||
@@ -27,14 +27,14 @@ basicBulDams =
|
||||
[ Damage PIERCING 100 0 0 0 $ PushBackDamage 2
|
||||
]
|
||||
|
||||
hvBulletAmmo :: Bullet
|
||||
hvBulletAmmo =
|
||||
defaultBullet
|
||||
& buWidth .~ 6
|
||||
& buVel .~ V2 80 0
|
||||
& buDamages .~ heavyBulDams
|
||||
|
||||
heavyBulDams :: [Damage]
|
||||
heavyBulDams =
|
||||
[ Damage PIERCING 300 0 0 0 $ PushBackDamage 2
|
||||
]
|
||||
--hvBulletAmmo :: Bullet
|
||||
--hvBulletAmmo =
|
||||
-- defaultBullet
|
||||
-- & buWidth .~ 6
|
||||
-- & buVel .~ V2 80 0
|
||||
-- & buDamages .~ heavyBulDams
|
||||
--
|
||||
--heavyBulDams :: [Damage]
|
||||
--heavyBulDams =
|
||||
-- [ Damage PIERCING 300 0 0 0 $ PushBackDamage 2
|
||||
-- ]
|
||||
|
||||
Reference in New Issue
Block a user