ht48f06edemo.asm

对合泰单片机的内部EEPROGRAM读写的例程

#pragma debug scope 1 1
#line 32 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
__pcc EQU [017H]
__pc EQU [016H]
__pbc EQU [015H]
__pb EQU [014H]
__pac EQU [013H]
__pa EQU [012H]
__tmrc EQU [0eH]
__tmr EQU [0dH]
__intc EQU [0bH]
__status EQU [0aH]
__wdts EQU [09H]
__tblh EQU [08H]
__tblp EQU [07H]
__pcl EQU [06H]
__acc EQU [05H]
__bp EQU [04H]
__mp1 EQU [03H]
__iar1 EQU [02H]
__mp0 EQU [01H]
__iar0 EQU [00H]
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 2 1 ; 35 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 35 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,01h
MOV __bp,A
#line 36 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,040h
MOV __mp1,A
#line 38 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _EWEN
#line 40 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _ERAL
#line 41 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 41 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L5
L2:
#pragma debug scope 3 2 ; 43 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 43 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,0ffh
SZ [0ah].2
JMP L6
#line 44 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L6:
L3:
#line 41 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 41 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INC CR1
L5:
#line 41 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L2
#line 47 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _ERAL
#line 48 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,055h
MOV WRAL0,A
CALL _WRAL
#line 49 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 49 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L12
L9:
#pragma debug scope 4 2 ; 51 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 51 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,055h
SZ [0ah].2
JMP L13
#line 52 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L13:
L10:
#line 49 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 49 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INC CR1
L12:
#line 49 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L9
#line 55 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _ERAL
#line 56 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,0aah
MOV WRAL0,A
CALL _WRAL
#line 57 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 57 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L18
L15:
#pragma debug scope 5 2 ; 59 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 59 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,0aah
SZ [0ah].2
JMP L19
#line 60 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L19:
L16:
#line 57 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 57 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INC CR1
L18:
#line 57 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L15
#line 63 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 63 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L24
L21:
#pragma debug scope 6 2 ; 65 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 65 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV WRITE0,A
MOV A,055h
MOV WRITE1,A
CALL _WRITE
#line 66 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INCA CR1
MOV b0_1,A
MOV A,b0_1
MOV WRITE0,A
MOV A,0aah
MOV WRITE1,A
CALL _WRITE
L22:
#line 63 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 63 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,02h
ADDM A,CR1
L24:
#line 63 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L21
#line 69 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 69 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L28
L25:
#pragma debug scope 7 2 ; 71 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 71 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,055h
SZ [0ah].2
JMP L29
#line 72 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L29:
#line 73 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INCA CR1
MOV b0_1,A
MOV A,b0_1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,0aah
SZ [0ah].2
JMP L31
#line 74 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L31:
L26:
#line 69 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 69 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,02h
ADDM A,CR1
L28:
#line 69 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L25
#line 77 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 77 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L36
L33:
#pragma debug scope 8 2 ; 79 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 79 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV b0_1,A
MOV A,b0_1
MOV WRITE0,A
MOV A,b0_1
MOV WRITE1,A
CALL _WRITE
L34:
#line 77 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 77 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INC CR1
L36:
#line 77 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L33
#line 82 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CLR CR1
#line 82 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L40
L37:
#pragma debug scope 9 2 ; 84 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#line 84 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
MOV READ0,A
CALL _READ
MOV b0_1,A
MOV A,b0_1
XOR A,CR1
SZ [0ah].2
JMP L41
#line 85 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L8
L41:
L38:
#line 82 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
#pragma debug scope 2 1 ; 82 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
INC CR1
L40:
#line 82 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
MOV A,CR1
SUB A,080h
SNZ [0ah].0
JMP L37
L43:
#line 90 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _EWDS
L44:
L45:
#line 91 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L44
L8:
#line 95 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
CALL _EWDS
L47:
L48:
#line 96 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP L47
L1:
#line 97 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
JMP $
LOCAL b0_1 DB ?
#line 33 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
LOCAL CR1 DB ? ; EEADDR
#pragma debug variable 2 CR1 EEADDR
_main ENDP
EXTERN WRITE1:BYTE
EXTERN WRITE0:BYTE
EXTERN WRAL0:BYTE
EXTERN READ0:BYTE
EXTERN _WRAL:NEAR
EXTERN _ERAL:NEAR
EXTERN _EWDS:NEAR
EXTERN _EWEN:NEAR
EXTERN _WRITE:NEAR
EXTERN _READ:NEAR
#line 31 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
STARTSEC .SECTION 'CODE'
STARTUP:
RET
#line 31 "D:\HRH_WORK2008\WORK\HT46F47E E2PROGRAM\DATASHEET\48F EEPROGRAM(C语言)\HA0123\HT48F06EDEMO.C"
@CODE .SECTION AT 0 'CODE'
JMP begin
@DUMMY PROC
CALL _main
@DUMMY ENDP