x25650.hpl

schematic interface orange for eeprom programming

; Orange programmer module v2.0
; (c) 2000 Alex Plusov
; CHIP=x25650(8Kx8), x25128(16Kx8) SPI Xicor


;Status Register:    7   6   5   4   3   2   1   0
;                  WPEN  X   X   X  BL1 BL0 WEL WIP
;					    r/o r/o

SOCKET=4

PINO=SCK,0
PINO=SI,1
PINO=CS,2
PINO=WP,3
PINO=HOLD,4
PINI=SO,1

CDELAY=1 ; one set delay 

R9=STATUS,B

[READ]
HOLD=1
WP=0
CS=1
SCK=0

CS=0
CONST=00000011b     ;Read
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
LOOP=ADR(15,0){SI=I,SCK=1,SCK=0}
SI=1
LOOP=DATA(7,0){SCK=1,I=SO,SCK=0}
CS=1
P=10

[WRITEINIT]
HOLD=1
WP=1
CS=1
SCK=0
CS=0
CONST=00000110b   ; Write enable
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
SI=1,CS=1
P=20
CS=0,SI=0
CONST=00000001b   ;WRSR 
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
CONST=00000000b      ;Status Register
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
SI=1,CS=1
P=5000

[WRITE]
HOLD=1
WP=1
SCK=0

CS=0,SI=0
CONST=00000110b   ; Write enable
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
SI=1,CS=1
P=20
CS=0,SI=0
CONST=00000010b   ; Write
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
LOOP=ADR(15,0){SI=I,SCK=1,SCK=0}
LOOP=DATA(7,0){SI=I,SCK=1,SCK=0}
SI=1,CS=1
P=5000

[ReadStatus]
HOLD=1
WP=1
SCK=0
CS=1
CS=0
CONST=00000101b
LOOP=CONST(7,0){SI=I,SCK=1,SCK=0}
SI=1
LOOP=(7,0){SCK=1,R9[I]=SO,SCK=0}
CS=1
P=10