Play with upscaling shaders

2025-11-27 21:59:52 +00:00
parent 2a4fc97125
commit c5c494522c
6 changed files with 210 additions and 21 deletions
@@ -32,7 +32,8 @@ import Data.Foldable
 import Data.Monoid

 testStringInit :: Universe -> [String]
-testStringInit u =  [ show (u ^. uvWorld . wCam . camRot)
+testStringInit u =  [ show (u ^. uvConfig . windowX)
+    , show (u ^. uvConfig . windowY)
    ,show $ fmap (
     worldPosToScreen (u ^. uvWorld . wCam) )
    $ u ^? uvWorld . cWorld . lWorld . creatures . ix 0 . crPos . _xy