X5045的汇编读写程序

X5045读写子程序
;**************extern EEPROM constdefine******
WRENEQU 06H ;X5045 WRITE ENABLE
;WRDIEQU 04H ;X5045 write disable
RDSREQU 05H ;Read x5045 status register
WRSREQU 01H ;Write x5045 status register
READEQU 03H ;Read data from x5045 instruction
WRITE EQU 02H ;Write data to x5045 instruction
STATUSEQU 30H ;STATUS REGISTER INIT
;*********************************************************
;***********读数据子程序********************
；数据最终在以R0间址的缓冲区中
RDX5_DAT: CLR A
RDX5_DAT0:MOV R7,#08H；8bit
RDX5_DAT1:CLR C
SETB SCK
NOP
NOP
NOP
NOP
NOP
CLR SCK ;产生下降边沿
NOP
NOP
NOP
NOP
NOP
MOV C,SDO ；读出数据
RLC A ;SO->Cy->ACC.0
DJNZ R7,RDX5_DAT1
MOV @R0,A ;数据暂存在缓冲区
INC R0
CLR ACC
DJNZ R1,RDX5_DAT0 ；未完继续
CLR SCK
RET
;********写数据子程序*******************
;********数据长度在 R1，数据在RO指向的地址中
WRITE_CD: CLR A
CLR C
WRITE_CD0:MOV A,@R0
MOV R7,#08H
WRITE_CD1:CLR SCK
RLC A
MOV SDI,C
CPL SCK ;SCK FOR 1 DATA IS valideation
CLR C
DJNZ R7,WRITE_CD1
INC R0;NEXT BYTE
DJNZ R1,WRITE_CD0
CLR SDI
RET
；**************读状态寄存器子程序
READ_STATUS:CLR A
CLR C
CLR CS
MOV A,#RDSR;Read status register instruction
MOV R7,#08H ;
READ_ST1: CLR SCK
RLC A ;FRIST FOR MSB BIT
MOV SDI,C
SETB SCK ;Make the rising edge of clock
CLR C
DJNZ R7,READ_ST1
MOV R7,#08H
READ_ST2: CLR C
SETB SCK ;DATA FROM X5045 TO CPU by the fulling edge
NOP
NOP
NOP
NOP
NOP
CPL SCK
NOP
NOP
NOP
NOP
NOP
MOV C,SDO
RLC A ;SO->Cy->ACC.0
DJNZ R7,READ_ST2
MOV 30H,A ;DATA SAVE TO "X5045" BUFFER
CLR SCK
SETB CS
RET

另外，如果不用X5045的看门狗的时候，请把它给禁止掉。
;**************STATUS REGISTER INIT*****
ST_INIT:LCALL READ_STATUS
MOV A,30H
JB ACC.0,$-5 ;X5045 IS BUSY THEN TURN CONTIUE TO READ
MOV R0,#30H
MOV @R0,#WRSR ;WRITE STATUS REGISTER INSTRUCTION
MOV R1,#01H
CLR CS;X5045 CHIP IS SELECTED
LCALL WRITE_CD
MOV R0,#30H
MOV @R0,#STATUS
MOV R1,#01H
LCALL WRITE_CD;WRITE DATA TO X5045
SETB CS
RET