home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / pc / plot / plot2gl.sha / testplot.c < prev   
Encoding:
C/C++ Source or Header  |  1989-04-09  |  552 b   |  39 lines
  1. /* test program for the UNIX plot clones */
  2.  
  3. #define    SIZE    100
  4.  
  5. main()
  6. {
  7.     register int    i;
  8.  
  9.     openpl();
  10.  
  11.     space(0, 0, SIZE, SIZE);
  12.  
  13.     circle(SIZE / 4, SIZE / 4, SIZE / 4);
  14.  
  15.     move(1, SIZE - 1);
  16.  
  17.     cont(SIZE - 1, 1);
  18.  
  19.     for (i = 1; i < SIZE; i++)
  20.     point(i, i);
  21.  
  22.     arc(SIZE-25, SIZE-25, SIZE-25, SIZE, SIZE, SIZE-25);
  23.  
  24.     linemod("dotted");
  25.  
  26.     move(10, SIZE - 1);
  27.  
  28.     label("Testing");
  29.  
  30.     line(0, 0, 0, SIZE);
  31.     line(0, SIZE, SIZE, SIZE);
  32.     line(SIZE, SIZE, SIZE, 0);
  33.     line(SIZE, 0, 0, 0);
  34.  
  35.     closepl();
  36.  
  37.     exit(0);
  38. }
  39.