home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c005 / 2.ddi / WNEXAMPL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-04-13  |  2.1 KB  |  78 lines
  1.     /* WNEXAMPL.C:  Simple example of C TOOLS PLUS window usage. */
  2.  
  3. #include <bwindow.h>
  4.  
  5. int main()
  6. {
  7.     BWINDOW *pwin;
  8.     BORDER  bord;
  9.     WHERE   location;
  10.     int     mode,columns,act_page;
  11.     int     cursor_was_off,row,col,high,low;
  12.     char    response[5];
  13.     int     scan;
  14.  
  15.     /* Create the window structure in memory.             */
  16.  
  17.     pwin = wncreate(6,              /* Height of data area     */
  18.             15,           /* Width    of data area     */
  19.             REVERSE);          /* Attributes of data area */
  20.     if (pwin == NIL)
  21.     return b_wnerr;       /* Quit if failure.         */
  22.                   /* (b_wnerr records the most     */
  23.                   /* recent window error.)     */
  24.  
  25.     /* Choose style of border.                     */
  26.  
  27.     bord.type = 1;          /* Box drawn with single lines */
  28.     bord.attr = RED;          /* Red on black         */
  29.  
  30.     /* Choose where to display the window:  the active page on     */
  31.     /* the current display device.                 */
  32.  
  33.     location.dev    = scmode(&mode,&columns,&act_page);
  34.     location.page    = act_page;
  35.     location.corner.row = 10;
  36.     location.corner.col =  5;
  37.  
  38.     /* Retrieve former cursor position and size.         */
  39.  
  40.     scpage(act_page);
  41.     cursor_was_off = sccurst(&row,&col,&high,&low);
  42.  
  43.     /* Actually display the window                 */
  44.  
  45.     if (NIL == wndsplay(pwin,&location,&bord))
  46.     return b_wnerr;           /* Quit if failure.     */
  47.  
  48.     /* Display a message on the window.              */
  49.  
  50.     wnwrap(0,
  51.        "Hello, world!  (Press ENTER to continue) ",
  52.        -1,                  /* Use window's native     */
  53.        -1,                  /* attributes         */
  54.        CHARS_ONLY);
  55.     if (b_wnerr)
  56.     return b_wnerr;           /* Quit if failure.     */
  57.  
  58.     /* Await a response from the user, echoing keystrokes to the */
  59.     /* window.                             */
  60.  
  61.     wnquery(response,
  62.         sizeof(response),
  63.         &scan);
  64.     if (b_wnerr)
  65.     return b_wnerr;           /* Quit if failure.     */
  66.  
  67.     /* Remove the window & restore the screen and cursor.     */
  68.  
  69.     wnremove(pwin);
  70.     sccurset(row,col);
  71.     scpgcur(cursor_was_off,high,low,CUR_NO_ADJUST);
  72.  
  73.     if (b_wnerr)
  74.     return b_wnerr;          /* Quit if failure.     */
  75.  
  76.     return wndstroy(pwin);         /* Clean up data structures.*/
  77. }
  78.