最佳答案

是用51自身做計(jì)時(shí)嗎？？ 用中斷計(jì)時(shí)會(huì)好一些吧 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;系統(tǒng)名稱: 數(shù)字鐘 ;創(chuàng)健人:濟(jì)南, 日期:2005.6.19 ;系統(tǒng)功能描述: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;修改人: 修改日期: ;修改原因: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;蕊片型號(hào):AT89C51 晶振:12MHZ ;-------------硬件連接--------------------- ; ; ;----------------------------------------------- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱: 聲明區(qū) ;功能描述: 聲明各常量和變量 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; SECOND EQU 30H ;存儲(chǔ)妙 MINITE EQU 31H ;存儲(chǔ)分 HOUR EQU 32H ;存儲(chǔ)時(shí) SPEAKER BIT P3.7 HOURK BIT P3.2 ;時(shí)鍵 MINITEK BIT P3.3 ;分鍵 SECONDK BIT P3.0 ;妙鍵 FLAG BIT 00H FLAG1S BIT 01H ;1S到標(biāo)志位. DISPBUF EQU 40H ; 段選標(biāo)志 DISPBIT EQU 48H ; 位選通標(biāo)志 T2SCNTA EQU 49H ; 中斷次數(shù) T2SCNTB EQU 4AH ; 中斷次數(shù) TEMP EQU 4BH ; 初始化位 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:主程序 ;功能描述; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ORG 00H LJMP START ORG 0BH LJMP INT_T0 ;T0中斷入口 START: MOV SECOND,#00H ;妙初始化0 MOV MINITE,#00H ;分初始化0 MOV HOUR,#12 ;時(shí)始化送12 MOV DISPBIT,#00H ;位選通標(biāo)志 MOV T2SCNTA,#00H ;標(biāo)志 MOV T2SCNTB,#00H ;標(biāo)志 CLR FLAG CLR FLAG1S SETB SPEAKER MOV TEMP,#07FH ;初始位,讓第一個(gè)位選通 LCALL DISP ;調(diào)用顯示處理程序 MOV TMOD,#01H ;方式1 MOV TH0,#0F8H ;賦值20MS MOV TL0,#030H SETB TR0 ;開中斷啟動(dòng) SETB ET0 SETB EA ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:按鍵程序 ;功能描述;調(diào)整分,時(shí) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; WT: JNB FLAG,CC LCALL SPEAKING CC: JB SECONDK,NK1 ;妙末按下,轉(zhuǎn)去判斷分鍵 LCALL DELY10MS ;按下,延時(shí),消抖動(dòng) JB SECONDK,NK1 ;再次判斷是否按下? INC SECOND ;按下,按下一次加1 MOV A,SECOND ;送A判斷 CJNE A,#60,NS60 ;妙末到60轉(zhuǎn)分 MOV SECOND,#00H ;到了,回0 NS60: LCALL DISP JNB SECONDK,$ ;等待妙鍵釋放 NK1: JB MINITEK,NK2 ;跟妙鍵分析相似 LCALL DELY10MS JB MINITEK,NK2 INC MINITE MOV A,MINITE CJNE A,#60,NM60 MOV MINITE,#00H NM60: LCALL DISP JNB MINITEK,$ NK2: JB HOURK,NK3 ;時(shí)鍵 LCALL DELY10MS JB HOURK,NK3 INC HOUR MOV A,HOUR CJNE A,#24,NH24 MOV HOUR,#00H NH24: LCALL DISP JNB HOURK,$ ;等待時(shí)鍵釋放 NK3: LJMP WT ;返回 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:顯示處理程序 ;功能描述;,該程序?qū)崿F(xiàn)時(shí),分,秒計(jì)時(shí)轉(zhuǎn)換為BCD碼并存儲(chǔ)在以47H起始地址的顯示 ;輸出數(shù)據(jù)存儲(chǔ)單元里,即顯示緩沖區(qū)47H至40H單元 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DISP: MOV A,#DISPBUF ;送40H ADD A,#7 ;加8 ;DEC A MOV R1,A ;送47H MOV A,HOUR ;送時(shí) MOV B,#10 DIV AB MOV @R1,A ;存儲(chǔ)時(shí)十位 DEC R1 ;指向時(shí)個(gè)位 MOV A,B ;送時(shí)個(gè)位 MOV @R1,A ;存儲(chǔ)時(shí)個(gè)位 DEC R1 MOV A,#10 MOV @R1,A DEC R1 MOV A,MINITE ; 送分,處理與時(shí)處理類似 MOV B,#10 DIV AB MOV @R1,A DEC R1 MOV A,B MOV @R1,A DEC R1 MOV A,#10 MOV @R1,A DEC R1 MOV A,SECOND ;送秒 MOV B,#10 DIV AB MOV @R1,A DEC R1 MOV A,B MOV @R1,A DEC R1 RET ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:顯示程序 ;功能描述;在LED上顯示為12-12-12顯示模式. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; INT_T0: MOV TH0,#0F8H ;重賦值 MOV TL0,#030H MOV A,#DISPBUF ;段偏移存儲(chǔ) ADD A,DISPBIT ;位偏移量 MOV R0,A ;段偏移存儲(chǔ) MOV A,@R0 ;段偏移量 MOV DPTR,#TABLE ;指向字形表 MOVC A,@A+DPTR ;取字形 MOV P0,#0 ;防閃爍 MOV P0,A ; 字形選P1口顯示 MOV A,DISPBIT ;位移偏量 MOV DPTR,#TAB ;指向位選 MOVC A,@A+DPTR ;取位選通 MOV P2,A ;位送P3口選通 INC DISPBIT ;位偏移加1 MOV A,DISPBIT ;位偏移送A CJNE A,#08H,KNA ;八個(gè)數(shù)管碼掃描完不? MOV DISPBIT,#00H ;描完重新開始 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:1秒計(jì)時(shí)程序 ;功能描述; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; KNA: INC T2SCNTA MOV A,T2SCNTA CJNE A,#100,DONE MOV T2SCNTA,#00H INC T2SCNTB MOV A,T2SCNTB CJNE A,#05H,DONE SETB FLAG1S MOV T2SCNTB,#00H INC SECOND ;秒加1 MOV A,SECOND CJNE A,#50,BB ;50S到. MOV A,MINITE CJNE A,#59,BB ;59分 SETB FLAG ;打開正點(diǎn)響標(biāo)志. BB: MOV A,SECOND CJNE A,#60,NEXT ;秒超過60了沒有? 沒有,調(diào)用顯示處理程序 MOV SECOND,#00H INC MINITE ;分加1 MOV A,MINITE CJNE A,#60,NEXT MOV MINITE,#00H ;分超過60,清0 INC HOUR ;并時(shí)加1 MOV A,HOUR CJNE A,#24,NEXT ;是否超過24小時(shí)?不是,則跳至NEXT MOV HOUR,#00H NEXT: LCALL DISP ; 調(diào)用顯示處理程序 DONE: RETI ;中斷返回 TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,40H ;0到9字形(40表示橫扛) TAB: DB 07FH,0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:正點(diǎn)報(bào)時(shí)子程序 ;功能描述; 前十秒報(bào)第一聲,每隔一秒報(bào)一聲. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; SPEAKING:MOV R5,#6 AA: CLR SPEAKER JNB FLAG1S,$ ;延時(shí)1S. CLR FLAG1S SETB SPEAKER JNB FLAG1S,$ CLR FLAG1S DJNZ R5,AA CLR FLAG RET ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;程序名稱:延時(shí)子程序 ;功能描述;按鍵消抖調(diào)用. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DELY10MS:MOV R6,#10 D1: MOV R7,#248 DJNZ R7,$ DJNZ R6,D1 RET

回答者：ryergwer2016-07-02 00:00