LED七段数码管数字钟

本文格式为Word版，下载可任意编辑——LED七段数码管数字钟目录

一、设计任务书错误！未定义书签。二、设计题目2三、设计方案2四、硬件原理错误！未定义书签。

1.七段数码管显示22.键盘扫描显示错误！未定义书签。3.8253计数器和8259中断错误！未定义书签。4.硬件连接4五、程序流程图及程序清单5

1.七段数码管显示62.键盘扫描显示63.定时器设计84.总程序设计错误！未定义书签。六、调试过程及结果19七、设计总结和体会19八、（1）七段数码管显示

（2）键盘扫描显示

7.七段数码管显示子程序框图图

图8.读键输入子程序框图

（3）定时器设计

图9.定时中断服务子程序框图

2．程序代码

CONTROLequ0c003hCOUNT0equ0c000hCOUNT1equ0c001hCOUNT2equ0c002h

md8255equ82h;8255工作方式

PA8255equ8000h;8255PA口输出地址CTL8255equ8003h;8255控制口地址IN_KEYequ08001h;键盘读入口

OUTBITequ08002h;位控制口OUTSEGequ08004h;段控制口

ICW1equ00010011b;单片8259,上升沿中断,要写ICW4ICW2equ00100000b;中断号为20H

ICW4equ00000001b;工作在8086/88方式OCW1equ11111110b;只响应INT0中断CS8259Aequ0d000h;8259地址CS8259Bequ0d001h

datasegmentCNTdb0Hourdb0Minutedb0Seconddb0

LEDBufdb6dup(?);显示缓冲Numdb1dup(?);显示的数据DelayTdb1dup(?)dinglindb6dup(?)

LEDMAP:;八段管显示码

db3fh,06h,5bh,4fh,66h,6dh,7dh,07hdb7fh,6fh,77h,7ch,39h,5eh,79h,71hKeyTable:;键码定义db16h,15h,14h,0ffhdb13h,12h,11h,10hdb0dh,0ch,0bh,0ahdb0eh,03h,06h,09hdb0fh,02h,05h,08hdb00h,01h,04h,07hdataends

codesegment

assumecs:code,ds:data

Delayprocnear

pushax;延时子程序pushcx

moval,0movcx,axloop$

popcxpopaxretDelayendp

DisplayLEDprocnear

movbx,offsetLEDBuf

movcl,6;共6个八段管movah,00100000b;从左边开始显示DLoop:

movdx,OUTBITmoval,0

outdx,al;关所有八段管moval,[bx]

movdx,OUTSEGoutdx,al

movdx,OUTBITmoval,ah

outdx,al;显示一位八段管

pushaxmovah,1callDelaypopax

shrah,1incbxdeccljnzDLoop

movdx,OUTBIT

moval,0

outdx,al;关所有八段管ret

DisplayLEDendp

TestKeyprocnear

movdx,OUTBITmoval,0

outdx,al;输出线置为0movdx,IN_KEY

inal,dx;读入键状态

notal

andal,0fh;高四位不用retTestKeyendp

GetKeyprocnear

movch,00100000bmovcl,6KLoop:

movdx,OUTBIT

moval,ch;找出键所在列notaloutdx,alshrch,1

movdx,IN_KEYinal,dxnotalandal,0fh

jneGoon_;该列有键入deccljnzKLoop

movcl,0ffh;没有键按下,返回0ffhjmpExit1Goon_:

deccl

shlcl,2;键值=列X4+行

movch,4LoopC:

testal,1jnzExit1shral,1inccldecchjnzLoopCExit1:

movdx,OUTBITmoval,0outdx,al

movch,0

movbx,offsetKeyTableaddbx,cx

moval,[bx];取出键码movbl,al

WaitRelease:

movdx,OUTBITmoval,0

outdx,al;等键释放

movah,10callDelaycallTestKeyjneWaitReleasemoval,blretGetKeyendp

IEnterprocnearpushaxpushdx

incSecondmoval,Secondcmpal,60jneExit

movSecond,0incMinutemoval,Minutecmpal,60jneExit

movMinute,0incHourmoval,Hourcmpal,24jneExit

movHour,0Exit:

movdx,CS8259A

moval,20h;中断服务程序终止指令outdx,al

popdxpopaxiretIEnterendp

IInitproc

movdx,CS8259Amoval,ICW1outdx,al

movdx,CS8259Bmoval,ICW2outdx,al

moval,ICW4outdx,al

moval,OCW1outdx,alretIInitendp

Startprocnear

movax,datamovds,ax

movLEDBuf,03fh;显示00.00.00movLEDBuf+1,0bfhmovLEDBuf+2,03fhmovLEDBuf+3,0bfhmovLEDBuf+4,03fh

movLEDBuf+5,03fh

movHour,0movMinute,0movSecond,0

cli

movax,0movds,ax

moval,76h;01110110B;计数器1,16位,方式3,二进制movdx,CONTROLoutdx,al

movax,62500movdx,COUNT1

outdx,al;计数器低字节moval,ah

outdx,al;计数器高字节

moval,MD8255movdx,CTL8255outdx,al

movbx,4*ICW2;中断号

movax,code

shlax,4;x16

addax,offsetIEnter;中断入口地址（段地址为0）mov[bx],ax

movax,0incbxincbx

mov[bx],ax;代码段地址为0

callIInit

movax,datamovds,ax

movCNT,0;计数值初始为0moval,CNTmovdx,PA8255

outdx,alsti

LP:;等待中断，并计数。moval,Hourmovah,0movcl,10divcl

movch,ahmovah,0

movbx,offsetLEDMAPaddbx,axmoval,[bx]movLEDBuf,al

movbx,offsetLEDMAPmoval,chmovah,0addbx,axmoval,[bx]oral,80h

movLEDBuf+1,al

moval,Minutemovah,0movcl,10divcl

movch,ahmovah,0

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+2,al

movbx,offsetLEDMAPmoval,chmovah,0addbx,axmoval,[bx]oral,80h

movLEDBuf+3,al

moval,Second

movah,0movcl,10divcl

movch,ahmovah,0

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+4,al

movbx,offsetLEDMAPmoval,chmovah,0addbx,axmoval,[bx]oral,80h

movLEDBuf+5,alcallDisplayLEDD0:

callDisplayLED;显示callTestKey;有键入?

jeLP;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码movah,0

movdinglin[0],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]movLEDBuf,al

D1:callDisplayLED;显示callTestKey;有键入?

jeD1;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码movah,0

movdinglin[1],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+1,al

D2:callDisplayLED;显示callTestKey;有键入?

jeD2;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码movah,0

movdinglin[2],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+2,al

D3:callDisplayLED;显示callTestKey;有键入?

jeD3;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码movah,0

movdinglin[3],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+3,alcallDisplayLED

D4:callDisplayLED;显示callTestKey;有键入?

jeD4;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码movah,0

movdinglin[4],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+4,alcallDisplayLED

D5:callDisplayLED;显示callTestKey;有键入?

jeD5;无键入,继续显示callGetKey;读入键码andal,0fh;显示键码

movah,0

movdinglin[5],al

movbx,offsetLEDMAPaddbx,axmoval,[bx]

movLEDBuf+5,alcallDisplayLED

moval,dinglin[0]movcl,10dmulcl

movbl,dinglin[1]addal,blmovHour,alcmpHour,24jlL0

movHour,0

L0:moval,dinglin[2]movcl,10dmulcl

movbl,dinglin[3]addal,bl

movMinute,alcmpMinute,60jlL1

movMinute,0

L1:moval,dinglin[4]movcl,10dmulcl

movbl,dinglin[5]addal,bl

movSecond,alcmpSecond,60jlL2

movSecond,0

L2:jmpD0Startendpcode