Require line of sight for creature targeting

2022-04-11 14:09:39 +01:00
parent c686d9e111
commit 059321b33b
3 changed files with 45 additions and 29 deletions
@@ -429,10 +429,9 @@ data ItemValueType = MundaneItem | ArtefactItem

 data Targeting
    = NoTargeting
-    | TargetingOnHeld
+    | Targeting
        { _tgPos    :: Maybe Point2
-        , _tgHeldUpdate :: Item -> Creature -> World -> Targeting -> (World, Targeting)
-        , _tgNotHeldUpdate :: Item -> Creature -> World -> Targeting -> (World, Targeting)
+        , _tgUpdate :: Item -> Creature -> World -> Targeting -> (World, Targeting)
        , _tgDraw   :: Int -> Item -> Creature -> Configuration -> World -> Picture
        , _tgID     :: Maybe Int
        , _tgActive :: Bool