Preliminary W78LE516
Publication Release Date: June 2000
- 29 - Revision A1
MAIN_4K:
MOV CHPENR,#87H ; CHPENR = 87H, CHPCON WRITE ENABLE.
MOV CHPENR,#59H ; CHPENR = 59H, CHPCON WRITE ENABLE.
MOV A,CHPCON
ANL A,#80H
CJNE A,#80H,UPDATE_64K ; CHECK F04KBOOT MODE ?
MOV CHPCON,#03H ; CHPCON = 03H, ENABLE IN-SYSTEM PROGRAMMING.
MOV CHPENR,#00H ; DISABLE CHPCON WRITE ATTRIBUTE
MOV TCON,#00H ; TCON = 00H, TR = 0 TIMER0 STOP
MOV TMOD,#01H ; TMOD = 01H, SET TIMER0 A 16BIT TIMER
MOV IP,#00H ; IP = 00H
MOV IE,#82H ; IE = 82H, TIMER0 INTERRUPT ENABLED
MOV R6,#FEH
MOV R7,#FFH
MOV TL0,R6
MOV TH0,R7
MOV TCON,#10H ; TCON = 10H, TR0 = 1, GO
MOV PCON,#01H ; ENTER IDLE MODE
UPDATE_64K:
MOV CHPENR,#00H ; DISABLE CHPCON WRITE-ATTRIBUTE
MOV TCON,#00H ; TCON = 00H , TR = 0 TIM0 STOP
MOV IP,#00H ; IP = 00H
MOV IE,#82H ; IE = 82H, TIMER0 INTERRUPT ENABLED
MOV TMOD,#01H ; TMOD = 01H, MODE1
MOV R6,#E0H ; SET WAKE-UP TIME FOR ERASE OPERATION, ABOUT 15 mS.
DEPENDING
; ON USER'S SYSTEM CLOCK RATE.
MOV R7,#B1H
MOV TL0,R6
MOV TH0,R7
ERASE_P_4K:
MOV SFRCN,#22H ; SFRCN(C7H) = 22H ERASE 64K
MOV TCON,#10H ; TCON = 10H, TR0 = 1,GO
MOV PCON,#01H ; ENTER IDLE MODE (FOR ERASE OPERATION)
;*********************************************************************
;* BLANK CHECK
;*********************************************************************
MOV SFRCN,#0H ; READ 64KB APROM MODE
MOV SFRAH,#0H ; START ADDRESS = 0H
MOV SFRAL,#0H
MOV R6,#FEH ; SET TIMER FOR READ OPERATION, ABOUT 1.5 µS.
MOV R7,#FFH
MOV TL0,R6
MOV TH0,R7
BLANK_CHECK_LOOP:
SETB TR0 ; ENABLE TIMER 0
MOV PCON,#01H ; ENTER IDLE MODE
