利用單片機(jī)及ds1302制作電子時(shí)鐘-資料下載頁(yè)
2025-06-17 15:09本頁(yè)面
【正文】 期：20061103。修 改： 日 期：。*******************************Set1302: CLR T_RST CLR T_CLK SETB T_RST MOV B, 8EH ?？刂萍拇嫫? LCALL RTInputByte MOV B, 00H 。寫操作前WP=0 LCALL RTInputByte SETB T_CLK CLR T_RST MOV R0, Second MOV R7, 7 。秒分時(shí)日月星期年 MOV R2, 80H 。秒寫地址Set13021: CLR T_RST CLR T_CLK SETB T_RST MOV B,R2。寫分時(shí)日月星期年地址 LCALL RTInputByte MOV A, @R0 。寫秒數(shù)據(jù) MOV B, A LCALL RTInputByte INC R0 INC R2 INC R2 SETB T_CLK CLR T_RST DJNZ R7, Set13021 CLR T_RST CLR T_CLK SETB T_RST MOV B,8EH。控制寄存器 LCALL RTInputByte MOV B,80H ?？刂?WP=1,寫保護(hù) LCALL RTInputByte SETB T_CLK CLR T_RST RET。*******************************。子程序名：Get1302。功 能：從DS1302 讀時(shí)間。說(shuō) 明：。調(diào) 用：RTInputByte,RTOutputByte。入口參數(shù)： 時(shí)間保存在:。Second,Minute,Hour,Day,Month,。返 回 值：無(wú)。影響資源：A B R0 R2 R4 R7。******************************Get1302: PUSH ACC PUSH PSW 。 SETB 。 SETB MOV R0, Second。 41H MOV R7, 7 MOV R2, 81H 。秒地址 Get1: CLR T_RST CLR T_CLK SETB T_RST MOV B,R2 。秒分時(shí)日月星期年地址 LCALL RTInputByte NOP LCALL RTOutputByte MOV @R0,A 。秒 INC R0 INC R2 INC R2 SETB T_CLK CLR T_RST LCALL DISPLAY DJNZ R7,Get1 。 CLR 。 CLR POP PSW POP ACC RETGet13021: PUSH ACC PUSH PSW 。 SETB 。 SETB MOV R0, Second。 MOV R7, 7 MOV R2, 81H 。秒地址 Get2: CLR T_RST CLR T_CLK SETB T_RST MOV B,R2。秒分時(shí)日月星期年地址 LCALL RTInputByte NOP LCALL RTOutputByte MOV @R0,A 。秒 INC R0 INC R2 INC R2 SETB T_CLK CLR T_RST LCALL DISPLAY DJNZ R7,Get2 。 CLR 。 CLR POP PSW POP ACC RET。寫1302一字節(jié) （內(nèi)部子程序）。*******************************RTInputByte: MOV R4, 8Inbit1: MOV A, B RRC A MOV B, A MOV T_IO, C SETB T_CLK CLR T_CLK DJNZ R4, Inbit1 RET。*******************************。讀1302一字節(jié) （內(nèi)部子程序）。*******************************RTOutputByte: MOV R4,8Outbit1: MOV C,T_IO RRC A SETB T_CLK CLR T_CLK DJNZ R4, Outbit1 RET END附錄Ⅲ：原理圖
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1