Генерация звука

@Сарказ · Регистрация: 29.04.2009

Студворк — интернет-сервис помощи студентам

написать программу которая генерирует звук : должна проигрывать мелодию в виде процедуры , вызывать программу с частотой и временем задержки . сделать задержку , вот код программы но что то задержка не работает объясните плиз как она работает?

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
s_s segment stack "stack"
db 100 dup(?)
s_s ends
d_s segment
hou db 13
min db 22
d_s ends
c_s segment
beg:
assume ss:s_s,ds:d_s,cs:c_s
mov ax,d_s
mov ds,ax
mov al,0b6h
out 43h,al
mov dx,12h
mov ax,34dch
mov cx,523
div cx
out 42h,al
mov al,ah
out 42h,al
in al,61h
or al,00000001b
or al,00000010b
out 61h,al
clI
mov ch,hou
mov cl,min
mov ah,2dh
int 21h
cmp ah,0ffh
jmp d
d:
mov ah,0
int 1ah
and al,11111100b
out 61h,al
StI
mov ah,4ch
int 21h
c_s ends
end beg

12.10.2010, 11:32

задержка реализуется по принципу - считал время, добавил к нему необходимое число секунд (минут или часов) и потом считываешь и сравниваешь полученные данные с теми, которые тебе надо получить до их совпадения. Если делать задержку через вектор 4dh прерывания 1Аh, то там надо число секунд (минут/часов) надо умножать на 18, т.к. обновление таймера идет 18 раз в секунду.

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
s_s segment stack "stack"
db 100 dup(?)
s_s ends
d_s segment
sec dw 10
koeff_timer dw 18
d_s ends
c_s segment
beg:
assume ss:s_s,ds:d_s,cs:c_s
mov ax,d_s
mov ds,ax
mov al,0b6h
out 43h,al
mov dx,12h
mov ax,34dch
mov cx,523
div cx
out 42h,al
mov al,ah
out 42h,al
in al,61h
or al,00000001b
or al,00000010b
out 61h,al
clI
mov    ax,sec                 ; заносим количество необходимых нам секунд в ах 
mov    cx, koeff_timer     ; в сх - 18 (число раз обновлений таймера в секунду)
mul     cx                       ; умножаем
mov    sec,ax                  ; и полученное число заносим обратно в переменную секунд
mov    ah,0   
int    1Ah
add     dx,sec                 ; само формирование задержки - добавляем число секунд необходимой
                                   ; задержки помноженной на количество обновлений таймера в секунду
mov    bx,dx                  ; и заносим в регистр bx - для последующего сравнения
repeat:
int    1Ah
cmp    dx,bx
jne    repeat
 
mov ah,0
int 1ah
and al,11111100b
out 61h,al
StI
mov ah,4ch
int 21h
c_s ends
end beg

P.S. едиственное что, мне сейчас не на чем точно проверить код - некогда вирт машину поставить.
довольно хорошо это описывается в книге Роберта Жордана. Неплохо посмотреть еще Зубкова - "ассемблер для Dos, Windows и Unix".

Новые блоги и статьи Все статьи Все блоги /
сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и источниками (напряжения, ЭДС и тока). Найти токи и напряжения во всех элементах. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и. . .