Add more procedural girders

src/Dodge/Data.hs

@@ -405,7 +405,14 @@ data Item = Item
     , _itTweaks     :: ItemTweaks
     , _itModules    :: M.Map ModuleSlot ItemModule
     , _itScope      :: Scope
+    , _itValue      :: ItemValue
     }
+data ItemValue = ItemValue
+    { _ivInt :: Int
+    , _ivType :: ItemValueType
+    }
+data ItemValueType = MundaneItem | ArtefactItem
+
 data Targeting
     = NoTargeting
     | TargetingOnHeld
@@ -1019,3 +1026,4 @@ makeLenses ''HUDElement
 makeLenses ''SubInventory
 makeLenses ''TerminalParams
 makeLenses ''TerminalLine
+makeLenses ''ItemValue