Move towards external targeting items

src/Dodge/Item/Scope.hs

@@ -2,6 +2,7 @@ module Dodge.Item.Scope (
     zoomScope,
     targetingScope,
     remoteScreen,
+    homingModule,
 ) where
 
 import Control.Lens
@@ -21,6 +22,12 @@ targetingScope tt =
         & itType . iyBase .~ ATTACH (TARGETATTACH tt)
         & itUse .~ AttachUse Nothing
 
+homingModule :: Item
+homingModule =
+    defaultHeldItem
+        & itType . iyBase .~ ATTACH HOMINGMODULE
+        & itUse .~ AttachUse Nothing
+
 remoteScreen :: Item
 remoteScreen =
     defaultHeldItem