Start to generalise text input to "terminal signal" input

2023-03-26 13:57:26 +01:00
parent cfb0a49059
commit 082ce9c9a1
39 changed files with 171 additions and 165 deletions
@@ -62,9 +62,9 @@ defaultCWGen =
        , _cwgRoomClipping = []
        }

-defaultCWCam :: CamPos
+defaultCWCam :: Camera
 defaultCWCam =
-    CamPos
+    Camera
        { _camCenter = V2 0 0
        , _camRot = 0
        , _camZoom = 1
@@ -74,12 +74,13 @@ defaultCWCam =
        , _camItemZoom = 1
        , _camBoundBox = square 100
        , _camBoundDist = (100, -100, 100, -100)
+        , _camControl = CamInGame
        }

 defaultCWorld :: CWorld
 defaultCWorld =
    CWorld
-        { _cwCamPos = defaultCWCam
+        { _cwCam = defaultCWCam
        , _lWorld = defaultLWorld
        , _cwGen = defaultCWGen
        , _cClock = 0