home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Graphics / graphics-16000.iso / msdos / animutil / fastgfx / fg110c / 11-07.c < prev    next >
Text File  |  1992-01-30  |  752b  |  41 lines
  1. #include <fastgraf.h>
  2.  
  3. void main(void);
  4.  
  5. void main()
  6. {
  7.    unsigned char key, aux;
  8.    int old_mode;
  9.    int x, y;
  10.  
  11.    old_mode = fg_getmode();
  12.    fg_setmode(13);
  13.    fg_resize(640,400);
  14.  
  15.    fg_setcolor(2);
  16.    fg_rect(0,fg_getmaxx(),0,fg_getmaxy());
  17.    fg_setcolor(15);
  18.    fg_box(0,fg_getmaxx(),0,fg_getmaxy());
  19.    fg_locate(24,28);
  20.    fg_text("Press arrow keys to pan.",24);
  21.  
  22.    x = 0;
  23.    y = 0;
  24.  
  25.    do {
  26.       fg_getkey(&key,&aux);
  27.       if (aux == 72 && y < 200)
  28.          y++;
  29.       else if (aux == 75 && x < 320)
  30.          x++;
  31.       else if (aux == 77 && x > 0)
  32.          x--;
  33.       else if (aux == 80 && y > 0)
  34.          y--;
  35.       fg_pan(x,y);
  36.    } while (key != 27);
  37.  
  38.    fg_setmode(old_mode);
  39.    fg_reset();
  40. }
  41.