目录 上一页 下一页 下一章

第4章 奇妙的声音 -69-


MAIN


ADDR


OUTMSG





START:

















EXIT:
MAIN

RISE



LOOP1:
ORG
PROC
JMP

DW
DW

DB
DB
DB
DB
DB

MOV
MOV
INT

MOV
INT
CMP
JB
CMP
JA
SUB
CBW
DEC
SHL
MOV
CALL
JMP

INT
ENDP

PROC
CALL
MOV

CALL
100H
FAR
START

OFFSET RISE
OFFSET FALL

0DH,0AH
'1---RISE',0DH,0AH
'2---FALL',0DH,0AH
'OTHER---EXIT',0DH,0AH
'CHOICE:',24H

AH,09
DX,OFFSET OUTMSG
21H

AH,01H
21H
AL,'1'
EXIT
AL,'2'
EXIT
AL,30H

AX
AX,1
BX,AX
ADDR[BX]
START

20H


NEAR
OPEN_T
AX,3000H

SOUND




;RISE子过程偏移地址
;FALL子过程偏移地址

;定义菜单







;显示菜单


;等待输入选择

;小于1则退出

;大于2,退出
;ASCII码转换成数字
;BYTE转换成WORD

;(数字-1)×2,计算地址指针
;地址指针置入BX寄存器
;转至相应子过程
;循环

;返回DOS
;主过程结束


;调用OPEN_T子程序打开定时器
;设定频率初值

;输出频率

Copyright © 2004-2015 Reanimator www.cookmoon.org

目录 上一页 下一页 下一章