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 / FRATWRTF.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-05-30  |  1.1 KB  |  58 lines
  1. /*
  2.  * fratwrtf.c
  3.  * contains: fratwrtf()
  4.  *
  5.  */
  6.  
  7. #include <stdio.h>
  8. #include "gfuncts.h"
  9.  
  10.  
  11. /*
  12.  *  void
  13.  * fratwrtf(int row,int col,int attribute,char *fmt,?arg)
  14.  *
  15.  * ARGUMENT
  16.  *  row        -    row to begin writing on
  17.  *  col        -    column to begin writing on
  18.  *  attribute      -    physical video attribute to use
  19.  *  fmt        -    format string
  20.  *  arg        -    variable argument list
  21.  *
  22.  * DESCRIPTION
  23.  *  Write formated and attribute at specified cursor.
  24.  *
  25.  * RETURNS
  26.  *  void
  27.  *
  28.  * AUTHOR
  29.  *  ""   20-DEC-1988  10:06:54.11
  30.  *   Copyright (C)1988-1990 Greenleaf Software Inc. All Rights Reserved.
  31.  *
  32.  * MODIFICATIONS
  33.  *
  34.  *
  35.  */
  36.  
  37. #ifndef    _MSC
  38. void GF_CDECL fratwrtf(row,col,attr,fmt)
  39. #else
  40. void GF_CDECL fratwrtf(row,col,attr,fmt,...)
  41. #endif
  42. char *fmt;
  43. int attr,row,col;
  44. {
  45.     char **value;
  46.     value=&fmt;
  47.     sprintf(_gfspbuf,fmt,
  48.         value[1],value[2],value[3],value[4],value[5],value[6],
  49.         value[7],value[8],value[9],value[10]
  50. #ifndef _LDATA
  51.         ,value[11],value[12],value[13],value[14],value[15],value[16],
  52.         value[17],value[18],value[19],value[20]
  53. #endif
  54.     );
  55.     fratwstr(row,col,attr,_gfspbuf);
  56. }
  57.  
  58.