Add burst fire, tentative inventory locking

2021-12-04 16:05:46 +00:00
parent 30abc318ae
commit cb670bdfd8
16 changed files with 108 additions and 18 deletions
@@ -171,7 +171,8 @@ startInventory = IM.fromList $ zip [0..] startInvList
 testInventory :: IM.IntMap Item
 testInventory = IM.fromList $ zip [0..] 
    [ makeTypeCraftNum 9 PIPE
-    , makeTypeCraft HARDWARE
+    , makeTypeCraftNum 5 HARDWARE
+    , makeTypeCraftNum 3 SPRING
    , makeTypeCraft CAN
    , makeTypeCraft TIN
    ]