DISPBUFEQU50H;50H,51H,52H,53H是顯示緩沖區(qū)
　　LED1EQUP2.0;位數(shù)碼管的位控制
　　LED2EQUP2.1;第二位數(shù)碼管的位控制
　　LED3EQUP2.2;第三位數(shù)碼管的位控制
　　LED4EQUP2.3;第四位數(shù)碼管的位控制
　　LED5EQUP2.4
　　LED6EQUP2.5
　　LED7EQUP2.6
　　LED8EQUP2.7
　　;==============================================================
　　org0000h
　　LJMPMAIN
　　ORG0003H
　　RETI
　　ORG000BH
　　RETI
　　ORG0013H
　　RETI
　　ORG001BH
　　RETI
　　ORG0023H
　　RETI
　　MAIN:
　　MOVR0,#50H
　　MOV65H,#2
　　MOV64H,#3
　　MOV63H,#5
　　MOV62H,#9
　　MOV61H,#5
　　MOV60H,#9
　　MOV59H,#1
　　MOV58H,#2
　　ACALLOUT
　　LOOP1:ACALLDISP;調(diào)用顯示程序
　　JNBP3.2,K1
　　JNBP3.3,K2
　　ACALLTIME
　　AJMPLOOP1
　　K1:LJMPCLEAR
　　K2:LJMPPAUSE
　　TIME:
　　MOVR0,#59H;指向毫秒計(jì)時(shí)單元
　　ACALLADD1;調(diào)用加1程序（加1毫秒操作）
　　MOVA,R3;毫秒數(shù)據(jù)放入A（R3為2位十進(jìn)制數(shù)組合）
　　CLRC;清進(jìn)位標(biāo)志
　　CJNEA,#60H,ADDS
　　ADDS:JCOUT;小于60毫秒時(shí)中斷退出
　　ACALLCLR0;大于或等于60毫秒時(shí)對秒計(jì)時(shí)單元清0
　　MOVR0,#61H;指向秒計(jì)時(shí)單元
　　ACALLADD1;調(diào)用加1程序（加1秒操作）
　　MOVA,R3;秒數(shù)據(jù)放入A（R3為2位十進(jìn)制數(shù)組合）
　　CLRC;清進(jìn)位標(biāo)志
　　CJNEA,#60H,ADDM
　　ADDM:JCOUT;小于60秒時(shí)中斷退出
　　ACALLCLR0;大于或等于60秒時(shí)對秒計(jì)時(shí)單元清0
　　MOVR0,#63H;指向分計(jì)時(shí)單元
　　ACALLADD1;分計(jì)時(shí)單元加1分鐘
　　MOVA,R3;分?jǐn)?shù)據(jù)放入A
　　CLRC;清進(jìn)位標(biāo)志
　　CJNEA,#60H,ADDH
　　ADDH:JCOUT;小于60分時(shí)中斷退出
　　ACALLCLR0;大于或等于60分時(shí)分計(jì)時(shí)單元清0
　　MOVR0,#65H;指向小時(shí)計(jì)時(shí)單元
　　ACALLADD1;小時(shí)計(jì)時(shí)單元加1小時(shí)
　　MOVA,R3;時(shí)數(shù)據(jù)放入A
　　CLRC;清進(jìn)位標(biāo)志
　　CJNEA,#24H,HOUR
　　HOUR:JCOUT;小于24小時(shí)中斷退出
　　ACALLCLR0;大于或等于24小時(shí)計(jì)時(shí)單元清零
　　OUT:
　　MOVDISPBUF,65H
　　MOVDISPBUF+1,64H
　　MOVDISPBUF+2,63H
　　MOVDISPBUF+3,62H
　　MOVDISPBUF+4,61H
　　MOVDISPBUF+5,60H
　　MOVDISPBUF+6,59H
　　MOVDISPBUF+7,58H
　　RETI
　　;======================================================================
　　;清零程序
　　;======================================================================
　　CLR0:
　　CLRA;清累加器
　　MOV@R0,A;清當(dāng)前地址單元
　　DECR0;指向前一地址
　　MOV@R0,A;前一地址單元清零
　　RET
　　;======================================================================
　　;加1子程序
　　;======================================================================
　　ADD1:
　　MOVA,@R0;取當(dāng)前計(jì)時(shí)單元數(shù)據(jù)到A
　　DECR0;指向前一地址
　　SWAPA;A中數(shù)據(jù)高四位與低四位交換
　　ORLA,@R0;前一地址中數(shù)據(jù)放入A中低四位
　　ADDA,#01H;A加1操作
　　DAA;十進(jìn)制調(diào)整
　　MOVR3,A;移入R3寄存器
　　ANLA,#0FH;高四位變0
　　MOV@R0,A;放回前一地址單元
　　MOVA,R3;取回R3中暫存數(shù)據(jù)
　　INCR0;指向當(dāng)前地址單元
　　SWAPA;A中數(shù)據(jù)高四位與低四位交換
　　ANLA,#0FH;高四位變0
　　MOV@R0,A;數(shù)據(jù)放入當(dāng)前地址單元中
　　RET
　　;======================================================================
　　;顯示程序
　　;======================================================================
　　DISP:
　　;-----------------------------------------------------------
　　MOVA,DISPBUF;取個(gè)待顯示數(shù)
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA;
　　MOVP0,A;將字形碼送P0位（段口）
　　CLRLED1;開位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED1;關(guān)閉位顯示器（開始準(zhǔn)備第二位的數(shù)據(jù)）
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+1;取顯示緩沖區(qū)的第二位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR
　　CPLA;
　　MOVP0,A;將第二個(gè)字形碼送P0口
　　CLRLED2;開第二位顯示器
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED2;關(guān)第二位顯示
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+2;取顯示緩沖區(qū)的第三位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA;
　　MOVP0,A;將第三個(gè)字形碼送P0位（段口）
　　CLRLED3;開第三位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED3;關(guān)閉第三位顯示器
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+3;取顯示緩沖區(qū)的第四位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA;
　　MOVP0,A;將第四個(gè)字形碼送P0位（段口）
　　CLRLED4;開第四位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED4;關(guān)閉第四位顯示器
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+4;取顯示緩沖區(qū)的第五位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA
　　MOVP0,A;將第五個(gè)字形碼送P0位（段口）
　　CLRLED5;開第五位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED5;關(guān)閉第五位顯示器
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+5;取顯示緩沖區(qū)的第六位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA
　　MOVP0,A;將第六個(gè)字形碼送P0位（段口）
　　CLRLED6;開第六位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED6;關(guān)閉第六位顯示器
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+6;取顯示緩沖區(qū)的第七位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA
　　MOVP0,A;將第七個(gè)字形碼送P0位（段口）
　　CLRLED7;開第七位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED7;關(guān)閉第七位顯示器
　　;-----------------------------------------------------------
　　MOVA,DISPBUF+7;取顯示緩沖區(qū)的第八位
　　MOVDPTR,#DISPTAB
　　MOVCA,@A+DPTR;取字形碼
　　CPLA
　　MOVP0,A;將第八個(gè)字形碼送P0位（段口）
　　CLRLED8;開第八位顯示器位口
　　LCALLDELAY;延時(shí)5毫秒
　　SETBLED8;關(guān)閉第八位顯示器
　　;-----------------------------------------------------------
　　RET
　　PAUSE:
　　ACALLDISP
　　JNBP3.2,K3
　　AJMPPAUSE
　　K3:acallCLEAR
　　CLEAR:
　　MOV58H,#0
　　MOV59H,#0
　　MOV60H,#0
　　MOV61H,#0
　　MOV62H,#0
　　MOV63H,#0
　　MOV64H,#0
　　MOV65H,#0
　　LJMPLOOP1
　　RETI
　　;======================================================================
　　;延時(shí)程序
　　;======================================================================
　　DELAY:
　　MOVR6,#20H;延時(shí)約5mS
　　D1:MOVR7,#10H
　　D2:DJNZR7,D2
　　DJNZR6,D1
　　RET