Improve tesla weapon path

2022-03-23 09:48:32 +00:00
parent 7f174b7d18
commit 5a579951c8
10 changed files with 146 additions and 103 deletions
@@ -164,6 +164,13 @@ startInvList :: [Item]
 startInvList = [ ]
 startInventory :: IM.IntMap Item
 startInventory = IM.fromList $ zip [0..] startInvList
+inventoryA :: IM.IntMap Item
+inventoryA = IM.fromList $ zip [0..] 
+    [ makeTypeCraftNum 1 TRANSFORMER
+    , makeTypeCraftNum 2 CAN
+    , makeTypeCraftNum 2 PIPE
+    ]
+
 testInventory :: IM.IntMap Item
 testInventory = IM.fromList $ zip [0..] 
    [ makeTypeCraftNum 9 PIPE