接口实验两只老虎演奏

;*------------------------------------------------------*/
;*    Music.asm(音乐发生器接口实验)                      */
;*    音乐发生器程序Source File                          */
;*    Copyright (c) 2005 by HUST                        */
;*------------------------------------------------------*/

sstack segment stack
           dw 200 dup(?)
sstack ends

data segment
bg db 'Two tigers ...'             
     db 0ah,0dh
     db 'press any key to stop! ',0ah,0dh,'$'
freq dw 2 dup(262,294,330,262)            ;"两只老虎"乐曲中，音符的频率（音阶）
     dw 2 dup(330,349,392)              ;其中，0频率表示结尾
     dw 2 dup(392,440,392,349,330,262)
     dw 2 dup(294,196,262),0

time dw 10 dup(8),16,8,8,16               ; "两只老虎"乐曲中，音符的延时（节拍）
     dw 2 dup(4,4,4,4,8,8)                ;其中4，8，16表示延时的次数
     dw 2 dup(8,8,16)

old_seg dw ?
old_off dw ?

data ends

code segment
     assume cs:code, ds:data, ss:sstack

star proc far                      ;程序开始
       mov ax,data
       mov ds,ax
       mov ax,sstack
       mov ss,ax   

       push di                   ;寄存器压栈
       push si
       push bp
       push bx

       mov al,90h                ;8255初始化
       mov dx,303h
       out dx,al
       mov al,0ch                ;关闭8253的T2计数器（8255的PC6=0）
       mov dx,303h
       out dx,al
       mov al,00h                ;关闭喇叭（8255的PC0=0）
       mov dx,303h
       out dx,al
       mov al,0b6h               ;8253初始化
       mov dx,307h
       out dx,al
       
       mov dx,offset bg            ;显示提示信息
       mov ah,9
       int 21h

       mov si,offset freq           ;设置频率指针→si