|
SH7040 Datasheet, PDF (755/923 Pages) Renesas Technology Corp – Renesas 32-Bit Single-Chip RISC Microprocessor SuperH RISC engine Family/SH7040 Series(CPU Core SH-2) | |||
|
◁ |
MOV.L
#OK,R7
; R7 <- OK (return value)
BRA
FlashErase_end
; Verify OK
NOP
;
BlockVerify_NG .EQU
$
ADD.L
#1,R9
; Verify NG, n <- n + 1
MOV.L
#Wait5u,R3
AND.B
#EVCLEAR,@(R0,GBR)
; Clear EV
EWait_9 SUBC
R2,R3
; Wait 5 µs
BF
EWait_9
MOV.L
#MAXErase,R7
; If n > MAXErase then erase NG
CMP/EQ R7,R9
BF
EraseLoop
MOV.L
#NG,R7
; R7 <- NG (return value)
FlashErase_end .EQU
$
MOV.L
#FLMCR1,R0
AND.B
#SWECLEAR,@(R0,GBR) ; Clear SWE
;
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â00008000,Hâ00000200
EB2
.DATA.L Hâ00010000,Hâ00000400
EB3
.DATA.L Hâ00018000,Hâ00000800
EB4
.DATA.L Hâ00020000,Hâ00000001
EB5
.DATA.L Hâ00028000,Hâ00000002
EB6
.DATA.L Hâ00030000,Hâ00000004
EB7
.DATA.L Hâ00038000,Hâ00000008
EB8
.DATA.L Hâ0003F000,Hâ00000010
EB9
.DATA.L Hâ0003F400,Hâ00000020
EB10 .DATA.L Hâ0003F800,Hâ00000040
EB11 .DATA.L Hâ0003FC00,Hâ00000080
Dummy .DATA.L Hâ00040000
717
|
▷ |