blob: cd0839f4565b25856601bffd0a2fe3196540dcfb (
plain) (
tree)
|
|
# example program: managing the display using 'screen' objects
#
# The zero screen below means 'use the real screen'. Tests can also use fake
# screens.
recipe main [
switch-to-display
print-character 0:literal/screen, 97:literal
1:number/raw, 2:number/raw <- cursor-position 0:literal/screen
wait-for-key 0:literal/keyboard
clear-screen 0:literal/screen
move-cursor 0:literal/screen, 0:literal/row, 4:literal/column
print-character 0:literal/screen, 98:literal
wait-for-key 0:literal/keyboard
move-cursor 0:literal/screen, 0:literal/row, 0:literal/column
clear-line 0:literal/screen
wait-for-key 0:literal/keyboard
cursor-down 0:literal/screen
wait-for-key 0:literal/keyboard
cursor-right 0:literal/screen
wait-for-key 0:literal/keyboard
cursor-left 0:literal/screen
wait-for-key 0:literal/keyboard
cursor-up 0:literal/screen
wait-for-key 0:literal/keyboard
return-to-console
]
|