Refactor reloading to use list of required steps

2022-06-20 19:06:02 +01:00
parent a85cf4d1fb
commit 37eb69c661
16 changed files with 79 additions and 118 deletions
@@ -19,7 +19,8 @@ defaultLoadable = LoadableAmmo
    { _laAmmoType   = GenericAmmo
    , _laMax        = 15
    , _laLoaded     = 0
-    , _laLoadType = ActiveEject 20 20 NoTransfer
+    , _laCycle      = [Eject 10, Insert 10 Nothing, Prime 10]
+    , _laProgress   = FinishedLoading
    }
 defaultBulletLoadable :: ItemConsumption
 defaultBulletLoadable = defaultLoadable & laAmmoType .~ basicBullet