Work on held item positioning

2022-07-14 00:28:28 +01:00
parent 090408b438
commit dcc0596a25
6 changed files with 59 additions and 50 deletions
@@ -112,9 +112,10 @@ torch = defaultWeapon

 createHeldLight :: Creature -> Int -> World -> World
 createHeldLight cr i w = w
-    & tempLightSources .:~ tlsTimeRadColPos 1 200 0.7 p
+    & tempLightSources .:~ tlsTimeRadColPos 1 200 0.7 
+        (p +.+.+ heldItemOffset itm cr (V3 0 20 0))
  where
-    p = addZ 20 $ _crPos cr
+    p = addZ 0 $ _crPos cr
    itm = cr ^?! crInv . ix i

 flatShield :: Item