From 3ea092f2a755c78b56345cb341d714a748b73a13 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 19 May 2017 17:55:10 -0700 Subject: 3867 --- html/screen.mu.html | 45 +++++++++++++++++++++++---------------------- 1 file changed, 23 insertions(+), 22 deletions(-) (limited to 'html/screen.mu.html') diff --git a/html/screen.mu.html b/html/screen.mu.html index e317a736..19534abd 100644 --- a/html/screen.mu.html +++ b/html/screen.mu.html @@ -61,28 +61,29 @@ if ('onhashchange' in window) { 4 # screens. 5 def main [ 6 open-console - 7 10:char <- copy 97/a - 8 print 0/screen, 10:char/a, 1/red, 2/green - 9 1:num/raw, 2:num/raw <- cursor-position 0/screen -10 wait-for-event 0/console -11 clear-screen 0/screen -12 move-cursor 0/screen, 0/row, 4/column -13 10:char <- copy 98/b -14 print 0/screen, 10:char -15 wait-for-event 0/console -16 move-cursor 0/screen, 0/row, 0/column -17 clear-line 0/screen -18 wait-for-event 0/console -19 cursor-down 0/screen -20 wait-for-event 0/console -21 cursor-right 0/screen -22 wait-for-event 0/console -23 cursor-left 0/screen -24 wait-for-event 0/console -25 cursor-up 0/screen -26 wait-for-event 0/console -27 close-console -28 ] + 7 clear-screen 0/screen # non-scrolling app + 8 10:char <- copy 97/a + 9 print 0/screen, 10:char/a, 1/red, 2/green +10 1:num/raw, 2:num/raw <- cursor-position 0/screen +11 wait-for-event 0/console +12 clear-screen 0/screen +13 move-cursor 0/screen, 0/row, 4/column +14 10:char <- copy 98/b +15 print 0/screen, 10:char +16 wait-for-event 0/console +17 move-cursor 0/screen, 0/row, 0/column +18 clear-line 0/screen +19 wait-for-event 0/console +20 cursor-down 0/screen +21 wait-for-event 0/console +22 cursor-right 0/screen +23 wait-for-event 0/console +24 cursor-left 0/screen +25 wait-for-event 0/console +26 cursor-up 0/screen +27 wait-for-event 0/console +28 close-console +29 ] -- cgit 1.4.1-2-gfad0