微机原理课程设计_显示日期时间_汇编课程设计.doc
上传人:qw****27 上传时间:2024-09-12 格式:DOC 页数:4 大小:27KB 金币:15 举报 版权申诉
预览加载中,请您耐心等待几秒...

微机原理课程设计_显示日期时间_汇编课程设计.doc

微机原理课程设计_显示日期时间_汇编课程设计.doc

预览

在线预览结束,喜欢就下载吧,查找使用更方便

15 金币

下载此文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

微机原理课程设计_显示日期时间_汇编课程设计双击可执行程序RQSZ.exe,在出现的提示信息中输入大写字母“D”,可显示系统当前日期;输入大写字母“T”,可显示系统当前时间;输入大写字母“Q”,可结束程序。微机原理课程设计_显示日期时间_汇编课程设计代码:STACKSEGMENTSTACKDW200DUP(?)STACKENDSDATASEGMENTSPACEDB1000DUP('')PATTERNDB6DUP(''),0C9H,26DUP(0CDH),0BBH,6DUP('')DB6DUP(''),0BAH,26DUP(20H),0BAH,6DUP('')DB6DUP(''),0C8H,26DUP(0CDH),0BCH,6DUP('')DBUFFERDB8DUP(':'),12DUP('')DBUFFER1DB20DUP('')STRDB0DH,0AH,'PLEASEINPUTDATE(D)ORTIME(T)ORQUIT(Q):$'DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATA,ES:DATA,SS:STACKSTART:MOVAX,0001H;设置显示方式为40*25彩色文本方式INT10HMOVAX,DATAMOVDS,AXMOVES,AXMOVBP,OFFSETSPACEMOVDX,0B00HMOVCX,1000MOVBX,0040HMOVAX,1300HINT10HMOVBP,OFFSETPATTERN;显示矩形条MOVDX,0B00HMOVCX,120MOVBX,004EHMOVAX,1301HINT10HLEADX,STR;显示提示信息MOVAH,9INT21HMOVAH,1;从键盘输入单个字符INT21HCMPAL,44H;AL='D'?JNEACALLDATE;显示系统日期A:CMPAL,54H;AL='T'?JNEBCALLTIME;显示系统时间B:CMPAL,51H;AL='Q'?JNESTARTMOVAH,4CH;返回dos状态INT21HDATEPROCNEAR;显示日期子程序DISPLAY:MOVAH,2AH;取日期INT21HMOVSI,0MOVAX,CXMOVBX,100DIVBLMOVBL,AHCALLBCDASC1;日期数值转换成相应的ASCII码字符MOVAL,BLCALLBCDASC1INCSIMOVAL,DHCALLBCDASC1INCSIMOVAL,DLCALLBCDASC1MOVBP,OFFSETDBUFFER1MOVDX,0C0DHMOVCX,20MOVBX,004EHMOVAX,1301HINT10HMOVAH,02H;设置光标位置MOVDX,0300HMOVBH,0INT10HMOVBX,0018HREPEA:MOVCX,0FFFFH;延时REPEAT:LOOPREPEATDECBXJNZREPEAMOVAH,01H;读键盘缓冲区字符到AL寄存器INT16HJEDISPLAYJMPSTARTMOVAX,4C00HINT21HRETDATEENDPTIMEPROCNEAR;显示时间子程序DISPLAY1:MOVSI,0MOVBX,100DIVBLMOVAH,2CH;取时间INT21HMOVAL,CHCALLBCDASC;将时间数值转换成ASCII码字符INCSIMOVAL,CLCALLBCDASCINCSIMOVAL,DHCALLBCDASCMOVBP,OFFSETDBUFFERMOVDX,0C0DHMOVCX,20MOVBX,004EHMOVAX,1301HINT10HMOVAH,02HMOVDX,0300HMOVBH,0INT10HMOVBX,0018HRE:MOVCX,0FFFFHREA:LOOPREADECBXJNZREMOVAH,01HINT16HJEDISPLAY1JMPSTARTMOVAX,4C00HINT21HRETTIMEENDPBCDASCPROCNEAR;时间数值转换成ASCII码字符子程序PUSHBXCBWMOVBL,10DIVBLADDAL,'0'MOVDBUFFER[SI],ALINCSIADDAH,'0'MOVDBUFFER[SI],AHINCSIPOPBXRETBCDASCENDPBCDASC1PROCNEAR;日期数值转换成ASCII码字符子程序PUSHBXCBWMOVBL,10DIVBLADDAL,'0'