原创力文档- 1、本文档共6页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
综合设计数字录音机
程序流程图如下： 录音子程序流程图：
延时子程序
放音子程序
DATAS SEGMENT
ioport equ 0c400h-280h
io0809 equ ioport+29ah
io0832 equ ioport+290h
io8253 equ ioport+280h
io8255 equ ioport+288h
io8253c equ ioport+283h
io8255c equ ioport+28bh
msg0 dbPress R to start record,0dh,0ah,$
msg1 db 0dh,0ah,Input Error!Please input R or r to continue...,0dh,0ah,$
msg2 db 0dh,0ah,Press P to play record,0dh,0ah,$
msg3 db 0dh,0ah,Input Error!Please input P or p to continue...,0dh,0ah,$
msg4 db 0dh,0ah,Recording...,0dh,0ah,$
msg5 db 0dh,0ah,Playing...,0dh,0ah,$
msg6 dbInput:,$
msg7 db 0dh,0ah,Thank you!,0dh,0ah,$
msg8 db 0dh,0ah,Record Complete!,0dh,0ah,$
msg9 db 0dh,0ah,Play Over.,0dh,0ah,$;
msg10 db 0dh,0ah,If you want to pause,press any key!,$
msg11 db 0dh,0ah,Press R to play replay,0dh,0ah,$
msg12 dbPress Q to quit,0dh,0ah,$
buf db 60000 dup(?)
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START:
MOV AX,DATAS
MOV DS,AX
MOV DX,OFFSET MSG0 ;显示按R开始
MOV AH,09H
INT 21H
MOV DX,OFFSET MSG6 ;显示并等待input
MOV AH,09H
INT 21H
CHOOSE0: ;直到输入r为止才开始录音
MOV AH,1
INT 21H
CMP AL,R
JZ OK0
CMP AL,r
JZ OK0
MOV DX,OFFSET MSG1 ;提示输入错误，继续要输入
MOV AH,09H
INT 21H
MOV DX,OFFSET MSG6
MOV AH,09H
INT 21H
JNZ CHOOSE0
OK0:
MOV DX,OFFSET MSG4 ;开始录音
MOV AH,09H
INT 21H
MOV DI,OFFSET BUF
MOV CX,30000
REC:
MOV DX,IO0809 ;启动0809将模拟信号转化成数字信号
OUT DX,AL
CALL DELAY
IN AL,DX ;输入转化数据
MOV [DI],AL
INC DI
LOOP REC ;一直循环30000次，因为cx=30000
OK2:
MOV DX,OFFSET msg8
MOV AH,09H
INT 21H
MOV DX,OFFSET MSG2
MOV AH,09H
INT 21H
MOV DX,OFFSET MSG6
MOV AH,09H
INT 21H
CHOOSE1: ;按p进行播音
MOV AH,1
INT 21H
CMP AL,P
JZ OK1
CMP AL,p
JZ OK1
MOV DX,OFFSET MSG3
MOV AH,09H
INT 21H
MOV DX,OFFSET MSG6
MOV AH,09H
INT 21H
JNZ CHOOSE1 ;直到按了p才进行播音
OK1:
MOV DX,OFFSET MSG5
MOV AH,0
文档评论（0）