home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / GRLF-C-2.ZIP / GFUNC / RATSAY.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-05-30  |  740 b   |  36 lines
  1. /*
  2.  * ratsay.c
  3.  * contains: ratsay()
  4.  *
  5.  */
  6.  
  7. #include <stdio.h>
  8. #include "gfuncts.h"
  9.  
  10. /*
  11.  *  void
  12.  * ratsay(row,column,color,page,str)
  13.  *
  14.  * ARGUMENT
  15.  *  (int)    row    -    row # to display on
  16.  *  (int)    column    -    column # to display on
  17.  *  (int)    color    -    color to use
  18.  *  (int)    page    -    video page to use
  19.  *  (char *)    str    -    string to display
  20.  *
  21.  * DESCRIPTION
  22.  *  At (row,column) print (string) in color, uses video mode 1 or 3,
  23.  *  mode must be selected externally.
  24.  *
  25.  * AUTHOR
  26.  *   Copyright (C)1987-1990 Greenleaf Software Inc. All Rights Reserved.
  27.  */
  28. void GF_CONV ratsay(row,column,color,page,str)
  29. int row,column,color,page;
  30. char *str;
  31. {
  32.     curset(row,column,page);
  33.     while (*str)
  34.         putcinc(*str++,color,page);
  35. }
  36.