home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / c / pcw_c.zip / MOVEDEMO.C < prev    next >
Text File  |  1990-01-30  |  448b  |  21 lines

  1. #include "pcwproto.h"
  2.  
  3. void main(void) {
  4.  
  5.    WNDPTR *wnd;
  6.    int    lcv,tl,bl;
  7.  
  8.    get_cursor_pos(&tl,&bl);
  9.    bordercolor(LIGHTGRAY,BLUE);
  10.    titlecolor(LIGHTGRAY,BLUE);
  11.    wnd = wexplode(1,1,5,20,LIGHTGRAY,RED);
  12.    if (wnd == (WNDPTR *) 0) exit(3);
  13.    wtitle(wnd,TOP,MIDDLE," Moving! ");
  14.    for (lcv = 1; lcv < 11; lcv++) {
  15.        wndmove(wnd,lcv*2,lcv*5);
  16.        rest(9);
  17.    }
  18.    wnd = wpop(wnd);
  19.    set_cursor_pos(1,bl);
  20. }
  21.