home *** CD-ROM | disk | FTP | other *** search
/ FreeWare Collection 2 / FreeSoftwareCollection2pd199x-jp.img / oakfep / oak2lib / sample.c < prev    next >
Text File  |  1990-06-14  |  473b  |  30 lines

  1. #include    <egb.h>
  2. #include    "oaklib.h"
  3. #include    "cons.h"
  4.  
  5. void    putstr();
  6. void    putsys();
  7. void    putmode();
  8.  
  9. char    work[4096];
  10. char    mwork[4096];
  11.  
  12. void    main()
  13. {
  14.     int     ch;
  15.  
  16.     EGB_init(work,4096);
  17.     EGB_resolution(work,0,3);
  18.     EGB_displayPage(work,0,1);
  19.  
  20.     wind(50,100,580,350,0x0F,0x08,0x0A,8,17,0x00);
  21.     KAN_open(putstr,putsys,putmode);
  22.  
  23.     while ( (ch = getch()) != 0x1B ) {
  24.     putch(ch);
  25.     cflush();
  26.     }
  27.  
  28.     KAN_close();
  29. }
  30.