組譯工具——擴音器發聲的控制

            今天寫了擴音器發聲控制的程式，可是在dos下運行，無錯誤無警告，就是不出聲。不知為何，想請教各位大蝦這是什麼情況，又該如何解決。小女子在此拜謝了！O(∩_∩)O

以下是我編寫的程式（用masm50編譯的）：

.model small
.data
freq dw  2000
.stack
.code
start:          mov ax,@data
                mov ds,ax
  mov ax,freq
  call speaker ;設定擴音器音調
  call speakon ;開啟擴音器聲音
  mov ah,1 ;等待按鍵
  int 21h
  call speakoff ;關閉擴音器聲音
               
     speaker proc
  push ax
  mov al,0b6h    ;10110110B
  ; 計數器2、寫低高、方式3、二進位
  out 43h,al ;寫入控制字
  pop ax               ;ax中存放的計數值
  out 42h,al ;寫入低8位計數值
  mov al,ah
  out 42h,al ;寫入高8位計數值
  ret
    speaker endp
 speakon proc
  push ax
  in al,61h ;8255的相關設定
  or al,03h
 ;D1D0＝PB1PB0＝11B，其他位不變
  out 61h,al
  pop ax
  ret
speakon endp
speakoff proc
  push ax
  in al,61h
  and al,0fch
 ;D1D0＝PB1PB0＝00B，其他位不變
  out 61h,al
  pop ax
  ret
speakoff endp
                end start