6a0f71b9 ^
1ead3562 ^
34c27410 ^
290fe117 ^
b6fa632e ^
9458918f ^
ce87c19e ^
bc643692 ^
4d6b5173 ^
1 2 3 4
5
6
7
8
9
10
11
12
13 14
15
16
17
# example program: reading events from keyboard or mouse # # Keeps printing 'a' until you press a key or click on the mouse. def main [ local-scope open-console clear-screen 0/screen # non-scrolling app { e:event, found?:bool <- check-for-interaction break-if found? print-character-to-display 97, 7/white loop } close-console $print e, 10/newline ]