about summary refs log tree commit diff stats
path: root/hest-life.mu
diff options
context:
space:
mode:
Diffstat (limited to 'hest-life.mu')
-rw-r--r--hest-life.mu9
1 files changed, 7 insertions, 2 deletions
diff --git a/hest-life.mu b/hest-life.mu
index ceb16a8b..2cefd9bf 100644
--- a/hest-life.mu
+++ b/hest-life.mu
@@ -16,7 +16,11 @@ fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk)
   var env-storage: environment
   var env/esi: (addr environment) <- address env-storage
   initialize-environment env
-  render screen, env
+  var second-buffer: screen
+  var second-screen/edi: (addr screen) <- address second-buffer
+  initialize-screen second-screen, 0x80, 0x30, 1/include-pixels
+  render second-screen, env
+  copy-pixels second-screen, screen
   {
     edit keyboard, env
     var play?/eax: (addr boolean) <- get env, play?
@@ -24,7 +28,8 @@ fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk)
     {
       break-if-=
       step env
-      render screen, env
+      render second-screen, env
+      copy-pixels second-screen, screen
     }
     linger env
     loop