AT89C2051时钟程序

1、.;WP2F:p2 g7m4D_;c1785; AT89C2051时钟程序 ;电子爱好者社区yo%R*Ci bWW;v3E:J;电子爱好者社区2b/Xq/g-j3k; 定时器T0、T1溢出周期为50MS，T0为秒计数用， T1为调整时闪烁用，电子爱好者社区c#m0o.Y)D g; P3.7为调整按钮，P1口 为字符输出口，采用共阳显示管。电子爱好者社区i d z4l_+r; ;:ixO,dx)n:1785; 中断入口程序 ;电子爱好者社区 h3g%xZ8vy;&Da fB1785;电子爱好者社区tT!e*I z6v99qlORG 0000H ;程序执行开始地址3K!g2?O%QI)y1785L

2、JMP START ;跳到标号START执行电子爱好者社区X;c| P 8_ORG 0003H ;外中断0中断程序入口电子爱好者社区3i;lC(j%iJ2ReRETI ;外中断0中断返回:z+|(jbrjHG1785ORG 000BH ;定时器T0中断程序入口电子爱好者社区4PDw qPAiuHLJMP INTT0 ;跳至INTTO执行1&sSJ+ F1785ORG 0013H ;外中断1中断程序入口;Wgz8ZhKXfaW1785RETI ;外中断1中断返回d&GsnlzX1785ORG 001BH ;定时器T1中断程序入口(a V/c7Gb%Z1785LJMP INTT1 ;跳至INTT1

3、执行BIg0;gNEW1785ORG 0023H ;串行中断程序入口地址vW$o :R1785RETI ;串行中断程序返回&Ytp+doN$d1785;电子爱好者社区H,U)US&Jz k)E Z:j;x1FBr2Q;f1785; 主 程 序 ;电子爱好者社区U 4O*T8q;电子爱好者社区h/UhOj:ylP;电子爱好者社区gk_ e2:9Q4drSTART: MOV R0,#70H ;清70H-7AH共11个内存单元R9VfGCXr*X| l1785MOV R7,#0BH ;!Vl4z1C,G q4Lh%?1785CLEARDISP: MOV R0,#00H ;电子爱好者社区#KZ,Z s

4、5ncINC R0 ;0QF1CA M+$5bEH1785DJNZ R7,CLEARDISP ;电子爱好者社区k KO ej%IMOV 20H,#00H ;清20H（标志用）!tlT0n C F1785MOV 7AH,#0AH ;放入熄灭符数据(rb aB-$OL+_1785MOV TMOD,#11H ;设T0、T1为16位定时器K(Sr!WN.nD6M1785MOV TL0,#0B0H ;50MS定时初值（T0计时用）4g.Z0x GwV1785MOV TH0,#3CH ;50MS定时初值电子爱好者社区6m1zFr TNAn9dMOV TL1,#0B0H ;50MS定时初值（T1闪烁定时用）

5、JM8nz$U,s4D.r-D$OQ1785MOV TH1,#3CH ;50MS定时初值电子爱好者社区9G6SmK93ol l afSETB EA ;总中断开放电子爱好者社区,l%nM:afqWSETB ET0 ;允许T0中断Js bY(g7vG/o6D1785SETB TR0 ;开启T0定时器J4ue#OopT1785MOV R4,#14H ;1秒定时用初值（50MS20）电子爱好者社区t &wA#u5scwSTART1: LCALL DISPLAY ;调用显示子程序Rq.H4N(s1785JNB P3.7,SETMM1 ;P3.7口为0时转时间调整程序电子爱好者社区|7n.wZ0PQ#f

6、a MSJMP START1 ;P3.7口为1时跳回START1-tqnum1785SETMM1: LJMP SETMM ;转到时间调整程序SETMM电子爱好者社区 .X(M9mt;A)C;电子爱好者社区2i3k| )_V$F;D*ZG*F dd1785; 1秒计时程序 ;电子爱好者社区 5fm b$G_;J boZ hv5p.wuK1785;T0中断服务程序q/clgP E ?1785INTT0: PUSH ACC ;累加器入栈保护电子爱好者社区ugz(_?.uVPUSH PSW ;状态字入栈保护9p5t :E:J1pu(s1785CLR ET0 ;关T0中断允许电子爱好者社区 .D8S0o

7、R%x_CLR TR0 ;关闭定时器T0电子爱好者社区 Thrj MMOV A,#0B7H ;中断响应时间同步修正KH4RR9P1785ADD A,TL0 ;低8位初值修正电子爱好者社区&jU(Kk+H*b8lMOV TL0,A ;重装初值（低8位修正值）;UZ p:o(U1785MOV A,#3CH ;高8位初值修正*Y aB g1x1785ADDC A,TH0 ;电子爱好者社区Xt+L)L,_ CMOV TH0,A ;重装初值（高8位修正值）$?9r67N1785SETB TR0 ;开启定时器T0电子爱好者社区 mqc SDJNZ R4, OUTT0 ;20次中断未到中断退出电子爱好者社区

8、 |0!U |OxADDSS: MOV R4,#14H ;20次中断到（1秒）重赋初值Si+|3xyTeH1785MOV R0,#71H ;指向秒计时单元（71H-72H）Y cjew 1785ACALL ADD1 ;调用加1程序（加1秒操作）cf4p, S1785MOV A,R3 ;秒数据放入A（R3为2位十进制数组合）o3P7K;pC rD3T1785CLR C ;清进位标志电子爱好者社区N_#Cg:ynJS5cCJNE A,#60H,ADDMM ;电子爱好者社区,|8Z#vUw+nADDMM: JC OUTT0 ;小于60秒时中断退出电子爱好者社区-O4ygXI/G tPchACALL

9、CLR0 ;大于或等于60秒时对秒计时单元清09nBox kZ1785MOV R0,#77H ;指向分计时单元（76H-77H）电子爱好者社区 K+QIj5iACALL ADD1 ;分计时单元加1分钟电子爱好者社区 4VTw I;c$d qG&WMOV A,R3 ;分数据放入A电子爱好者社区5k0R0fb9JrCLR C ;清进位标志电子爱好者社区.f P+-dCJNE A,#60H,ADDHH ;?V7e.XjJ?1785ADDHH: JC OUTT0 ;小于60分时中断退出电子爱好者社区1U$n.qIKNACALL CLR0 ;大于或等于60分时分计时单元清0电子爱好者社区.| mc3C6

10、9C5Y$B)tMOV R0,#79H ;指向小时计时单元（78H-79H）电子爱好者社区2k;yV_a3f#ACALL ADD1 ;小时计时单元加1小时Rv36V1I1785MOV A,R3 ;时数据放入A电子爱好者社区us&I)1t_)TCLR C ;清进位标志电子爱好者社区-ig9gDt$PKCJNE A,#24H,HOUR ;0Z6n RFQns6_1785HOUR: JC OUTT0 ;小于24小时中断退出XOq f6q q !u:1785ACALL CLR0 ;大于或等于24小时小时计时单元清0电子爱好者社区 ye1d?#KOUTT0: MOV 72H,76H ;中断退出时将分、时

11、计时单元数据移*nFE!M&SgGv1g1785MOV 73H,77H ;入对应显示单元电子爱好者社区%R7-W_MOV 74H,78H ;电子爱好者社区KU#Y5?FtMOV 75H,79H ;电子爱好者社区 dp:zb,vPOP PSW ;恢复状态字（出栈）电子爱好者社区 o$CQ4Y Q7|f1GPOP ACC ;恢复累加器7r&L%kdWj%Lz1785SETB ET0 ;开放T0中断电子爱好者社区nZ5Po,O3g ?4mbGRETI ;中断返回INTT1: PUSH ACC ;中断现场保护|:VA%y S0PUSH PSW ;2x)nZmsDn&h 0MOV TL1, #0B0H

12、;装定时器T1定时初值X P(F2g ?i&:iy0MOV TH1, #3CH ;电子爱好者社区yL_J C(uDJNZ R2,INTT1OUT ;0.3秒未到退出中断（50MS中断6次）/C%fd+pLp,Z#z0MOV R2,#06H ;重装0.3秒定时用初值aA/e8BAd:J5DK;r0CPL 02H ;0.3秒定时到对闪烁标志取反电子爱好者社区7B1w!H-m8+g8oJB 02H,FLASH1 ;02H位为1时显示单元熄灭4w&Q5p(z_8-D Gk3U0MOV 72H,76H ;02H位为0时正常显示电子爱好者社区,S9_CfNKm )HxMOV 73H,77H ;电子爱好者社

13、区 gFoK(s3AWMOV 74H,78H ;YlO Qtr)y9h08m0MOV 75H,79H ;电子爱好者社区 i.Dt5n$b.xI)Y INTT1OUT: POP PSW ;恢复现场1h;hr IS:GX1U)B0POP ACC ;%J:S(S; F$0RETI ;中断退出Ft6o!Z2Jj&a!p y0FLASH1: JB 01H,FLASH2 ;01H位为1时，转小时熄灭控制电子爱好者社区 jW3G4mA9dMOV 72H,7AH ;01H位为0时，熄灭符数据放入分w!O+hy/bbG4y0a$m0MOV 73H,7AH ;显示单元（72H-73H），将不显示分数据电子爱好者社

14、区wvU7p 9Q|;f!fMOV 74H,78H ; A:S Ngdu(f0MOV 75H,79H ;电子爱好者社区2)$sCa rFAJMP INTT1OUT ;转中断退出B( Q*uu2F*_pr0FLASH2: MOV 72H,76H ;01H位为1时，熄灭符数据放入小时电子爱好者社区%Z-f F4JtMOV 73H,77H ;显示单元（74H-75H），小时数据将不显示电子爱好者社区Hm2F-j&DMOV 74H,7AH ;电子爱好者社区BawGFGFa/ W.MOV 75H,7AH ;电子爱好者社区R*g:YAJMP INTT1OUT ;转中断退出电子爱好者社区 E:p$UgX;电

15、子爱好者社区8A -os D;)q;_|! i6UK0m0; 加1子 程 序 ;电子爱好者社区,xils o-bj;电子爱好者社区UAPvTS !p|A;h-Bl5O$v6R5B0ADD1: MOV A,R0 ;取当前计时单元数据到A电子爱好者社区LM|-QQDEC R0 ;指向前一地址B WW6rO3a i0SWAP A ;A中数据高四位与低四位交换IkDeW0ORL A,R0 ;前一地址中数据放入A中低四位电子爱好者社区cOKVp)_2?vADD A,#01H ;A加1操作9Xzq#0DA A ;十进制调整电子爱好者社区,w6+z2jAmMOV R3,A ;移入R3寄存器电子爱好者社区f/

16、W_ n1e-cKANL A,#0FH ;高四位变0电子爱好者社区,rhud(FujMOV R0,A ;放回前一地址单元电子爱好者社区 ly5Aij:wNgAMOV A,R3 ;取回R3中暂存数据电子爱好者社区;l,k*giL t5S4fSINC R0 ;指向当前地址单元电子爱好者社区l3e4,T6H(Cr:CSWAP A ;A中数据高四位与低四位交换hPwc0T0ANL A,#0FH ;高四位变0电子爱好者社区9|q(h X$irMOV R0,A ;数据放入当削地址单元中Z,RZ:h* cu7rO0RET ;子程序返回电子爱好者社区0Tk O%PN8ZG9n;电子爱好者社区iWHzx;V%E

17、;J;w2Ku:|.J0; 清零程序 ;5nzT.J1aHWZ$0;电子爱好者社区?5c4Ob1xI;对计时单元复零用电子爱好者社区Q4_6c4ZyCLR0: CLR A ;清累加器电子爱好者社区-f3&R*LMOV R0,A ;清当前地址单元%BPlb bh0DEC R0 ;指向前一地址电子爱好者社区_CbQ32K$s:eTMOV R0,A ;前一地址单元清0电子爱好者社区ef n n!L.T9DRET ;子程序返回电子爱好者社区2B auok C;电子爱好者社区XNeP/;wXI,n,Y-Ae0; 时钟调整程序 ;电子爱好者社区EN)OWy8Y4kR;电子爱好者社区$4o8g gE/X;当

18、调时按键按下时进入此程序G?0SETMM: cLR ET0 ;关定时器T0中断电子爱好者社区)GQ9(w%WWCLR TR0 ;关闭定时器T0&rPY4n0LCALL DL1S ;调用1秒延时程序:Crb(XGje0JB P3.7,CLOSEDIS ;键按下时间小于1秒，关闭显示（省电）Sr:b)N6Mb0MOV R2,#06H ;进入调时状态，赋闪烁定时初值A13)aHk!np0SETB ET1 ;允许T1中断电子爱好者社区TXf;c0j!uj,SETB TR1 ;开启定时器T1电子爱好者社区u$Rep3NSET2: JNB P3.7,SET1 ;P3.7口为0（键未释放），等待电子爱好者社

19、区H,C8T(Q6|1iR:P9C/YSETB 00H ;键释放，分调整闪烁标志置14Vjz0Q#n J?Jt0SET4: JB P3.7,SET3 ;等待键按下电子爱好者社区|Ir w.p%vLCALL DL05S ;有键按下，延时0.5秒电子爱好者社区 iR,#i,Z/N%kp _JNB P3.7,SETHH ;按下时间大于0.5秒转调小时状态电子爱好者社区4y S,IO U(Q%iDMOV R0,#77H ;按下时间小于0.5秒加1分钟操作电子爱好者社区/YI)w*i7ZaVLCALL ADD1 ;调用加1子程序电子爱好者社区0no2Xmh,A;Xs)_MOV A,R3 ;取调整单元数据

20、!E)wq!4w:zU5T0CLR C ;清进位标志km:QUJg0CJNE A,#60H,HHH ;调整单元数据与60比较-#I$s*n&N4Yy2lOJ0HHH: JC SET4 ;调整单元数据小于60转SET4循环电子爱好者社区2gjz#O)JLCALL CLR0 ;调整单元数据大于或等于60时清0电子爱好者社区5NAPU7Y2CLR C ;清进位标志 lmm|H0AJMP SET4 ;跳转到SET4循环.b6FSx9w1K0CLOSEDIS: SETB ET0 ;省电（LED不显示）状态。开T0中断电子爱好者社区cN.Pe(WSETB TR0 ;开启T0定时器（开时钟）电子爱好者社区3

21、Ke,b+iCk G8eCLOSE: JB P3.7,CLOSE ;无按键按下，等待。/+/P ?)*r Q0LCALL DISPLAY ;有键按下，调显示子程序延时削抖42FO S4w.a&xp4T0JB P3.7,CLOSE ;是干扰返回CLOSE等待电子爱好者社区W?:A+_WAITH: JNB P3.7,WAITH ;等待键释放电子爱好者社区ri2GTit8x)DA(kLJMP START1 ;返回主程序（LED数据显示亮）电子爱好者社区&z HsZSETHH: CLR 00H ;分闪烁标志清除（进入调小时状态）.sb d|8D?A0SETHH1: JNB P3.7,SET5 ;等待键

22、释放Xo Uv-Gx&w0SETB 01H ;小时调整标志置1电子爱好者社区tF g2D;tS;ISET6: JB P3.7,SET7 ;等待按键按下电子爱好者社区c *N)CPgLCALL DL05S ;有键按下延时0.5秒2Q1ax%iWV5X0JNB P3.7,SETOUT ;按下时间大于0.5秒退出时间调整. eC k90MOV R0,#79H ;按下时间小于0.5秒加1小时操作ENRx i4N3f1eJ nf0LCALL ADD1 ;调加1子程序%r!w*KM0MOV A,R3 ;电子爱好者社区Q$h*RAa3ssXCLR C ;&txwvk:S&L0CJNE A,#24H,HOUU

23、 ;计时单元数据与24比较j*HT%|f0HOUU: JC SET6 ;小于24转SET6循环+ O,hf Nd(6D(Z0LCALL CLR0 ;大于或等于24时清0操作电子爱好者社区1t8r eo7o,F yhb EAJMP SET6 ;跳转到SET6循环$DK)ZP0gsE-u,?0SETOUT: JNB P3.7,SETOUT1 ;调时退出程序。等待键释放mR:qB!C NF0LCALL DISPLAY ;延时削抖?xb?1rxb0JNB P3.7,SETOUT ;是抖动，返回SETOUT再等待电子爱好者社区#a o-RR6TNqCLR 01H ;清调小时标志o#Vk-X)S Hu0C

24、LR 00H ;清调分标志.g,uQ MiA(N,0O0CLR 02H ;清闪烁标志G:z7T1Gx!g0CLR TR1 ;关闭定时器T1&X pe W#0CLR ET1 ;关定时器T1中断电子爱好者社区9edV#ntp)hF V pYSETB TR0 ;开启定时器T0电子爱好者社区a*t_,AwI+u$uPESETB ET0 ;开定时器T0中断（计时开始）电子爱好者社区3ZT R NHHLJMP START1 ;跳回主程序# S-C%VD h0SET1: LCALL DISPLAY ;键释放等待时调用显示程序（调分）AdxG8J0AJMP SET2 ;防止键按下时无时钟显示电子爱好者社区9H

25、*M1U7I C3| goSET3: LCALL DISPLAY ;等待调分按键时时钟显示用电子爱好者社区aX:wXI VAJMP SET4电子爱好者社区 t&J:P8dwSET5: LCALL DISPLAY ;键释放等待时调用显示程序（调小时）电子爱好者社区)IB ?0JAJMP SETHH1 ;防止键按下时无时钟显示Z|,9U *x0SET7: LCALL DISPLAY ;等待调小时按键时时钟显示用电子爱好者社区5w(rf64Em$F CAJMP SET6P6x)uR&Q v,c0SETOUT1: LCALL DISPLAY ;退出时钟调整时键释放等待电子爱好者社区4Y$Ccn Pfv

26、AJMP SETOUT ;防止键按下时无时钟显示v%d H1c3wy:S0;电子爱好者社区,P6X)W Z9G5Q wyW%J y;N&ZK*gu PV%0; 显示程序 ;电子爱好者社区-j4C*vwK;fVs*EKn%Rr X0; 显示数据在70H-75H单元内，用六位LED共阳数码管显示，P1口输出段码数据，P3口作电子爱好者社区r?4kI;D; 扫描控制，每个LED数码管亮1MS时间再逐位循环。rd1t8iJ0DISPLAY: MOV R1,#70H ;指向显示数据首址电子爱好者社区M6v7F *PWMOV R5,#0FEH ;扫描控制字初值/o8V3V%l8e8gyE0PLAY: MO

27、V A,R5 ;扫描字放入A电子爱好者社区wX9UVAtl;BMOV P3,A ;从P3口输出电子爱好者社区/|w,d U(m)g.GMOV A,R1 ;取显示数据到A电子爱好者社区5?Ul$PR.rXMOV DPTR,#TAB ;取段码表地址(Z:A9s9n6|00MOVC A,A+DPTR ;查显示数据对应段码电子爱好者社区$f+f5I$eMOV P1,A ;段码放入P1口ERX/n1|0LCALL DL1MS ;显示1MS电子爱好者社区fV(K+H&J5csINC R1 ;指向下一地址电子爱好者社区._ |rBMOV A,R5 ;扫描控制字放入A电子爱好者社区sV&O,v!UFzJNB ACC.5,ENDOUT ;ACC.5=0时一次显示结束电子爱好者社区J:EwI F paoRL A ;A中数据循环左移电子爱好者社区 oU|V n#D4M%aMOV R5,A ;放回R5内电子爱好者社区n_M)_U*AJMP PLAY ;跳回PLAY循环%(-oQ3Y#X:| |0ENDOUT: SETB P3.5 ;一次显示结束，P3口复位wH1M6