微机原理课程设计数字时钟程序.docx
《微机原理课程设计数字时钟程序.docx》由会员分享，可在线阅读，更多相关《微机原理课程设计数字时钟程序.docx（29页珍藏版）》请在冰点文库上搜索。
微机原理课程设计数字时钟程序
河北科技大学
课程设计报告
学生姓名：
学 号:
专业班级:
电子信息科学与工程
课程名称：
微型计算机原理及应用
学年学期：
2０ １1—２０１2学年第1学期
指导教师:
2 001１ 年 12月
课程设计成绩评定表
学生姓名
学 号
成绩
专业班级
起止时间
2０11／1２／26—2011/12/３0
设计题目
数字时钟程序
指
导
教
师
评
语
指导教师：
年 月日
一、课设题目及目的………………………………….４
二、设计任务………………………………………….４
三、总框图及设计流程……………………………….4
四、ﻩ源程序清单……………………………………….6
五、ﻩ调试结果及显示………………………………….19
六、ﻩ个人贡献………………………………………….１9
七、课程设计总结及体会…………………………….21
一、课设题目及目的
实习题目：
数字时钟程序
实习目的:
通过实习，使我们进一步弄懂所学到的课本知识,巩固和深化对8０8６系统的指令系统、中断系统、键盘／显示系统、程序设计、应用开发等基本理论知识的理解,提高汇编语言应用于技术的实践操作技能,掌握汇编语言应用系统设计、研制的方法,培养利用科技革新、开发和创新的基本能力,为毕业后从事与其相关的工作打下一定的基础。
二、课设任务
本课题为利用汇编语言设置时钟程序，其显示效果为：
截取系统时间，能以时、分、秒（其中时为24小时制）的形式显示，并且通过合理的操作能修改时和分的内容来修改时间。
再有，可以给它设定一个ALARM时间,到这个时间它就能产生信号,起到定时作用,。
除此之外还能显示日期,日期分为年、月、日，其显示方式为xｘｘx年xx月xx日。
三、总框图及流程
四.源程序清单
DATＡ SEＧＭENT;数据段开始
ＭESS1DＢ'*****＊********＊*ASＭASＳIGNMＥNT**＊*************＊*＊ '，0AH，０ＤH
ＤB' ********＊**＊***ELEＣTRONＩＣCLOCK**＊＊****＊******＊** '，0AH，0DH
DＢ'＊＊*＊＊＊*Prｅｓs C oｒ c toEDITthｅ ALARＭtime*****＊* ',0ＡH,０DH
DB '*******PRESSM ORmTOCHANGE ＳOUND！
******＊**＊***',0ＡH，0ＤH
DＢ’＊*＊*PRESSSORｓTＯSEＴTHETIMＥ＊***＊****＊**** ',0AH,0DＨ ；显示功能菜单
DB＇ ******＊****PREＳS EＳＣ BＵTＴＯNＴOEXIT***＊****＊**＊** ＇,0AH,0ＤH,'$'
TNDＢ 'PLEAＳEＩNＰＵTTHENＥWTＩMＥ（hh：
ｍｍ：
ｓs）：
＇，0DH,0AH，'$'
TＭＤＢ'PLEＡSEIＮPUT TＨEAＬARM TIME（ｈh：
mm:
ss）:
',0DH,0AＨ,'$＇
MUSＩCMＥSSDB 'ＰLEASEＣHＯＯＳE THE TＹPEOFMUSIＣ:
1（ＦAＳＴ）２（MIDＤＬＥ）3（ＳLＯW）'，0DＨ,0ＡH，＇＄'
MESS２ DＢ 'Ｔiｍeｉs:
',０ＡH,0DＨ,'$＇
MEＳS3 ＤB＇ＴODAYIS:
',０AH，0DH,'$'
DBUFFER1 DＢ 2０DUP（' ＇）
Ｔ_BUFＦＤB40 ;在数据段开一段时间显示缓冲区
DB?
DB40 ＤUP（？
）
HORDＢ ?
MINDＢ?
SECDB ?
ＴEMPＨＯR DB?
ＴEMPMINDB ?
TEMPSECＤＢ?
MUSICDW80０ ; 存放音乐的频率数
DATA EＮＤS
STACKSEGMENT
DB100ＤＵＰ（?
）
STAＣK ENDＳ
CＯDＥSEＧMENT
ＡＳSUMEＣＳ:
CODＥ,SＳ:
STACK，DＳ:
DＡTA
START：
CAＬL CＬEAR ；调用清屏子程序
DISＰLＡＹ:
;时间显示部分
MOV AＸ，ＤATＡ
MOＶＤＳ,AＸ
MOＶＢＸ,OＦFSET Ｔ＿BUFＦ;送T_BUFＦ的偏移地址到BX
ＭOVAH,2ＣH;调用DOＳ时间调用功能，功能号：
2ＣH，小时,分钟,秒数分别保存在CH，ＣＬ，DH中
INT21H
;判断时间是否相等
ＳUBDH,１ ;秒数+１修正
CALLCＨECK
；........．...．．.......．.........．．．.．.．..．....．..........．...........．....
MOVAL，CＨ ;小时数设定
ＭOV AH,0
CＡLＬBCTＤ ;调用进制转换子程序二进制ＢCD码子程序
PUSHＡＸ
ＡND AＬ，０Ｆ0H ;选取ＡL高四位
MOVCＬ,4 ;设置右循环的次数
ＲORAＬ，ＣＬ ;右循环
ＯRAＬ,3０H ;加３0Ｈ得到ACSIＩ码
MＯＶ［BX]，AＬ ;将得到的结果送到T_ＢUＦF缓冲区
INCBX ;BX自加１,指针指向下一个缓冲区的下一个地址
ＰOPAX
ANDＡＬ,0FＨ ;选取低四位
OＲ AＬ，30H
ＭOV［BＸ],ＡL；将转换后的低四位值送入缓冲区的下一个地址
INC ＢX
；.．...．.．...．....．............．．.．.．．......．...．．．......．．...．．....．.....
MＯVAL,'：
＇;显示分隔符号
MOV［BＸ]，AL
IＮＣBＸ
;.．．．.......．....．....．.........．....．..．．..．...．．....．......．．.．.．.．....
MOＶAH,2ＣＨ;取时间
ＩNT 2１H
;....．.．.．....．．...．.．.．...．.....．..．...．.．.．．．.．...........．...........
MOVAL,CL;分钟数设定
MOVＡH，0
CALL ＢCＴD;调用进制转换子程序二进制ＢＣD码子程序
ＰUSH AX
AＮDAL,0F0H；选取AL高四位
MOVＣL,4；设定循环次数
rolal,cl；循环左移4次
ｏｒ ａl,３０h;加３0H得到ACSＩI码
moｖ[bx],aｌ；将得到的结果送到Ｔ_ＢUＦF缓冲区
iｎc bx;BX自加1，指针指向下一个缓冲区的下一个地址
ｐop ａx
andaｌ,0fh;选取低四位
orａl,30ｈ
moｖ [ｂx],al;将转换后的低四位值送入缓冲区的下一个地址
iｎc bx
;..．.....．....．．....．..．......．.．.......．..．...．.........．...．．.．..．.．
ｍｏval，＇：
＇ ；显示分隔符号
mｏv [bｘ],aｌ
incｂｘ
;.............．．...．．..．．．．..．．．.......．.．..．．．...．...．.．.......．.....
mｏv ah,2cｈ;秒设定
ｉnｔ２1h
mｏval,ｄh
movah，0
calｌｂｃｔｄ；调用进制转换子程序二进制BＣD码子程序
ｐushaｘ
and al，0f０ｈ;选取AL高四位
movcl，４
roｌal,cl
ｏr al,３0h；加３０H得到ACSII码
mｏv [bx],al;将得到的结果送到T_BUFF缓冲区
incbx
pop ax
and aｌ，0fh;选取低四位
oral，３0ｈ
mov[ｂx],al;将转换后的低四位值送入缓冲区的下一个地址
inc bx
;......．.......．....．....．．...．.．.....．..．....．.．...．.．....
ｍov al,'$';将字符串的结束位送至显示缓冲区的最后一位
ｍov[bx］,ａl
;...．．.．......．...．...．．....．.．..................．.....．...
calldaｔe
ｐｕｓhbx；置光标位置，AH=2，BH＝0，DH跟DL分别为行号与列号,并入栈保护BX
ｍovah,2;0~1用于此程序最下边的 在下面的两个置光标位置
movbh,0
moｖdｈ,1７;行
ｍoｖdl，41;列
ｉnｔ10h
popbｘ
leaｄx,t_bｕff;送Ｔ_BUFＦ偏移地址到DX,并调用DＯＳ显示功能,功能号为９
movah,9
iｎt21ｈ;至此当前时间的显示功能结束!
pushbx;置光标位置
ｍｏvａh,２
ｍoｖbh，0
ｍoｖ dh，１6
moｖdl，41
int１0h;日期
ｐopbx
lｅadx,DBUＦＦER１
mｏvah,9
int２1h
pushbx;置光标位置
moｖ ah，2
movbh,0
movdｈ，16
mov dl，21
iｎｔ 10h
pｏp bx
lea dx,mesｓ3
mov ah,９
ｉnt21h ;显示MESS3
pｕshbx;置光标位置
movah，2
movbh，０
ｍｏv dh,０
ｍov dl,0
int1０h
pｏｐbｘ
leadｘ,meｓｓ１
movah,9
int21ｈ;显示MESS1
pushbx;置光标位置
mｏvａh,2
movｂh,0
ｍov dh,1７
mｏvdl,２1
ｉnt10h
pｏpｂｘ
leａｄｘ,mesｓ2
mｏｖ ａｈ,9
int2１h ;显示ＭＥSS2
;.．....．．..．.．...．....．......．...．．....．..．.．.
calｌ ｄｅlaｙ1
moｖ ah,１ ;调用键盘I/O中断功能号1,获取键值到AＬ
int １6h
cｍp al,'M'
ｊeeｄitmusic
cmpaｌ,'m'
ｊeedｉtｍusiｃ
cmpａｌ,'c';是c键，转移闹钟时间修改程序
jeedittime
ｃｍpａl,＇C' ;是C键,转移闹钟时间修改程序
je ｅｄittｉme
cmp al,'s';是s键，转移时间修改程序
jecor
cmpal,'S＇ ;是S键,转移时间修改程序
ｊecｏr
cｍpaｌ，1bh
jｚｑuit ；是EＳＣ键,退出程序
jmp diｓplay
ｑuiｔ:
mｏvah,4ｃｈ
int 21ｈ
ｒｅｔ
Coｒ:
cａｌlsｅttime；设置时间
；....．..．........．..．．．．.................．.
eｄｉtmusiｃ ｐroc
pushaｘ;入栈保护数据
ｐush bx
ｐｕsｈcｘ
pｕsｈdx
pusｈf
mｏｖｄx,ofｆsetmusicｍｅss;显示修改音乐的种类提示
mov ah，09h
ｉｎt2１h
ｍｏv dx,oｆfｓeｔt_buｆf；数据缓冲区的数据输入
ｍｏｖaｈ,０ah
ｉｎt21h
andｄｘ,0h
leabx，ｔ＿bｕｆｆ
incbx
inc bx
inc bx
mov ａl,[bx]
cmpａl,'1'
jem８00to
cmp aｌ，'2'
jｅｍ1600ｔo
cｍpaｌ,'３'
jem3２0０to
m800to:
mov music,80０
jmpt
m１600ｔo:
movmｕsｉc,１６00
ｊｍｐt
m３20０tｏ：
movmusic,320０
t:
popｆ;出栈恢复数据
ｐoｐdｘ
pｏpcｘ
ｐop bｘ
popａx
jmｐ start
ｒet;返回ＤOS
editmusiｃｅndp;结束
bｃtdpｒocnｅar;二进制ＢCD码子程序
;AX输入参数
；AX输出参数，存放调整过的ＢＣD码
mov dx,ax
mov ax,０
movcx，16;设置循环次数
bｃtd１：
cｌc;清进位标志C
rｃl dx,1;通过进位的循环左移
adcal，al;带进位加法
daa ;加法的十进制调整
xchg al,ah;交换高,低8位
adcａl,al
daa
xｃhg al,aｈ
loopbｃｔd1；循环次数保存在CX里
reｔ
bｃｔd ｅndp
;........．........．.．..．．．........．.．.
edittime proc ；时间修改程序
pushax ；入栈保护数据
pushbx
pusｈcx
ｐｕshdｘ
puｓhｆ
movdx,offseｔtm ;显示修改时间的格式提示
mov ａｈ,09h
int２1h
moｖ dx,oｆfｓｅｔｔ＿buff;数据缓冲区的数据输入
ｍov aｈ,0ah
iｎt 2１h
aｎdｄx,0h
lｅabx,t_bufｆ
incbx
ｉnｃbx
incbｘ
moｖdｈ，[bx]
subdh，3０h
incbx
ＭＯVDL,［BX]
SUＢDＬ,３0H
MOV ＣＬ,10
MOＶ AL,ＤH
MＵLＣＬ
ADDAL,DL
MOＶＣH,AL
MＯV HＯＲ,ＡL
ＭOVＴEMPHOR，ＡL
INC BX
INＣ ＢX
MＯVDH,［ＢＸ]
ＳUBDH,3０H
ＩNＣBX
MOＶ DL，[BX]
ＳＵBDＬ,30H
ＭＯVＣL,10
MOVAL,DH
ＭUL ＣL
ＡDＤAL,ＤL
MＯVCL,AL
MOV MIN,ＡL
MOVTＥＭＰMIN,AL
INC BX
IＮCBX
MOVDＨ,[BX]
SUBDＨ,30H
INＣＢＸ
MOV ＤL,[BX］
SUB DＬ,30H
MＯＶＣL,10
MOVＡL,DＨ
ＭULCL
AＤDAＬ，ＤL
ＭOV ＤＨ，ＡL
MＯVＴＥMＰSEC,AL
POPＦ ；出栈恢复数据
POPDX
POＰＣX
PＯPＢＸ
POPAX
JＭP START
RET
EDＩTTIＭEENDP
；..．..．.........．..．..．．...．.．.．...．...
CLEＡRPROCNＥAR
PUSHAＸ；入栈保护现场
PUSＨ BX
PＵSH ＣX
PＵSHDX
MOV ＡX,0600H；AＨ=06（滚动）AL=00（全屏空白）
MOV BH,１FH;设置背景颜色（1蓝色）和前景颜色（Ｆ白色）
ＳUBCX,CX
MOVDX,5F5ＦＨ
IＮＴ 10Ｈ
POＰ DX;出栈恢复现场
POP CＸ
POP ＢＸ
POP AX
RET
CLEAＲ EＮDＰ
;..．...．..．..........
ＤＡTE PROＣ NEAＲ
ＭOV ＡH,2AＨ;取日期ＣＸ：
DH:
ＤL＝年:
月:
日AL＝星期
ＩNT 21H
MOV SI,0
ＭOV AX，ＣX
ＭOVＢX,１00
DＩＶ BL
MOＶBL，AH
CＡLL BCＤASC1;日期数值转换成相应的AＳCＩI码字符
MOＶ AL，BL
CALL BＣDASC１
ＩNC SＩ
MＯV AL,ＤH
CALLBCDASC１
INＣ ＳI
ＭOV AL,DL
CＡLLBCDASC１
MOV AL，'$'
MOV DBUFＦER１[ＳI]，AＬ
RET
ＤＡTEEＮＤP
；.....．.．．．........
BCDASC1 PRＯCＮEAR
PUＳH BＸ
CBW
MOＶＢL，１0
DＩVＢL
ADD AL,＇0'
ＭOVDBUFFＥＲ1[SI],AL
ＩNC SI
ＡDD ＡＨ,'0＇
MOV DBUFFEＲ１[SI],AH
IＮC SI
POP BX
ＲEＴ
BCDASC1 ENDP
;...．..............．.....．.....．.......．.
SETTIＭEPRＯＣ;时间修改子程序
CAＬLINPUＴ;调用键盘输入子程序输入数据
MOV CH,HＯR
ＭOＶ CL，MIN
ＭＯV DH，ＳEC
AND ＤL,０H
ＭOV AH,2DH
INT 21H
JMPSTART
RＥT
ＳEＴTIMＥ ENDＰ
;.........．.............．.......．．..．．.．.
ＤELAＹ１ PROC;精确延迟时间子程序
MOV DＸ,04FFH;循环次数
UＰ:
XＯR CX,ＣX
Ａ:
NＯP
ＬOOPＡ
DＥCDX
JＮZ UP
RＥＴ
DＥLAＹ１ EＮDＰ
;．..．..．.．.．.．.．..．....．...．...．....．...
INPUT PＲOC；输入子程序
ＰＵSＨ AX;入栈保护数据
PＵSH BX
PＵＳH CX
PUSＨDX
PUSHF
ＭOVDＸ,OＦFSEＴＴN;显示修改时间的格式提示
ＭOV AＨ,０9H
IＮT２１H
ＭOVDＸ,ＯＦFＳETT＿BUFＦ;数据缓冲区的数据输入
MOＶAＨ,０AH
INＴ ２１H
AND ＤＸ,0H
ＬEA BX,T_ＢUFF
INCBX
IＮＣBX
MOV DH,[ＢX]
SUBDH,30Ｈ
INC ＢX
MOV DL,［BX]
SUB ＤL,30Ｈ
MOV CL,10
ＭＯVAL,DH
MULＣL
AＤD AＬ，ＤL
MOV ＣＨ，AL
MOＶ HＯR，ＡL
INC ＢＸ
ＩNＣ BX
MＯV DH,[BX]
SUBDＨ,30H
INC BX
MＯV DL，[BX]
SＵB ＤL,30H
MOVCL,１0
MOＶAL,ＤH
MUＬCL
ADＤ AＬ,DＬ
MＯV CL，AL
MOV ＭIN,AL
ＩNC BX
INC ＢX
MOV DH,[BＸ]
SＵＢ DＨ,30H
INC ＢX
MＯV DL，[BX]
SUB DＬ,３0H
MOV CＬ，10
MOV ＡＬ，ＤH
MUＬ CL
ＡDＤＡL，DL
MＯＶDH，AL
MOV SEC,ＡL
POPＦ;出栈恢复数据
POPDX
POPCX
ＰOPBX
POPＡX
ＲＥT
ＩNPＵTＥＮDP
;.．............．..．.............．．..．...........．．．
ＣHECＫＰROC
ＰUSHAX
PUSＨ ＢX
CMPCH,TEMPＨOR;设置定点报时
ＪNE CF１
CMＰＣＬ，TEMPＭIＮ
ＪＮE CF1
ＣＭＰ DH，TＥMＰSEC
JＥXIANG
ＣF1：
ＣMＰＣL，0 ;设置整点报时
ＪNE CＦ
CＭPDH,0
JNEＣF
XＩAＮG:
CALLOPEN
升级会员 