93C46的读写实验程序_51单片机

93C46的读写实验程序

点击数：7640 次录入时间：03-04 11:48:48 整理：http://www.55dianzi.com 51单片机

NOP
MOV C,ACC.3
MOV DI,C
SETB SK
NOP
CLR SK
NOP
MOV C,ACC.2
MOV DI,C
SETB SK
NOP
CLR SK
NOP
MOV C,ACC.1
MOV DI,C
SETB SK
NOP
CLR SK
NOP
MOV C,ACC.0
MOV DI,C
SETB SK
NOP
CLR SK
NOP
RD_DAT: ;读出一个字节的数据
SETB SK
NOP
MOV C,DO
MOV ACC.7,C
CLR SK
NOP

SETB SK
NOP
MOV C,DO
MOV ACC.6,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.5,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.4,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.3,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.2,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.1,C
CLR SK
NOP
SETB SK
NOP
MOV C,DO
MOV ACC.0,C
CLR SK
NOP

MOV RDM,A ;保存读出的数据到 RDM(22H)
CLR CS ;93C46 进入休眠,降低功耗
RET

;---------------------------------------------------------------------------
;-----------------------------------------------------
;-----------擦除所有单元子程序--------------------------
;-----------------------------------------------------
EARASE:
       SETB CS   ;启动93C46
       NOP
       LCALL HIGH46
       LCALL LOW46
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       SETB DI
       SETB SK
       NOP
       CLR SK
       NOP
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       CLR DI
       SETB SK
       NOP
       CLR SK
       NOP
       SETB DI
       SETB SK
       NOP
       CLR SK
       NOP
       LCALL DL2MS ;调用延时,等待DO空闲!!!
       LCALL DL2MS
       LCALL DL2MS

LLL:   CLR CS ;93C46 进入休眠,降低功耗
       RET
;----------------------------------------------------------------------
       END