Sound procedure
PC Speaker sound routines |
![]() ![]() ![]() |
acUtils
|
procedure Sound(Hz: Word);
|
The Sound procedure starts the internal speaker. Hz specifies the frequency of the emitted sound in hertz. The speaker continues until explicitly turned off by a call to NoSound.
|
The following program fragment emits a 440-hertz tone for half a second:
|
uses acUtils;
|
begin
|
Sound(440); { Beep }
|
Delay(500); { For 500 ms }
|
NoSound; { Relief! }
|
end.
|
NoSound and Delay procedures.
|