CHNOSProject/chnos/tolset_chn_000/chnos_008/stars/stars.c

   1 #include <apilib.h>\r
   2 \r
   3 void CHNMain(void)\r
   4 {\r
   5         uchar *buf;\r
   6         uint winID;\r
   7         int i, x, y;\r
   8 \r
   9         api_initmalloc();\r
  10         buf = api_malloc(150*100);\r
  11         winID = api_openwin(buf, 150, 100, -1, "stars");\r
  12         api_boxfilwin(winID + 1, 6, 26, 143, 93, black);\r
  13         for(i = 0; i < 50; i++){\r
  14                 x = (rand() % 137) + 6;\r
  15                 y = (rand() % 67) + 26;\r
  16                 api_point(winID + 1, x, y, yellow);\r
  17         }\r
  18         api_refreshwin(winID, 6, 26, 144, 94);\r
  19         for(;;){\r
  20                 if(api_getkey(true) == 0x0a) break;\r
  21         }\r
  22         api_end();\r
  23 }\r
  24 \r