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
@@ -25,8 +25,10 @@ itemCombinations = map (first toMultiset) $
    , p [BANGSTICK 1,CAN] revolver
    , p [BANGSTICK 1,TIN] pistol
    , p [PISTOL, SPRING, HARDWARE] ltAutoGun
-    ] ++
-    map (\i -> ([PIPE,BANGSTICK i],bangStick (i+1))) [1..8]
+    , p [REVOLVER, SPRING, HARDWARE] $ revolverX 1
+    ] 
+    ++ map (\i -> ([PIPE,BANGSTICK i],bangStick (i+1))) [1..8]
+    ++ map (\i -> ([REVOLVERX i,CAN] ,revolverX (i+1))) [1..6]
  where
    p = (,)