summaryrefslogtreecommitdiffstats
path: root/Render.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Render.hs')
-rw-r--r--Render.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/Render.hs b/Render.hs
index a1a9850..d1276a3 100644
--- a/Render.hs
+++ b/Render.hs
@@ -99,10 +99,10 @@ render = do
vertex $ Vertex2 (0 :: GLfloat) (0 :: GLfloat)
forM_ tanklist $ \tank -> preservingMatrix $ do
- let x = fromReal . posx $ tank
- y = fromReal . posy $ tank
- rotDir = fromReal . dir $ tank
- rotAim = fromReal . aim $ tank
+ let x = fromReal . tankX $ tank
+ y = fromReal . tankY $ tank
+ rotDir = fromReal . tankDir $ tank
+ rotAim = fromReal . tankAim $ tank
translate $ Vector3 x y (0 :: GLfloat)
rotate rotDir $ Vector3 0 0 (1 :: GLfloat)