Fold some ammo data into its own type

2021-11-27 13:40:56 +00:00
parent bfdac2fad5
commit 92a8dd59b8
21 changed files with 175 additions and 115 deletions
@@ -20,8 +20,10 @@ radar :: Item
 radar = defaultGun 
    { _itName = "RADAR"
    , _itIdentity = Generic
-    , _wpMaxAmmo = 100
-    , _wpLoadedAmmo = 100
+    , _wpAmmo = defaultAmmo
+        { _wpMaxAmmo = 100
+        , _wpLoadedAmmo = 100
+        }
    , _wpReloadTime = 200
    , _wpReloadState = 0
    , _itUseRate = 120
@@ -45,8 +47,10 @@ sonar :: Item
 sonar = defaultGun 
    { _itName = "SONAR"
    , _itIdentity = Generic
-    , _wpMaxAmmo = 100
-    , _wpLoadedAmmo = 100
+    , _wpAmmo = defaultAmmo
+        { _wpMaxAmmo = 100
+        , _wpLoadedAmmo = 100
+        }
    , _wpReloadTime = 200
    , _wpReloadState = 0
    , _itUseRate = 120