?? 倚天版的6位數(shù)字鐘。.htm
字號:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0039)http://www.8951.com/test/test/clock.htm -->
<HTML><HEAD><TITLE>單片機(jī)數(shù)碼管顯示</TITLE><LINK href="倚天版的6位數(shù)字鐘。.files/gpszx.css"
type=text/css rel=stylesheet><LINK href="../index.files/gpszx.css" type=text/css
rel=stylesheet>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2900.2523" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId></HEAD>
<BODY>
<DIV align=center>
<CENTER>
<TABLE height=356 cellSpacing=0 cellPadding=0 width=769 bgColor=#66ccff
borderColorLight=#000000 border=0>
<TBODY>
<TR>
<TD align=middle width=752 bgColor=#ffffff colSpan=5 height=356><FONT
font><FONT color=#ff0000>單片機(jī)提高</FONT><FONT color=#ff0000><IMG height=11
src="倚天版的6位數(shù)字鐘。.files/gif091.gif" width=28 border=0></FONT><FONT
color=#454545>WWW.51C51.COM
自學(xué)單片機(jī)的網(wǎng)站：作中國單片機(jī)編程技術(shù)普及推廣第一站！倚天一出寶刀屠龍</FONT></FONT><IMG height=100
src="倚天版的6位數(shù)字鐘。.files/titou2.jpg" width=760 border=0> <FONT color=#454545
font><A href="http://www.8951.com/index.htm">返回主頁 給我留言</A> <A
href="http://www.8951.com/jiaoxue.htm">單片機(jī)教學(xué)</A> <A
href="http://www.8951.com/tigao.htm">單片機(jī)提高</A> <A
href="http://www.8951.com/pinzhi.htm">品質(zhì)技術(shù)</A> 單片機(jī)網(wǎng)址 <A
href="http://www.8951.com/down/down.htm">軟件下載</A> <A
href="http://www.8951.com/yejin/yejin.htm">學(xué)液晶顯示</A> <A
href="http://www.8951.com/chanpin.htm">產(chǎn)品介紹</A> <A
href="http://www.8951.com/10/huikan.htm">如何購買</A></FONT>
<CENTER></CENTER>
<P
align=left>;倚天版的6位數(shù)字鐘。<BR>;***************************************************************************<BR>;*
(程序轉(zhuǎn)載請著明出處 ，未聲明可適應(yīng)本站騰龍/isp開發(fā)套件/倚天版開發(fā)套件
*<BR>;* E-mail:sxj1974@163.com (51c51 test web)
51單片機(jī)學(xué)習(xí)網(wǎng)，自學(xué)單片機(jī)的網(wǎng)站
*<BR>;* Create by :石學(xué)軍 <A
href="http://www.51c51.com/">http://www.51c51.com/</A>
www.8951.com
更多例程請登陸網(wǎng)站
*<BR>;***************************************************************************<BR>org
00h<BR>;顯示緩沖單元在70H—75H，70H—71H顯示秒，72H—73H顯示分，74H—75H顯示時<BR><BR>;時間計(jì)數(shù)單元在70H—71H（秒）、76H—77H（分）、78H—79H（時），7AH單元放熄滅符（#0AH）<BR><BR>;計(jì)數(shù)單元采用BCD碼計(jì)數(shù)，定時器T0設(shè)置為50MS溢出中斷，為秒計(jì)數(shù)用，定時器T1為調(diào)整時閃爍用<BR><BR>;P3.2為調(diào)整按鈕，P1口為字符輸出口，采用共陽顯示管。<BR><BR><BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
中斷入口程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>ORG
0000H<BR><BR>LJMP START<BR><BR>ORG 0003H<BR><BR>RETI<BR><BR>ORG
000BH<BR><BR>LJMP INTT0<BR><BR>ORG 0013H<BR><BR>RETI<BR><BR>ORG
001BH<BR><BR>LJMP INTT1<BR><BR>ORG 0023H<BR><BR>RETI<BR><BR>ORG
002BH<BR><BR>RETI<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
主 程 序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>START:
MOV R0, #70H<BR><BR>MOV R7, #0BH<BR><BR>MOV 20H, #00H<BR><BR>CLEARDISP:
MOV @R0, #00H<BR><BR>INC R0<BR><BR>DJNZ R7,CLEARDISP<BR><BR>MOV
7AH,#0AH<BR><BR>MOV TMOD,#11H<BR><BR>MOV TL0, #0B0H<BR><BR>MOV TH0,
#3CH<BR><BR>MOV TL1, #0B0H<BR><BR>MOV TH1, #3CH<BR><BR>SETB EA<BR><BR>SETB
ET0<BR><BR>SETB TR0<BR><BR>MOV R4,#14H<BR><BR>start1: LCALL
DISPLAY<BR><BR>JNB P3.2,SETMM1<BR><BR>SJMP Start1<BR><BR>SETMM1: LJMP
SETMM<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
1秒定時程 序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>INTT0:
PUSH ACC<BR><BR>PUSH PSW<BR><BR>CLR ET0<BR><BR>CLR TR0<BR><BR>MOV A,#0B7H
;中斷同步修正<BR><BR>ADD A,TL0<BR><BR>MOV TL0,A<BR><BR>MOV A,#3CH<BR><BR>ADD
A,TH0<BR><BR>MOV TH0,A<BR><BR>SETB TR0<BR><BR>DJNZ R4, OUTT0<BR><BR>ADDSS:
MOV R4,#14H<BR><BR>MOV R0,#71H<BR><BR>ACALL ADD1 ;加1程序<BR><BR>MOV
A,R3<BR><BR>CLR C<BR><BR>CJNE A,#60H,ADDMM<BR><BR>ADDMM: JC
OUTT0<BR><BR>ACALL CLR0<BR><BR>MOV R0,#77H<BR><BR>ACALL ADD1<BR><BR>MOV
A,R3<BR><BR>CLR C<BR><BR>CJNE A,#60H,ADDHH<BR><BR>ADDHH: JC
OUTT0<BR><BR>ACALL CLR0<BR><BR>MOV R0,#79H<BR><BR>ACALL ADD1<BR><BR>MOV
A,R3<BR><BR>CLR C<BR><BR>CJNE A,#24H,HOUR<BR><BR>HOUR: JC
OUTT0<BR><BR>ACALL CLR0<BR><BR>OUTT0: MOV 72H,76H<BR><BR>MOV
73H,77H<BR><BR>MOV 74H,78H<BR><BR>MOV 75H,79H<BR><BR>POP PSW<BR><BR>POP
ACC<BR><BR>SETB
ET0<BR><BR>RETI<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
閃動調(diào)時程 序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>INTT1:
PUSH ACC<BR><BR>PUSH PSW<BR><BR>MOV TL1, #0B0H<BR><BR>MOV TH1,
#3CH<BR><BR>DJNZ R2,INTT1OUT<BR><BR>MOV R2,#06H<BR><BR>CPL 02H<BR><BR>JB
02H,FLASH1<BR><BR>MOV 72H,76H<BR><BR>MOV 73H,77H<BR><BR>MOV
74H,78H<BR><BR>MOV 75H,79H<BR><BR>INTT1OUT: POP PSW<BR><BR>POP
ACC<BR><BR>RETI<BR><BR>FLASH1: JB 01H,FLASH2<BR><BR>MOV 72H,7AH<BR><BR>MOV
73H,7AH<BR><BR>MOV 74H,78H<BR><BR>MOV 75H,79H<BR><BR>AJMP
INTT1OUT<BR><BR>FLASH2: MOV 72H,76H<BR><BR>MOV 73H,77H<BR><BR>MOV
74H,7AH<BR><BR>MOV 75H,7AH<BR><BR>AJMP
INTT1OUT<BR><BR>;<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
加1程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>ADD1:
MOV A,@R0<BR><BR>DEC R0<BR><BR>SWAP A<BR><BR>ORL A,@R0<BR><BR>ADD
A,#01H<BR><BR>DA A<BR><BR>MOV R3,A<BR><BR>ANL A,#0FH<BR><BR>MOV
@R0,A<BR><BR>MOV A,R3<BR><BR>INC R0<BR><BR>SWAP A<BR><BR>ANL
A,#0FH<BR><BR>MOV
@R0,A<BR><BR>RET<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
清零程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>CLR0:
CLR A<BR><BR>MOV @R0,A<BR><BR>DEC R0<BR><BR>MOV
@R0,A<BR><BR>RET<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
時鐘調(diào)整程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>SETMM:
cLR ET0<BR><BR>CLR TR0<BR><BR>LCALL DL1S<BR><BR>JB
P3.2,CLOSEDIS <BR><BR>MOV R2,#06H<BR><BR>SETB ET1<BR><BR>SETB
TR1<BR><BR>SET2: JNB P3.2,SET1<BR><BR>SETB 00H<BR><BR>SET4: JB
P3.2,SET3<BR><BR>LCALL DL05S<BR><BR>JNB P3.2,SETHH<BR><BR>MOV R0,#77H
;加1分程序<BR><BR>LCALL ADD1<BR><BR>MOV A,R3<BR><BR>CLR C<BR><BR>CJNE
A,#60H,HHH<BR><BR>HHH: JC SET4<BR><BR>LCALL CLR0<BR><BR>CLR C<BR><BR>AJMP
SET4<BR><BR>CLOSEDIS: SETB ET0<BR><BR>SETB TR0<BR><BR>CLOSE: JB
P3.2,CLOSE<BR><BR>LCALL DISPLAY<BR><BR>JB P3.2,CLOSE<BR><BR>WAITH: JNB
P3.2,WAITH<BR><BR>LJMP START1<BR><BR>SETHH: CLR 00H<BR><BR>SETHH1: JNB
P3.2,SET5<BR><BR>SETB 01H<BR><BR>SET6: JB P3.2,SET7<BR><BR>LCALL
DL05S<BR><BR>JNB P3.2,SETOUT<BR><BR>MOV R0,#79H<BR><BR>LCALL
ADD1<BR><BR>MOV A,R3<BR><BR>CLR C<BR><BR>CJNE A,#24H,HOUU<BR><BR>HOUU: JC
SET6<BR><BR>LCALL CLR0<BR><BR>AJMP SET6<BR><BR>SETOUT: JNB
P3.2,SETOUT1<BR><BR>LCALL DISPLAY<BR><BR>JNB P3.2,SETOUT<BR><BR>CLR
01H<BR><BR>CLR 00H<BR><BR>CLR 02H<BR><BR>CLR TR1<BR><BR>CLR
ET1<BR><BR>SETB TR0<BR><BR>SETB ET0<BR><BR>LJMP START1<BR><BR>SET1: LCALL
DISPLAY<BR><BR>AJMP SET2<BR><BR>SET3: LCALL DISPLAY<BR><BR>AJMP
SET4<BR><BR>SET5: LCALL DISPLAY<BR><BR>AJMP SETHH1<BR><BR>SET7: LCALL
DISPLAY<BR><BR>AJMP SET6<BR><BR>SETOUT1: LCALL DISPLAY<BR><BR>AJMP
SETOUT<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
顯示程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>DISPLAY:
MOV R1,#70H<BR><BR>MOV R5,#0BFH<BR><BR>PLAY: MOV A,R5<BR><BR>MOV
P2,A<BR><BR>MOV A,@R1<BR><BR><BR><BR>MOV DPTR,#TAB<BR><BR>MOVC
A,@A+DPTR<BR><BR>MOV P0,A<BR><BR>LCALL DL1MS<BR><BR>INC R1<BR><BR>MOV
A,R5<BR><BR>JNB ACC.1,ENDOUT<BR><BR>RR A<BR><BR>MOV R5,A<BR><BR>AJMP
PLAY<BR><BR>ENDOUT: SETB P2.1<BR><BR>MOV P0,#0FFH<BR><BR>RET<BR><BR>TAB:
DB
28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h<BR><BR>;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;;
延時程序
;;<BR><BR>;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<BR><BR>;<BR><BR>DL1MS:
MOV R6,#14H<BR><BR>DL1: MOV R7,#19H<BR><BR>DL2: DJNZ R7,DL2<BR><BR>DJNZ
R6,DL1<BR><BR>RET<BR><BR>;<BR><BR>DS20MS: ACALL DISPLAY<BR><BR>ACALL
DISPLAY<BR><BR>ACALL DISPLAY<BR><BR>RET<BR><BR>DL1S: LCALL
DL05S<BR><BR>LCALL DL05S<BR><BR>RET<BR><BR>DL05S: MOV
R3,#20H<BR><BR>DL05S1: LCALL DISPLAY<BR><BR>DJNZ
R3,DL05S1<BR><BR>RET<BR><BR>END<BR><BR><BR><BR><BR></P></TD></TR></TBODY></TABLE></DIV></CENTER></BODY></HTML>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -