Move toward adding multiple equipable items that are not directly usable

src/Dodge/Combine/Combinations.hs

@@ -1,6 +1,7 @@
 {-# LANGUAGE TupleSections #-}
 module Dodge.Combine.Combinations where
 import Dodge.Data
+import Dodge.Item.Equipment
 import Dodge.Item.Weapon.BulletGuns
 import Dodge.Item.Weapon.Launcher
 import Dodge.Item.Weapon.SprayGuns
@@ -24,8 +25,9 @@ itemCombinations =
     , p [p 2 PIPE,o HARDWARE] bangCane
     , p [p 2 PIPE,o BANGCANE] (bangCaneX 2)
     , po [BANGCANE,TIN] rifle
-    , po [RIFLE,SPRING,HARDWARE] autoRifle
-    , po [RIFLE,SPRING,CAN] assaultRifle
+    , po [RIFLE,PLANK]  repeater
+    , po [REPEATER,SPRING,HARDWARE] autoRifle
+    , po [REPEATER,SPRING,CAN] assaultRifle
     , po [MOTOR,BANGCANE,BANGCANE,BANGCANE] miniGun
 
     , p [p 3 PIPE,o HARDWARE] bangRod
@@ -40,6 +42,8 @@ itemCombinations =
     , po [FLAMESTICK,CAN,PUMP] blowTorch
     , po [FLAMESTICK,IRONBAR,DRUM] flameThrower
     , po [FLAMESTICK,DRUM,DRUM] flameWall
+
+    , po [MAGNET,TIN] magShield
     ] 
     ++ map (\i -> po [PIPE,BANGSTICK i] $ bangStick (i+1)) [1..8]
     ++ map (\i -> po [REVOLVERX i,CAN]  $ revolverX (i+1)) [1..5]

src/Dodge/Combine/Data.hs

@@ -23,6 +23,7 @@ data CombineType
     | MINIGUN
     | BANGCANEX Int
     | RIFLE
+    | REPEATER
     | AUTORIFLE
     | ASSAULTRIFLE
     | BANGROD