home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 11 / 11.iso / m / m242 / 2.ddi / VER2FUNC.ZIP / GRXLAB.C < prev    next >
Encoding:
Text File  |  1989-10-16  |  482 b   |  25 lines
  1.  
  2. /* function to print out a horizontal string on graph */
  3. grxlab(t,c,cl,row)
  4. char *t; /* title */
  5. int c; /* color */
  6. int cl; /* column */
  7. int row; /* row */
  8. {
  9. int i,m,n,a,col;
  10. /* check paramters */
  11. getscmod(&m,&n,&a);
  12. if(m == 1) col = 40;
  13.   else if(m == 4) col = 40;
  14.     else if(m == 5) col = 40;
  15.       else col = 80;
  16. /* write title */
  17. for(i = 0; i + cl < col; ++i)
  18.   {
  19.   if(t[i] == '\0') break;
  20.   curlocat(row,i + cl);
  21.   wrtchtty(t[i],c);
  22.   }
  23. return(0);
  24. }
  25.