programlibs/Hex1000/demos/keys.xtl
scan : Int
scan ← ʰˣa̲ssemble "wait: KNEZ ; S: a key is down\nBR got\nBR wait\ngot: TKA ; the key into A\nTAMIY ; into RAM, Y + 1\nup: KNEZ ; wait for the release\nBR up\nBR wait"
Used in: libs/Hex1000/demos/keys.xtl:12, after
presses : Int
presses ← 8 2 r̲eshape 12 8 0 9 10 8 0 9 15 8 0 9 14 8 0 9
Used in: libs/Hex1000/demos/keys.xtl:14, after
after : (Int, Int, Int, Int, Int, Int, Int, Int, Int, Int, Int, Int)
after ← scan ʰˣr̲unKeys (ʰˣReset, presses)