Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. #define MEMSIZE 4096*10
  2.  
  3. #include "../lib/io.h"
  4. #include "../lib/window.h"
  5. #include "../lib/timers.h"
  6.  
  7. window win1=0;
  8. dword timeID = 0;
  9. int t = 0;
  10. void intervalTest()
  11. {
  12.         t++;
  13.         if (t==10) clearInterval(timeID);
  14.         DrawBar(100, 70, 100, 100, 0xDED7CE);
  15.         WriteText(100,70,0x90,0,itoa(t));
  16. }
  17. void main()
  18. {
  19.         word id=0;
  20.         timeID = setInterval(#intervalTest, 100); // 100 => 1s
  21.         loop()
  22.         {
  23.                 switch(WaitEventTimeout(1))
  24.                 {
  25.                         case evButton:
  26.                                 id=GetButtonID();  
  27.                                 IF (id==1) ExitProcess();
  28.                                 break;
  29.                  
  30.                         case evKey:
  31.                                 GetKeys();
  32.                                 break;
  33.                          
  34.                         case evReDraw:
  35.                                 DefineAndDrawWindow(20,30,500,600,WINDOW_NORMAL,0xDED7CE,"Window",0);
  36.                                 if (!t) WriteText(100,70,0x90,0,"Start!");
  37.                                 break;
  38.                 }
  39.                 Timer.revise();
  40.         }
  41. }
  42.  
  43.