This commit is contained in:
2022-07-13 22:22:24 +01:00
parent 33e9b5b1f0
commit 35a1eb9732
18 changed files with 89 additions and 69 deletions
+2 -2
View File
@@ -1,7 +1,6 @@
module Dodge.Default.Weapon
where
import Dodge.Data
import Dodge.Item.Weapon.AmmoParams
import Dodge.Reloading.Action
import Dodge.Item.Weapon.Bullet
import Dodge.Default.Item
@@ -65,6 +64,7 @@ defaultrUse = RightUse
, _useMods = []
, _useHammer = HammerUp
, _useAim = defaultAimParams
, _heldAttachment = NoHeldAttachment
, _heldScroll = \_ _ -> id
}
defaultlUse :: ItemUse
@@ -109,7 +109,7 @@ defaultWeapon = defaultItem
defaultBulletWeapon :: Item
defaultBulletWeapon = defaultWeapon
& itConsumption .~ defaultBulletLoadable
& itUse .~ ruseAmmoParams
& itUse .~ defaultrUse
defaultItemValue :: ItemValue
defaultItemValue = ItemValue 10 MundaneItem