Работа со звуком

[bonjovi]

Обыкновенная программа

USES CRT;
BEGIN
	Sound(300)	
END.

которая вроде бы должна воспроизводить звук! Вставлял её и в ABC и в TURBO и ничего не происходит!

В чём может быть проблема?

[ViktorR]

А со звуком все в порядке?
Воспроизводится ли какая либо мелодия?
У меня Win XP SP3 и Free Pascal.
Пример срабатывает.

[p51x]

В чём может быть проблема?

Нет динамика.
Он не работает.
Попорченный компилятор.
"Новая" ОС (например, вин7) с эмуляцией ДОСа.
...

[bonjovi]

Вобщем винда 7 стоит! Паскаль нормальный(у друга идёт на этом же самом паскале, он мне его и скинул)! С остальными звуками всё нормально! Кстати пробовал и через колонки и через наушники

Тема ещё актуальна.... Помогите

[MrReal]

write(^G) не подойдет?
В FPC пикает)

[bonjovi]

Что-то я не понял! Объясни пожалуйста, что значит write(^G)

[MrReal]

begin
write(^G);
end.

Вот так. Это самый простой способ подачи звукового сигнала в паскале.

[bonjovi]

Ну так мне естественно написал паскаль "Неверное выражение"

[MrReal]

Free Pascal компилятор - все работает. В других не проверял

[Serge_Bliznykov]

Сообщение от bonjovi

Вобщем винда 7 стоит!

а Вы зря не читаете то, что Вам пишут.
постом выше сообщение от p51x:

Сообщение от p51x

Нет динамика.
Он не работает.
Попорченный компилятор.
"Новая" ОС (например, вин7) с эмуляцией ДОСа.
...

у Вас винда семёрка - она не даёт вашему DOS паскалю доступа к железу (к портам ввода/вывода, в частности).

Решить эту проблему можно так:
либо переходите на современные компиляторы Паскаля (под Win32), либо, если использовать TurboPascal - это обязательное условие, воспользуйте виртуальными машинами.
для DOS программ самое простое решение - это программа DosBox. Рекомендую!