home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / dos / grafik / tcega / gpfill.c < prev    next >
Encoding:
Text File  |  1986-02-22  |  800 b   |  16 lines
  1. /*                                                                            */
  2. /*      EGA Graphic Primitive for Turbo Pascal 3.01A, Version 01FEB86.        */
  3. /*      (C) 1986 by Kent Cedola, 2015 Meadow Lake Ct., Norfolk, VA, 23518     */
  4. /*                                                                            */
  5. /*      Description: Set the current style for line drawing primitives.       */
  6. /*      Setting the shading will set the shading flag on and setting the      */
  7. /*      current color will reset it zero. If the shading flag is zero then    */
  8. /*      the current color will be used, else the line style.                  */
  9. /*                                                                            */
  10.  
  11. void GPFILL(color)
  12.   int color;
  13. {
  14.   GPFLOOD(color);
  15. }
  16.