home *** CD-ROM | disk | FTP | other *** search
/ Boldly Go Collection / version40.iso / TS / 05B / TFTB.ZIP / SOUNDON.SLT < prev    next >
Encoding:
Text File  |  1992-04-24  |  752 b   |  22 lines
  1.  
  2. ////////////////////////////////////////////////////////
  3. //  PROGRAM: SOUNDON.SLT                              //
  4. //  AUTHOR:  Christopher Saunders                     //
  5. //  DATE:    April 25th 1992                          //
  6. //                                                    //
  7. //  INFORMATION                                       //
  8. //  ~~~~~~~~~~~                                       //
  9. //  This is a companion program for SOUNDOFF.SLT.  It //
  10. //  will turn your speaker on.  See SOUNDOFF.SLT for  //
  11. //  more information.                                 //
  12. ////////////////////////////////////////////////////////
  13.  
  14. int old_sound;
  15.  
  16. main()
  17. {
  18.  old_sound = _sound_on;
  19.    _sound_on = 1;
  20. status_wind("Sound is on!",30);
  21. }
  22.