时间戳

首页 > 解决方案 > PC Speaker 程序在 MS-DOS 下工作异常

assembly - PC Speaker 程序在 MS-DOS 下工作异常

问题描述

我正在使用汇编语言在 MS-DOS 中制作一个小游戏，并使用 Borland Turbo Assembler 5.0 进行编译，目前我正处于分别测试游戏不同部分的阶段（如文本和图形屏幕以及 PC 扬声器声音）。在测试板载 PC 扬声器声音时（我正在使用 VMware Worstation Player 进行仿真），程序编译得很好，但首先，它永远不会结束（卡住，我必须重新启动虚拟机才能摆脱卡住循环），其次，声音仍然打开（重启后清除，谢天谢地），第三，频率与我预期的完全不同。

这是我的代码：

; Testovací sekvence hry Lodě (LODE.COM)
; Testing sequence of game Lodě (Boats; LODE.COM)

P8086           ; Výběr procesoru  // CPU
MODEL TINY      ; => ZASAH.COM

DATASEG
Beep    DW 0BA7h        ; Frekvenční číslo 2983 = 400 Hz      // Frequency number
Len     DW 0001h        ; HIWORD => Délka 100 ms = 100 000 us // Length of the beep
        DW 86A0h        ; LOWORD

UDATASEG
Stck    LABEL WORD

CODESEG
        STARTUPCODE

        MOV     SP,OFFSET Stck  ; Odložme si stack  // Save our stack

        CALL    Begin

        MOV     AH,4Ch
        INT     21h
        RET

Begin PROC NEAR
        mov     bx,[OFFSET Beep]        ; Nastavme si frekvenci 400 Hz  // Set frequency
        CALL    BeepStrt
        mov     cx,[OFFSET Len]         ; Nastavme si 100 ms prodlevu   // Set delay
        mov     dx,[OFFSET Len+1]
        CALL    Delay
        CALL    BeepEnd
        ret
Begin ENDP

BeepStrt PROC NEAR
        in      al,61h          ; Stáhnout hodnotu portu 61h  // See value of port 61h
        or      al,03h          ; Zapnout bity 0 a 1          // Set bits 0 and 1
        out     61h,al          ; Poslat zpět do portu 61h    // Update port 61h
        ret
BeepStrt ENDP

BeepEnd PROC NEAR
        in      al,61h          ; Stáhnout hodnotu portu 61h  // See value of port 61h
        and     al,0FCh         ; Vypnout bity 0 a 1          // Reset bits 0 and 1
        out     61h,al          ; Poslat zpět do portu 61h    // Update port 61h
        ret
BeepEnd ENDP

Delay PROC NEAR
        mov     ah,86h          ; BIOS funkce prodlevy                // BIOS delay func
                                ; Právě teď máme nastavenou prodlevu  // We now have delay set
        int     15h             ; Provedeme                           // Let's do it
        ret
Delay ENDP
END

无论我使用偏移量Len+1 还是 +2，当我直接输入值时它甚至都不起作用。几年前我用标准的 MS-DOS 程序测试它时DEBUG.EXE，它运行良好。TASM 没有。我想用 TASM，因为用DEBUG. 使用 TASM 进行源代码文件和编译（当然也可以使用 TLINK 链接）更容易、更方便。唉，最终的结果应该总是一样的，对吧？

这是卡住的截图： 编译的 PC Speaker 测试程序卡住了

我从这些来源获得了我的信息：

我脑子里真的蹦出一件事。如果实际程序超过 64k 大小会发生什么？TASM/TLINK 会阻止它编译和/或链接并告诉生成的程序太大，还是编译到 64k 并且其余部分将被截断？我让自己面临挑战，以构建适合 64k 大小的整个程序。否则，我总是可以重命名.EXE为.COM，无论如何它都会工作。但是，对于用作命令的程序而不是简单的游戏来说，它是有意义的。

标签： assemblyx86dostasmbeep

解决方案

第一个问题

这个数据：

Len     DW 0001h        ; HIWORD => Délka 100 ms = 100 000 us // Length of the beep
        DW 86A0h        ; LOWORD

..和这段代码：

    mov     cx,[OFFSET Len]         ; Nastavme si 100 ms prodlevu   // Set delay
    mov     dx,[OFFSET Len+1]
    CALL    Delay

..需要更像：

Len     DW 0001h        ; LOWORD => Délka 100 ms = 100 000 us // Length of the beep
        DW 86A0h        ; HIWORD

..和：

    mov     cx,[OFFSET Len]         ; Nastavme si 100 ms prodlevu   // Set delay
    mov     dx,[OFFSET Len+2]
    CALL    Delay

由于这些错误，您会得到 0xA0001000 微秒（大约 44 分钟）的延迟。

第二个问题

这段代码：

BeepStrt PROC NEAR
    in      al,61h          ; Stáhnout hodnotu portu 61h  // See value of port 61h
    or      al,03h          ; Zapnout bity 0 a 1          // Set bits 0 and 1
    out     61h,al          ; Poslat zpět do portu 61h    // Update port 61h
    ret
BeepStrt ENDP

..启用“定时器 2 门”和“扬声器数据”；这允许计时器控制扬声器。

它不设置计时器。因为没有设置计时器，所以你最终会得到“随机的，谁知道什么”（与 400 Hz 不同的频率，或静音）。

如果您查看链接到的页面（http://www.intel-assembler.it/portale/5/make-sound-from-the-speaker-in-assembly/8255-8255-8284-asm-program-例子.asp ); 你基本上已经跳过了它的整个下半部分。

如果实际程序超过 64k 大小会发生什么？

这取决于您如何编译/链接它。有几种不同的内存模型（参见http://www.c-jump.com/CIS77/ASM/Directives/D77_0030_models.htm）。取决于您使用的内存模型；当您超过 64 KiB 时它会崩溃，或者在您接近超过 64 KiB 之前它会因为“分段错误”（例如忘记在某处使用正确的分段覆盖前缀）而崩溃。25 年前大家停止使用 DOS（和实模式）的原因有很多；这就是其中之一。;-)

推荐阅读