Процедура Sound

Модуль CRT

Включает внутренний динамик.

Объявление:

Procedure Sound(Hz : Word);

Режим:

Protected,  Real

Замечание:

Параметр Hz определяет частоту генерируемого звука в герцах. Динамик будет включен до обращения к NoSound.

Пример:

{Delay.PAS}
  {Пример программы для процедур Delay, NoSound и Sound }
 
  Uses Crt;
 
  Begin
  Sound(220);        { Звук с частотой 200 Гц } 
  Delay(200);        { На 200 миллисекунд }
  NoSound;           { Выключаем динамик }
  End.