Add fields to determine an item's inventory position/whether it is held

2022-04-11 13:32:06 +01:00
parent d46d315203
commit c686d9e111
14 changed files with 107 additions and 113 deletions
@@ -108,9 +108,12 @@ drawPathing cfig w

 crDisplayInfo :: Configuration -> World -> Creature -> Maybe (Point2,[String])
 crDisplayInfo cfig w cr 
+    | _crID cr == 0 = Nothing
    | crOnScreen = Just (_crPos cr, catMaybes
-        [fmap show $ ap ^? crGoal
-        ,fmap show $ ap ^? crStrategy
+--        [fmap show $ ap ^? crGoal
+--        ,fmap show $ ap ^? crStrategy
+        [fmap show $ cr ^? crPos
+        ,fmap show $ cr ^? crOldPos
        ,fmap show $ ap ^? crAction
        ,fmap show $ ap ^? crImpulse
        ]