x24c00.hpl

来自「schematic interface orange for eeprom pr」· HPL 代码 · 共 53 行

; Orange programmer module v1.1
; (c) 2000 Gennadi K.
; CHIP=X24C00 Xicor ! (16x8)
; Tested !

SOCKET=1

PINO=SCL,0
PINO=SDA,1
PINO=A0, 3
PINO=A1, 4
PINO=A2, 5
PINI=SDA,1

CDELAY = 4 ; one set delay

[INIT]
A0=0,A1=0,A2=0


[READ]
SDA=1,SCL=1,SDA=0,SCL=0 ;start

CONST=10b
LOOP=CONST(1,0) {SDA=I,SCL=1,SCL=0} ; out 2 control bits

LOOP=ADR(3,0) {SDA=I,SCL=1,SCL=0}    ; out 4 adress bits

CONST=00b
LOOP=CONST(1,0) {SDA=I,SCL=1,SCL=0} ; out 2 dummy bits

LOOP=DATA(7,0){SDA=1,SCL=1,I=SDA,SCL=0} ;read 8 bits

SCL=0,SCL=1,SDA=1                   ;stop


[WRITE]
P=10
SDA=1,SCL=1,SDA=0,SCL=0 ;start

CONST=01b
LOOP=CONST(1,0) {SDA=I,SCL=1,SCL=0} ; out 2 control bits

LOOP=ADR(3,0){SDA=I,SCL=1,SCL=0}   ; out 4 adress bits

CONST=00b
LOOP=CONST(1,0) {SDA=I,SCL=1,SCL=0} ; out 2 dummy bits

LOOP=DATA(7,0){SDA=I,SCL=1,SCL=0}  ; write 8 bits
SCL=0,SCL=1,SDA=1                  ;stop
P=25000