justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Implement translation rotation zoom using uniform buffers, improvement?

Browse Source
This commit is contained in:
jgk
2021-02-25 04:14:52 +01:00
parent 32bfab2e02
commit 37e26dcb07
6 changed files with 76 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Rendering.hs
+2 -2
View File
@@ -72,8 +72,8 @@ worldPictures w
, smokeShadows
]
where
screenShift = scale zoomx zoomy . rotate (0 - (_cameraRot w) )
. uncurry translate ((0,0) -.- _cameraPos w)
screenShift = id--scale zoomx zoomy . rotate (0 - (_cameraRot w) )
-- . uncurry translate ((0,0) -.- _cameraPos w)
zoomx = 2 * _cameraZoom w / _windowX w
zoomy = 2 * _cameraZoom w / _windowY w
scaler = scale (2 / _windowX w) (2 / _windowY w)