DS1302汇编数码管显示8位.docVIP

/***************************************** 电路P1口接74HC573锁存4位数码管位远，P0接4位数码管段选。P2.5,p2.6,p2.7接DS1302. *****************************************/ ORG 0000H AJMP START ORG 000BH AJMP TIM0 SCLK EQU P2^7 IO EQU P2^6 RST EQU P2^5 ALL_FLAG EQU 31H ;标志位 SEC EQU 32H ;秒 MIN EQU 33H ;分 HOUR EQU 34H ;时 DAY EQU 35H ;日 MON EQU 36H ;月 WEEK EQU 37H ;星期 YEAR EQU 38H ;年 DS_DAT EQU 39H DS_ADD EQU 3AH DS_DATA EQU 3BH S1 EQU r7 ORG 70H START:MOV TMOD , MOV TH0 ,#HIGH(65536-1000);HIGH和LOW写反了会错 MOV TL0 ,#LOW(65536-1000) SETB EA SETB ET0 SETB TR0 LCALL DS_INIT LOOP2: CALL DELAY CALL DELAY CALL DELAY CALL DELAY CALL DELAY CALL DELAY LCALL DS_R_TIME sjmp LOOP2 DELAY: MOV R1,#10 ;1ms延时子程序 D0: MOV R2,#248 DJNZ R2,$ DJNZ R1,D0 RET /***************************************** DS1302写字节函数 *****************************************/ DS_W_BYTE: MOV R0,#08 MOV A,DS_DAT DS_W1: RRC A MOV IO,C NOP SETB SCLK nop CLR SCLK DJNZ R0,DS_W1 RET /***************************************** DS1302读字节函数 *****************************************/ DS_R_BYTE: SETB IO MOV A,#00H MOV R0,#08 DS_R1: MOV C,IO RRC A SETB SCLK NOP CLR SCLK NOP DJNZ R0,DS_R1 MOV DS_DAT,A RET /***************************************** DS1302读数据函数 入口地址存至DS_ADD;读取到的数据存入DS_DAT *****************************************/ DS_R_DAT: CLR RST NOP CLR SCLK NOP SETB RST NOP MOV DS_DAT,DS_ADD LCALL DS_W_BYTE LCALL DS_R_BYTE SETB SCLK CLR RST NOP NOP SETB SCLK NOP NOP CLR IO NOP NOP setb IO