Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. package kernel
  2. import "os"
  3.  
  4.  
  5. func Load() {
  6. x := "test"
  7.         for true {
  8.                 switch os.Event() {
  9.                        
  10.                         case 1:
  11.                                 os.Redraw(1)                           
  12.                                 os.Window(50,250,450,200,x)
  13.                                 os.Redraw(2)
  14.                                 os.Sleep(100)
  15.                         case 3:
  16.                                 os.Exit()
  17.                 }
  18.         }
  19. }
  20.