Pascal/Turbo Pascal - sonido en pascal

hola.. porfa si alguien sabe como poner sonido en pascal 7.0...necesito dar avisos con sonidos porfa... gracias

Esto es nu pequeño ejemplo con sonido

uses Crt;

begin
Sound(600); { Beep miestras mas alto el numero el sonido en mas finito}
Delay(600); { para 600 ms miestras mas alto es el numero el tiempo de duracion del sonido dura mas}
NoSound; { siempre que termine hay que desactivar el sonido interno del PC}
end.