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

       

                                   
             
                         
                 


                                    
                        
               
                                   
                      
                        
 
(main
  (cls)
  (cursor (10 literal) (5 literal))
  (print ("Hello, " literal))
  (bold-mode)
  (print ("you" literal))
  (non-bold-mode)
  (print ("." literal))
  (cursor (1 literal) (1 literal))
  (print ("Press a key..." literal))
  ((key string) <- getc)
  (console-off)
  (print ("You pressed: " literal))
  (print (key string))
  (print ("\n" literal))
)