Continue ai refactor

2021-05-06 14:07:51 +02:00
parent 75c36e2c95
commit 436043b169
12 changed files with 94 additions and 35 deletions
@@ -0,0 +1,9 @@
+module Dodge.Creature.ChooseTarget
+    where
+import Dodge.Data
+import Dodge.Base
+
+targetYouLOS :: Creature -> World -> Maybe Creature
+targetYouLOS cr w 
+    | hasLOS (_crPos cr) (_crPos $ you w) w = Just $ you w
+    | otherwise = Nothing