blob: fa5f3b85b7b567acd8d844fcf57a378c6f5c7952 (
plain) (
tree)
|
|
recipe main [
switch-to-display
print-character-to-display 97:literal
1:integer/raw, 2:integer/raw <- cursor-position-on-display
$print 1:integer/raw
$print [, ]
$print 2:integer/raw
$print [
]
wait-for-key-from-keyboard
clear-display
move-cursor-on-display 0:literal, 4:literal
print-character-to-display 98:literal
wait-for-key-from-keyboard
move-cursor-on-display 0:literal, 0:literal
clear-line-on-display
wait-for-key-from-keyboard
return-to-console
]
|