Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: программирование на языке Assembler


Информационный Канал Subscribe.Ru

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler

Выпуск № 337
от 08.01.2006, 02:12

Администратор:Калашников О.А.
В рассылке:Подписчиков: 236, Экспертов: 18
В номере:Вопросов: 1, Ответов: 1


Вопрос № 32555: Уавжаемые эксперти, помогите написать прогу для генерации звука на системный динамик. Очень надо, а самому мне не справится. мыло: radik87@gmail.com Заранее спасибо и всех с Новым Годом!!!!! NameLess ...

Вопрос № 32.555
Уавжаемые эксперти, помогите написать прогу для генерации звука на системный динамик. Очень надо, а самому мне не справится.

мыло: radik87@gmail.com
Заранее спасибо и всех с Новым Годом!!!!!

NameLess
Отправлен: 03.01.2006, 01:38
Вопрос задал: NameLess (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Евгений Иванов
Здравствуйте, NameLess!
proc sound
push ax ;#
push cx
in al,61h
or al,3
out 61h,al
mov al,0B6h
out 43h,al
mov ax,4000 ;частота,чем > x,тем < частота(F). x=1,193,180/F Гц
out 42h,al
mov al,ah
out 42h,al

xor ax,ax
out 40h,al
mov al,ah
out 40h,al

xor cx,cx
loop $

mov ax,3500
out 42h,al
mov al,ah
out 42h,al

xor cx,cx
loop $

mov ax,1000
out 42h,al
mov al,ah
out 42h,al

xor cx,cx
loop $

mov ax,2500
out 42h,al
mov al,ah
out 42h,al

xor cx,cx
loop $

mov ax,1500
out 42h,al
mov al,ah
out 42h,al

xor cx,cx
loop $

in al,61h
and al,0FCh
out 61h,al

pop cx ax
ret
endp

---------
Что имеем - не храним, потерявши - плачем
Ответ отправил: Евгений Иванов (статус: Профессор)
Отправлен: 03.01.2006, 01:59
Оценка за ответ: 5


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Яндекс Rambler's Top100

Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.faq
Архив рассылки
Отписаться Вебом Почтой
Вспомнить пароль

В избранное