home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c025 / 1.ddi / PUTC.C < prev    next >
Encoding:
Text File  |  1985-01-24  |  333 b   |  19 lines
  1. main()    /* putc.c -- illustrates use of putc() */
  2. {
  3.     FILE *fi, *fo;
  4.     int i;
  5.     char c, dest[25];
  6.     char ibuf[255];
  7.  
  8.     printf("Output filename? ");
  9.     gets(dest);
  10.     fo = fopen(dest, "w");
  11.     puts("Type something:");
  12.     gets(ibuf);
  13.     puts(ibuf);
  14.     for (i = 0; ibuf[i] != 0; i++)
  15.         putc(ibuf[i], fo);
  16.     fclose(fo);
  17.     puts("Done");
  18. }
  19.