br9080.hpl

schematic interface orange for eeprom programming

; Orange programmer module v3.0
; (c) 2000 Victor Makcimov, Alex Plusov
; CHIP=BR9080 (512x16) Rohm
; Tested !!!

SOCKET=2

PINO=CS,2          ;1
PINO=CLK,0         ;2
PINO=DI,1          ;3
PINO=WC,3          ;6
PINO=RB,4          ;7 input - not used
PINI=DO,1          ;4

CDELAY=5 ; one set delay (2 MHz Max!)

[INIT]
WC=1,RB=1,CS=1,CLK=0

[READ]
CS=0
CONST=1010100B
LOOP=CONST(6,0){DI=I,CLK=1,CLK=0}  	; start+READ opcode

LOOP=(0,8){DI=ADR[I],CLK=1,CLK=0}    	; out adr
DI=1
LOOP=(0,15){CLK=1,DATA[I]=DO,CLK=0}  	; read data word
CS=1

[WRITEINIT]
WC=0 					;enable write
CS=0
CONST=10100011B
LOOP=CONST(7,0){DI=I,CLK=1,CLK=0}  	; EWEN opcode
LOOP=(7,0){CLK=1,CLK=0}  		; empty 
CS=1

[WRITE]
CS=0
CONST=1010010B
LOOP=CONST(6,0){DI=I,CLK=1,CLK=0}    	; start+WRITE opcode

LOOP=(0,8){DI=ADR[I],CLK=1,CLK=0}    	; out adr
LOOP=(0,15){DI=DATA[I],CLK=1,CLK=0}  	; write data word

P=10000					; tE/W 10 ms max
CS=1

[WRITEEND]
CS=0
CONST=10100000B
LOOP=CONST(7,0){DI=I,CLK=1,CLK=0}  	; EWDS opcode
LOOP=(7,0){CLK=1,CLK=0}  		; empty 
CS=1
WC=1