about summary refs log blame commit diff stats
path: root/archive/1.vm/display.mu
blob: c3844c4b4cc65defb75b84f040572f28307934e3 (plain) (tree)
1
2
3
4
5
6
7
8
9

                                       
          
              
               
                                               
                                                    
                           
                       

                               
                           
                             
                       
                           
                             
                           
                              
                           
                             
                           
                           
                           
               
 
# example program: managing the display

def main [
  open-console
  clear-display
  print-character-to-display 97, 1/red, 2/green
  1:num/raw, 2:num/raw <- cursor-position-on-display
  wait-for-some-interaction
  clear-line-on-display
  move-cursor-on-display 0, 4
  print-character-to-display 98
  wait-for-some-interaction
  move-cursor-on-display 0, 0
  clear-line-on-display
  wait-for-some-interaction
  move-cursor-down-on-display
  wait-for-some-interaction
  move-cursor-right-on-display
  wait-for-some-interaction
  move-cursor-left-on-display
  wait-for-some-interaction
  move-cursor-up-on-display
  wait-for-some-interaction
  close-console
]