1setupdma08 proc near
2push ax
3  mov al,00000101b;mask 1 dma channel
4  out 0Ah,al
5            
6  mov al,01010101b;dma-mode single transfer, addr increasing, auto-init, device2mem, 1 channel
7  out 0Bh,al
8
9  xor al,al
10  out 0Ch,al;switch to Lo-Hi
11
12  push cs
13  pop ax
14  mov bx,10h
15  mul bx
16  add ax,offset sbuf08
17  push ax
18  adc dl,00h
19  mov al,dl
20  out 83h,al;page, first 4bit in 24bit addr
21
22  pop ax;offset
23  out 02h,al
24  mov al,ah
25  out 02h,al
26
27  mov ax,537Ch;size
28  dec ax
29  out 03h,al
30  mov al,ah
31  out 03h,al
32
33  mov al,00000001b;unmask
34  out 0Ah,al
35pop ax
36setupdma08 endp
37
38setupdsp08 proc near
39push ax    
40  mov ah,00CEh;dsp cmd Cxh,6-playback,E-recording
41  call dspcmd
42
43  xor ah,ah
44  call dspcmd;unsigned,mono
45
46  mov ax,29BEh;size
47  dec ax
48  xchg ah,al
49  call dspcmd
50  mov ah,al
51  call dspcmd
52pop ax
53ret
54setupdsp08 endp
55
56dspinit proc near
57push dx ax cx
58  mov dx,226h;reset
59  mov al,01h
60  out dx,al

61
62  mov cx,99h;delay
63waitffin:
64  xor al,al
65loop waitffin
66  out dx,al
67
68  call dspreadata
69  mov ah,09h
70  cmp al,00AAh
71    je dspinited
72
73  mov dx,offset mninited
74  int 21h
75  jmp dspinitext
76dspinited:
77  mov dx,offset minited
78  int 21h
79
80  mov ah,41h;frequency for output
81  call dspcmd
82
83  mov ah,1Fh
84  call dspcmd
85  mov ah,40h
86  call dspcmd
87
88  mov ah,42h;frequency for input
89  call dspcmd
90
91  mov ah,1Fh;hi
92  call dspcmd
93  mov ah,40h;lo
94  call dspcmd
95dspinitext:
96pop cx ax dx
97ret
98dspinit endp
99
100dspcmd proc near
101push dx ax
102waitfacmd:
103  mov dx,022Ch
104  in al,dx
105  and al,10000000b
106    jnz waitfacmd
107
108  mov al,ah
109  out dx,al
110pop ax dx
111ret
112dspcmd endp
113
114dspreadata proc near
115push dx
116  mov dx,022Eh
117waitfrdata:
118  in al,dx
119  and al,10000000b
120    jz waitfrdata
121
122  mov dx,022Ah
123  in al,dx
124pop dx
125ret
126dspreadata endp