Allow for custom reloading sounds

2022-06-21 22:21:18 +01:00
parent 53c8be0679
commit 029b6daf8e
25 changed files with 339 additions and 219 deletions
@@ -5,6 +5,7 @@ module Dodge.Item.Weapon.Launcher
    , fireTrackingShell
    ) where
 import Dodge.Data
+import Dodge.Reloading.Action
 import Dodge.Default
 import Dodge.Default.Weapon
 import Dodge.Item.Location
@@ -44,7 +45,7 @@ launcher = defaultWeapon
            }
        & laMax .~ 1
        & laLoaded .~ 1
-        & laCycle .~ [Eject 30, Insert 30 Nothing, Prime 10]
+        & laCycle .~ [loadEject 30, loadInsert 30, loadPrime 10]
    , _itUse = ruseRate 20 usePjCreation upHammer
        [ hammerCheckI
        , ammoCheckI