Work on pickup and putdown of inventory items

2021-11-30 16:44:33 +00:00
parent 27b1a6da9e
commit 3754627e0d
10 changed files with 42 additions and 60 deletions
@@ -167,10 +167,9 @@ startInvList =
    , hvAutoGun
    ]
 startInventory :: IM.IntMap Item
-startInventory = IM.fromList $ zip [0..defaultInvSize -1] $ startInvList ++ repeat NoItem
+startInventory = IM.fromList $ zip [0..] startInvList
 stackedInventory :: IM.IntMap Item
-stackedInventory = IM.fromList (zip [0..25] 
-    (
+stackedInventory = IM.fromList $ zip [0..] 
    [spreadGun
    ,rewindGun
    ,tractorGun
@@ -204,9 +203,7 @@ stackedInventory = IM.fromList (zip [0..25]
    --,miniGun
    --,medkit 50
    --,bezierGun
-    ] 
-      ++ 
-    repeat NoItem))
+    ]
 smokeGenGun :: Item
 smokeGenGun = effectGun "smoke" $ const spawnSmokeAtCursor