下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、实验九一、实验目的1.熟悉系统功能调用 INT 21H 的有关功能2.编写时钟程序二、实验任务1.执行时钟程序时,屏幕上显示提示符“: 随即显示时间并不停地计时。2.当有键盘按下时,立即停止计时,返回三、源程序DATA SEGMENTBUFFER DB 11DBDB 10 DUP()DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATAOUTCLK: MOV AX,DATAMOV DS,AXMOV DL,:MOV AH,2INT 21HMOV DX,OFFSET BUFFERMOV AH,0AHINT 21HMOV BX,OFFSET BUFFER+2”,由键盘
2、输入当前时、分、秒值,即DOS。;输入字符串MOV AL,BX;时针,ASCII码转非压缩BCDCMP AL, 03AHJAE ERROR1CMP AL, 02FHJBE ERROR1AND AL,0FHMOV BX,ALINC BXMOV AL,BXAND AL,0FHMOV BX,ALINC BXINC BXMOV AL,BX; 分针XX:XX:XX,AND AL,0FHMOV BX,ALINC BXMOV AL,BXAND AL,0FHMOV BX,ALINC BXINC BXMOV AL,BX;秒针AND AL,0FHMOV BX,ALINC BXMOV AL,BXAND AL,0FH
3、MOV BX,ALMOV BX,OFFSET BUFFER+2CALL TOBCD; 时针,两位非压缩 BCD 转换成两位压缩 BCDMOV CH, ALADD BX,3CALL TOBCDMOV DH, AL;分针,两位非压缩 BCD转换成两位压缩BCDMOV DH,ALADD BX,3CALL TOBCD;秒针,两位非压缩 BCD转换成两位压缩 BCDMOV DL,ALCMP CH, 24HJAE ERRORCMP DH, 60HJA ERRORCMP DL, 60HJA ERRORERROR1: MOV AH,4CHINT 21H秒针加 1AGAIN: CALL DELAYMOV AL,
4、DLADD AL,1DAAMOV DL,ALCMP AL,60HJA ERROR JNE DISPYMOV DL,0MOV AL,DHADD AL,1; 分针DAAMOV DH,ALCMP AL,60HJA ERRORJNE DISPYMOV DH,0MOV AL,CHADD AL,1DAA ; 时针 MOV CH,ALCMP AL,24H JAE ERROR JNE DISPY MOV CH,0 ERROR: MOV DL, 0MOV DH, 0MOV CH, 0 DISPY: MOV BX,OFFSET BUFFERMOV AL,0DHMOV BX,ALINC BX MOV AL,0 MO
5、V BX,AL INC BX MOV AL,CH CALL TRAN INC BX MOV AL,: MOV BX,AL INC BX MOV AL,DH CALL TRAN INC BX MOV AL,: MOV BX,AL INC BX MOV AL,DL CALL TRAN INC BX MOV AL,$ MOV BX,ALPUSH BXPUSH CXPUSH DXMOV DX,OFFSET BUFFERMOV AH,9INT 21HMOV AH,06HMOV DL,0FFHINT 21HPOP DXPOP CXPOP BXJNE GOJMP AGAINGO: MOV AH,4CHINT
6、 21HTOBCD PROC; 两位非压缩 BCD 转换成压缩MOV AL,BXMOV CL,4SHL AL,CLOR AL,BX+1RETTOBCD ENDPTRAN PROC; BCD 转 ASCIIMOV CL,ALSHR AL,1SHR AL,1SHR AL,1SHR AL,1OR AL,30HMOV BX,ALINC BXMOV AL,CLAND AL,0FHOR AL,30HMOV BX,ALRETTRAN ENDPDELAY PROCPUSH CXPUSH AXMOV AX,0FFFFHFIR: MOV CX,02FFFHGOON: DEC CXJNE GOONDEC AXJNE FIRPOP AXPOP CXRETDELAY ENDPCODE ENDSEND OUTCLK四、思考题时钟程序中存在误差吗若有误差,其来
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 事业单位法律岗面试易错题题库及参考答案
- 2026事业单位人力资源岗面试历年真题题库及参考答案
- 2026事业单位综合岗面试历年真题试卷及参考答案
- 事业单位人力资源岗面试易错题试卷及参考答案
- 事业单位法律岗面试历年真题题库及参考答案202
- 2026年湖南现代物流职业技术学院高职单招笔试职业适应性测验历年参考题库含答案解析
- 2026年湖北水利水电职业技术学院高职单招笔试职业技能测验历年参考题库含答案解析
- 2026年海南体育职业技术学院高职单招笔试化学历年参考题库含答案解析
- 2026年河南经贸职业学院高职单招笔试化学历年参考题库含答案解析
- 2026年河南应用技术职业学院高职单招笔试英语历年参考题库含答案解析
- 2026-2027学年度福建省高一地理期中考试卷
- 人教版品德与社会五下《生活中的快乐》课件
- 2026年公务员时事政治试题(附答案)
- 2026中国移动校园招聘考试(通信技术)历年参考题库含答案详解
- 现场监理安全隐患巡查手册
- 2026中国钢铁物流加工配送中心转型升级路径探索
- Altium Designer 实操技能考核试题(含详细答案)
- 2026年9月版安全环境职业健康法律法规标准文件清单
- iso9000考试题及答案
- IPC-JEDEC J-STD-020F-2024 中文版(非气密固态表面贴装器件的潮湿 - 再流焊敏感度分级)
- 三类医疗器械经营企业负责人试题卷及答案
评论
0/150
提交评论