home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Guide / c-cplusplus-interactive-guide.iso / c_ref / csource3 / 153_01 / curfor.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-03-11  |  1.5 KB  |  51 lines
  1. /*                        *** curfor.c ***                           */
  2. /*                                                                   */
  3. /* IBM - PC microsoft "C"                                            */
  4. /*                                                                   */
  5. /* Function to move the cursor forward x relative columns.           */
  6. /*                                                                   */
  7. /* Written by L. Cuthbertson, March 1984.                            */
  8. /*                                                                   */
  9. /*********************************************************************/
  10. /*                                                                   */
  11.  
  12. #define NULL    '\000'
  13. #define POUND    '#'
  14.  
  15. curfor(x)
  16. int x;
  17. {
  18.     extern char CUF[];
  19.     char xrel[3],command[20];
  20.     int i,inpos,outpos;
  21.  
  22.     /* initialize screen controls */
  23.     scrinit();
  24.  
  25.     /* convert integer relative motion into string */
  26.     sprintf(xrel,"%d",x);
  27.  
  28.     /* build command line */
  29.     inpos = 0;    /* position within control string */
  30.     outpos = 0;    /* position within command string */
  31.  
  32.     while (CUF[inpos] != POUND)
  33.         command[outpos++] = CUF[inpos++];
  34.  
  35.     for (i=0;xrel[i] != NULL;i++)
  36.         command[outpos++] = xrel[i];
  37.  
  38.     inpos++;
  39.     while (CUF[inpos] != NULL)
  40.         command[outpos++] = CUF[inpos++];
  41.  
  42.     command[outpos] = NULL;
  43.  
  44.     /* write command to screen */
  45.     writes(command);
  46. }
  47.     /* check for invalid month */
  48.     if (imo < 1 || imo > 12) return(-1);
  49.  
  50.     /* check for invalid day */
  51.     if (ida