Implement remote screen for launcher projectiles

src/Dodge/Creature/SentinelAI.hs

@@ -18,7 +18,8 @@ import Dodge.Data.World
 import Geometry.Data
 
 sentinelAI :: World -> Creature -> Creature
-sentinelAI w =
+--sentinelAI w =
+sentinelAI =
     sentinelExtraWatchUpdate
             [
                 ( crHasTargetLOS
@@ -37,7 +38,7 @@ sentinelAI w =
                         ]
                 )
             ]
-            w
+--            w
   where
     advanceShoot = DoImpulses [UseItem, MoveForward 3]
     tcid cr = _crID <$> _targetCr (_crIntention cr)

src/Dodge/Creature/State.hs

@@ -247,11 +247,11 @@ invSideEff cr w =
             w' & maybe id (\g -> doInvEffect g it cr) (it ^? itEffect . ieInv)
 
 itemInvSideEffect :: Creature -> Item -> World -> World
-itemInvSideEffect _ _
+itemInvSideEffect _ _ = id
 --itemInvSideEffect cr it
 --    | hastorchattach = createAttachLight cr it
-    | otherwise = id
-  where
+--    | otherwise = id
+--  where
 --    hastorchattach = it ^? itType . iyModules . ix ModHeldAttach == Just ATTACHTORCH && _itIsRoot it
 
 --createAttachLight :: Creature -> Item -> World -> World