diff options
Diffstat (limited to 'apps/tui.mu')
-rw-r--r-- | apps/tui.mu | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/apps/tui.mu b/apps/tui.mu new file mode 100644 index 00000000..e2f97609 --- /dev/null +++ b/apps/tui.mu @@ -0,0 +1,29 @@ +# test some primitives for text-mode + +fn main -> exit-status/ebx: int { + var nrows/eax: int <- copy 0 + var ncols/ecx: int <- copy 0 + nrows, ncols <- screen-size + enable-screen-grid-mode + move-cursor 5, 35 + start-color 1, 0x7a + start-blinking + print-string "Hello world!" + reset-formatting + move-cursor 6, 35 + print-string "tty dimensions: " + print-int32-to-screen nrows + print-string " rows, " + print-int32-to-screen ncols + print-string " rows\n" + + print-string "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 "You pressed " + print-int32-to-screen x + print-string "\n" + exit-status <- copy 0 +} |