Click above to get retro games delivered to your door ever month!

 NOSOUND                      Turn Speaker Off                        pp 185

 Syntax:  NoSound ;

 Type:    N/A

 Form:    Procedure

 Purpose: Turn speaker off after execution of Sound statement.


 ----------------------------------------------------------------------------


 Usage:
       CONST
          IntVar : Integer = 1000 ;   { 1000 Hz frequency }

       BEGIN
          Sound (IntVar)          ;   { Turn sound on     }
          Delay (500)             ;   { Wait 500 msec     }
          NoSound                 ;   { Turn sound off    }
       END.