AT-C-制電子鐘時鐘源程序

AT89C2051 AT89C2051時鐘程 ;T0、T150MS，T0為秒計數(shù)用，T1;P3.7為調(diào)整按鈕，P1 中斷入口程 ORG0000H START;跳到標號START執(zhí)ORG0003H ;外中斷0中斷程序入口 ;外中斷0中斷返回ORG000BH ;定時器T0中斷程序入口 INTT0;跳至INTTO執(zhí)行ORG0013H ;外中斷1中斷程序入口 ;外中斷1中斷返回ORG001BH ;定時器T1中斷程序入口 INTT1;跳至INTT1執(zhí)行ORG0023H 主程 START:MOVR0,#70H ;清70H-7AH共11個內(nèi)存單元MOVR7,#0BH CLEARDISP:MOV@R0,#00H INCR0 DJNZR7,CLEARDISPMOV ;20H（標志用MOV ;放入"熄滅符" ;T0、T116MOVTL0,#0B0H ;50MS定時初值（T0計時用）MOVTH0,#3CH ;50MS定時初值MOVTL1,#0B0H ;50MS定時初值（T1閃爍定時用）MOVTH1,#3CH ;50MS定時初值SETBEA SETBET0 ;允許T0中斷SETB ;T0MOVR4,#14H ;1秒定時用初值（50MS×20）START1:LCALLDISPLAY P3.7,SETMM1;P3.7口為0時轉(zhuǎn)時間調(diào)整程序SJMPSTART1 ;P3.7口為1時跳回START1 LJMPSETMM; 1秒計時程 ;T0INTT0:PUSHACC PUSHPSW CLRET0 ;關T0中斷允許CLR MOVA,#0B7H ADDA,TL0 ;低8位初值修正MOVTL0,A ;重裝初值（低8位修正值）MOVA,#3CH ;高8位初值修正ADDC MOVTH0,A ;重裝初值（高8位修正值）SETBTR0 ;開啟定時器T0DJNZR4, ;20ADDSS:MOV ;20次中斷到（1秒）重賦初值 ACALLADD1 ;調(diào)用加1程序（加1秒操作）MOVA,R3 ;秒數(shù)據(jù)放入A（R3為2位十進制數(shù)組合） CJNE ADDMM: ;60ACALLCLR0 ;大于或等于60秒時對秒計時單元清0 ACALLADD1 ;分計時單元加1分鐘 CLRC CJNE ADDHH:JC ;小于60分時中斷退出ACALLCLR0 ;大于或等于60分時分計時單元清0 ACALLADD1 ;小時計時單元加1小時MOVA,R3 CLRC CJNEA,#24H,HOUR HOURJC ;24ACALLCLR0 ;大于或等于24小時小時計時單元清0OUTT0:MOV72H,76H MOV73H,77H MOV74H,78H MOV POPACC SETB ;T0 ; 閃動調(diào)時程 ;T1中斷服務程序，用作時間調(diào)整時調(diào)整單元閃爍指示 PUSHACC PUSH MOVTL1,#0B0H ;裝定時器T1定時初值MOVTH1,#3CH DJNZ ;0.3秒未到退出中斷（50MS6次MOVR2,#06H ;重裝0.3秒定時用初值CPL02H ;0.3秒定時到對閃爍標志取反 ;02H位為1時顯示單元"熄滅"MOV72H,76H ;02H位為0時正常顯示MOV73H,77H;MOV74H,78H;MOV75H,79HINTT1OUT:POPPSW;POPACC ; 01H,FLASH2;01H位為1時，轉(zhuǎn)小時熄滅控制MOV72H,7AH ;01H位為0時，"熄滅符"數(shù)據(jù)放入分MOV73H,7AH 73H，MOV74H,78H MOV AJMP MOV72H,76H ;01H位為1時，"熄滅符"數(shù)據(jù)放入小時MOV73H,77H 75H，MOV74H,7AH MOV AJMP 加1子程 ADD1:MOV SWAP ;A ;前一地址中數(shù)據(jù)放入A中低四位 ;A加1操作 ;MOV ;R3 MOV@R0,A;放回前一地址單元MOVA,R3;R3中暫存數(shù)據(jù)INCR0;指向當前地址單元 ;A中數(shù)據(jù)高四位與低四位交換 ;高四位變0 清零程 ;CLR0: ; 時鐘調(diào)整程 ;SETMM:cLR ;關定時器T0中斷 ;關閉定時器T0 ;1 P3.7,CLOSEDIS;鍵按下時間小于1秒，關閉顯示（省電） ;T1 SET2:JNB ， ;鍵釋放，分調(diào)整閃爍標志置1SET4: ; ;0.5JNBP3.7,SETHH;0.5秒轉(zhuǎn)調(diào)小時狀態(tài)MOVR0,#77H;0.51分鐘操作LCALLADD1;1子程序 A,#60H,HHH;60HHH:JC ;調(diào)整單元數(shù)據(jù)小于60轉(zhuǎn)SET4循環(huán) ;調(diào)整單元數(shù)據(jù)大于或等于60時清0 ;SET4CLOSEDIS:SETB ;省電（LED不顯示）狀態(tài)。開T0中斷 ;開啟T0定時器（開時鐘）CLOSE: P3.7,CLOSE; P3.7,CLOSE;是干擾返回CLOSE等待WAITH: P3.7,WAITH; ;返回主程序（LED數(shù)據(jù)顯示亮）SETHH:CLR SETHH1:JNB ;小時調(diào)整標志置1SET6:JB ;0.5 P3.7,SETOUT;按下時間大于0.5秒退出時間調(diào)整 R0,#79H ;按下時間小于0.5秒加1小時操作 ;調(diào)加1子程序 ;計時單元數(shù)據(jù)與24比較HOUU:JC ;小于24轉(zhuǎn)SET6循環(huán) ;大于或等于24時清0操作 ;跳轉(zhuǎn)到SET6循環(huán)SETOUT:JNB P3.7,SETOUT1;調(diào)時退出程序。等待鍵釋放 ;是抖動，返回SETOUT再等待 ;關定時器T1中斷 ;開啟定時器T0 ;開定時器T0中斷（計時開始） SET1:LCALLDISPLAY AJMPSET2 SET3:LCALLDISPLAY AJMPSET4SET5:LCALL ;鍵釋放等待時調(diào)用顯示程序（調(diào)小時AJMP ;SET7:LCALLDISPLAY AJMPSET6SETOUT1:LCALL ;AJMP 顯示程 ;70H-75HLED共陽數(shù)碼管顯示，P1口輸出段碼數(shù)據(jù)，P3;掃描控制，每個LED數(shù)碼管亮1MS時間再逐位循環(huán)。DISPLAY:MOV PLAY:MOV ;掃描字放入A ;P3 ;取顯示數(shù)據(jù)到A DPTR,#TAB;取段碼表地 A,@A+DPTR;查顯示數(shù)據(jù)對應段碼 ;段碼放入P1口 ; ; ACC.5,ENDOUT;ACC.5=0 ;A中數(shù)據(jù)循環(huán)左移 ;放回R5內(nèi) ;跳回PLAY循環(huán)ENDOUT:SETB ;一次顯示結(jié)束，P3口復位 ;P1口復位 ;TAB:DB;共陽段碼 "0""1"