about summary refs log tree commit diff stats
path: root/apps/tui.mu
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-08-01 23:06:41 -0700
committerKartik Agaram <vc@akkartik.com>2020-08-01 23:39:57 -0700
commit6b343a82f29b6dea219504504244591c3042df43 (patch)
tree91c63bd3d66d73aeb4e6714f1b6e5792620839b8 /apps/tui.mu
parent59a2e363f5f818e3870a275efe375737a76009fa (diff)
downloadmu-6b343a82f29b6dea219504504244591c3042df43.tar.gz
6699 - start building out fake screen
We now have all existing apps and prototypes going through the dependency-injected
wrapper, even though it doesn't actually implement the fake screen yet.
Diffstat (limited to 'apps/tui.mu')
-rw-r--r--apps/tui.mu32
1 files changed, 16 insertions, 16 deletions
diff --git a/apps/tui.mu b/apps/tui.mu
index d65e3518..9a2a3bc1 100644
--- a/apps/tui.mu
+++ b/apps/tui.mu
@@ -7,28 +7,28 @@
 fn main -> exit-status/ebx: int {
   var nrows/eax: int <- copy 0
   var ncols/ecx: int <- copy 0
-  nrows, ncols <- screen-size
+  nrows, ncols <- screen-size 0
   enable-screen-grid-mode
-  move-cursor-on-screen 5, 0x22
-  start-color-on-screen 1, 0x7a
-  start-blinking-on-screen
-  print-string-to-screen "Hello world!"
-  reset-formatting-on-screen
-  move-cursor-on-screen 6, 0x22
-  print-string-to-screen "tty dimensions: "
-  print-int32-hex-to-screen nrows
-  print-string-to-screen " rows, "
-  print-int32-hex-to-screen ncols
-  print-string-to-screen " rows\n"
+  move-cursor 0, 5, 0x22
+  start-color 0, 1, 0x7a
+  start-blinking 0
+  print-string 0, "Hello world!"
+  reset-formatting 0
+  move-cursor 0, 6, 0x22
+  print-string 0, "tty dimensions: "
+  print-int32-hex 0, nrows
+  print-string 0, " rows, "
+  print-int32-hex 0, ncols
+  print-string 0, " rows\n"
 
-  print-string-to-screen "press a key to see its code: "
+  print-string 0, "press a key to see its code: "
   enable-keyboard-immediate-mode
   var x/eax: byte <- read-key
   enable-keyboard-type-mode
   enable-screen-type-mode
-  print-string-to-screen "You pressed "
+  print-string 0, "You pressed "
   var x-int/eax: int <- copy x
-  print-int32-hex-to-screen x-int
-  print-string-to-screen "\n"
+  print-int32-hex 0, x-int
+  print-string 0, "\n"
   exit-status <- copy 0
 }