about summary refs log tree commit diff stats
path: root/subx/065hex.subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2019-05-20 00:18:23 -0700
committerKartik Agaram <vc@akkartik.com>2019-05-20 00:18:23 -0700
commitfc6605de48f3221efdbde1d363a202c336b2b919 (patch)
tree533709a83574ba65a4b925fbebf1f7770e99c7e8 /subx/065hex.subx
parent7fd1881e228f2552285eff9a1193893adefad23e (diff)
downloadmu-fc6605de48f3221efdbde1d363a202c336b2b919.tar.gz
.
Diffstat (limited to 'subx/065hex.subx')
0 files changed, 0 insertions, 0 deletions
caafd5bd5dae25b0e0efa19879258ff61ad93'>^
bc643692 ^
6a0f71b9 ^

290fe117 ^
4d6b5173 ^
6a0f71b9 ^
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16



                                                                 
          
             
              
   
                                                    
                   
                                          

        
               
                      
 
# 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
  {
    e:event, found?:boolean <- check-for-interaction
    break-if found?
    print-character-to-display 97, 7/white
    loop
  }
  close-console
  $print e, 10/newline
]