1302asm.asm

DS1302读写程序

	RST	EQU	P1.0
	SCLK	EQU	P1.1
	IO	EQU	P1.2

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	

	PUBLIC		_WriteDate		;入口地址
	WriteDate	SEGMENT	CODE		;程序段
	RSEG		WriteDate		;程序段

_WriteDate:
	CLR	SCLK
	CLR	RST
	NOP
	NOP
	SETB	RST
	NOP
	NOP
	MOV	A,R7
	LCALL	WRITE_BYTE
	MOV	A,R5
	LCALL	WRITE_BYTE
	CLR	SCLK
	CLR	RST
	RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	PUBLIC		_ReadDate
	ReadDate	SEGMENT	CODE
	RSEG		ReadDate

_ReadDate:
	CLR	SCLK
	CLR	RST
	NOP
	NOP
	SETB	RST
	NOP
	NOP
	MOV	A,R7
	LCALL	WRITE_BYTE
	LCALL	READ_BYTE
	CLR	SCLK
	CLR	RST
	MOV	R7,A	
	RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
WRITE_BYTE:
	MOV	R2,#8
W1:	CLR	SCLK
	RRC	A
	MOV	IO,C
	NOP
	NOP
	NOP
	NOP
	SETB	SCLK
	DJNZ	R2,W1	
	RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
READ_BYTE:
	MOV	R2,#8
RE1:	CLR	SCLK
	NOP
	NOP
	NOP
	NOP
	MOV	C,IO
	RRC	A
	SETB	SCLK
	NOP
	NOP
	DJNZ	R2,RE1
	RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	end