Commit before partial cleanup, continue weapon effect refactor

src/Dodge/Creature.hs

@@ -204,7 +204,7 @@ inventoryX c = case c of
     'J' ->
         [ lasGun
         , lasGun
-        , dualBeam
+        --, dualBeam
         ] <> makeTypeCraftNum 10 TRANSFORMER
     'K' ->
         [ autoRifle
@@ -268,17 +268,17 @@ testInventory =
 
 stackedInventory :: [Item]
 stackedInventory =
-    [ burstRifle
-    , poisonSprayer
-    , chemFuelPouch
+    [ targetingScope TARGETLASER
+    , zoomScope
+    , burstRifle
     , megaTinMag
     , teslaGun
-    , lasGun
-    , tractorGun
     , megaBattery
     , bulletSynthesizer
     , drumMag
     , launcher
+    , rocketRemoteScreen
+    , megaShellMag
     , launcherX 3
     , megaShellMag
     , megaShellMag
@@ -301,7 +301,7 @@ stackedInventory =
     , flatShield
     , spawnGun (lamp 5)
     , lasGun
-    , lasWide 20
+--    , lasWide 20
     , poisonSprayer
     , bulletBeltPack
     , bulletBeltBracer