SH7018 Datasheet, PDF (367/431 Pages) Renesas Technology Corp – SuperH™ RISC engine

EWait_9
SUBC
R2,R3
; Wait 4 µs
BF
EWait_9
;
MOV.L
#MAXErase,R7
; If N > 100, erase error
CMP/EQ R7,R9
BF
EraseLoop
MOV.L
#NG,R7
; Move NG (return value) to R7
FlashErase_end
.EQU
$
MOV.L
#FLMCR1,R0
AND.B
#SWECLEAR,@(R0,GBR)
; Clear SWE
MOV.L
#Ewait_f,R3
Ewait_10
SUBC
R2,R3
; Wait 100 µs
BF
Ewait_10
;
RTS
NOP
;
;Memory block table
Memory block start address: EBR value
.ALIGN
4
Flash_BlockData
.EQU
$
EB0
.DATA.L H’00000000,H’00000100
EB1
.DATA.L H’00001000,H’00000200
EB2
.DATA.L H’00002000,H’00000400
EB3
.DATA.L H’00003000,H’00000800
EB4
.DATA.L H’00004000,H’00001000
EB5
.DATA.L H’00005000,H’00002000
EB6
.DATA.L H’00006000,H’00004000
EB7
.DATA.L H’00007000,H’00008000
EB8
.DATA.L H’00008000,H’00000001
EB9
.DATA.L H’00010000,H’00000002
EB10
.DATA.L H’00020000,H’00000004
Dummy
.DATA.L H’00028000
351