Управление звуком от таймера, генерация тона

Управление звуком от таймера, генерация тона
. . .
mov al, 0b6h
out 43h, al
mov ax, 11930
out 42h, al
mov al, ah
out 42h, al
in al, 61h
or al, 3h
out 61, al
delay 40
and al, 11111100b ; 0fch
out 61h, al
delay macro t
local m1, m2
push cx
mov cx, t
m1: push cx
mov cx, 65535
m2: loop m2
pop cx
loop m1
pop cx
endm