home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Graphics / graphics-16000.iso / msdos / animutil / fastgfx / fg110c / 13-02.c < prev    next >
Text File  |  1992-01-30  |  633b  |  33 lines
  1. #include <fastgraf.h>
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4.  
  5. void main(void);
  6.  
  7. void main()
  8. {
  9.    int volume;
  10.  
  11.    if (fg_testmode(9,0) == 0) {
  12.       printf("This program requires a PCjr or ");
  13.       printf("a Tandy 1000 system.\n");
  14.       exit(1);
  15.       }
  16.  
  17.    printf("2048 Hz periodic noise...\n");
  18.    fg_voice(4,2,15,3);
  19.    fg_waitfor(18);
  20.  
  21.    printf("2048 Hz white noise...\n");
  22.    fg_voice(5,2,15,3);
  23.    fg_waitfor(18);
  24.  
  25.    printf("500 Hz tone of increasing volume...\n");
  26.    for (volume = 1; volume <= 15; volume++) {
  27.       fg_voice(1,500,volume,0);
  28.       fg_waitfor(4);
  29.       }
  30.  
  31.    fg_quiet();
  32. }
  33.