Extended miniguns

src/Dodge/Combine/Combinations.hs

@@ -34,7 +34,10 @@ itemCombinations =
     , po [REPEATER,SPRING,CAN] burstRifle
     , po [BURSTRIFLE,SPRING,HARDWARE] fastBurstRifle
     , po [FASTBURSTRIFLE,SPRING,HARDWARE] completeBurstRifle
-    , po [MOTOR,BANGCANE,BANGCANE,BANGCANE] miniGun
+    , po [MOTOR,BANGCANEX 3] $ miniGunX 3
+    , po [MOTOR,BANGCANEX 4] $ miniGunX 4
+    , po [MOTOR,BANGCANEX 5] $ miniGunX 5
+    , po [MOTOR,BANGCANEX 6] $ miniGunX 6
 
     , p [p 3 PIPE,o HARDWARE] bangRod
     , po [BANGROD,PLANK,HARDWARE]  elephantGun
@@ -60,6 +63,8 @@ itemCombinations =
     ++ map (\i -> po [PIPE,BANGSTICK i] $ bangStick (i+1)) [1..8]
     ++ map (\i -> po [REVOLVERX i,CAN]  $ revolverX (i+1)) [1..5]
     ++ map (\i -> p [o (BANGCANEX i),p 2 PIPE] $ bangCaneX (i+1)) [1..5]
+    ++ map (\i -> po [MINIGUNX i,BANGCANE] $ miniGunX (i+1)) [3..15]
+
   where
     p = (,)
     po xs it = (map o xs,it)

src/Dodge/Combine/Data.hs

@@ -24,6 +24,7 @@ data CombineType
 --    | MORTARCONE / HANDMORTAR
     | BANGCANE
     | MINIGUN
+    | MINIGUNX Int
     | BANGCANEX Int
     | RIFLE
     | REPEATER