e93lc56.asm

HT48F MCU系列2K位EEPROM Data Memory的读写 - 使用C语言

#pragma debug scope 1 1
#line 30 "D:\tt\E93LC56.C"
@READ .SECTION 'CODE'
PUBLIC _READ
_READ PROC
#pragma debug scope 2 1
#line 29 "D:\tt\E93LC56.C"
PUBLIC READ0
LOCAL READ0 DB ? ; EEADDR
#pragma debug variable 2 READ0 EEADDR
#pragma debug scope 2 1 ; 33 "D:\tt\E93LC56.C"
#line 33 "D:\tt\E93LC56.C"
SET [02H].4
#line 35 "D:\tt\E93LC56.C"
MOV A,0c0h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 36 "D:\tt\E93LC56.C"
MOV A,READ0
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 37 "D:\tt\E93LC56.C"
MOV A,00h
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
MOV CR1,A
#line 39 "D:\tt\E93LC56.C"
CLR [02H].4
#line 41 "D:\tt\E93LC56.C"
MOV A,CR1
L1:
RET
LOCAL b0_1 DB ?
#line 31 "D:\tt\E93LC56.C"
LOCAL CR1 DB ? ; EEDATA
#pragma debug variable 2 CR1 EEDATA
_READ ENDP
#line 49 "D:\tt\E93LC56.C"
@ERASE .SECTION 'CODE'
PUBLIC _ERASE
_ERASE PROC
#pragma debug scope 3 1
#line 48 "D:\tt\E93LC56.C"
PUBLIC ERASE0
LOCAL ERASE0 DB ? ; EEADDR
#pragma debug variable 3 ERASE0 EEADDR
#pragma debug scope 3 1 ; 50 "D:\tt\E93LC56.C"
#line 50 "D:\tt\E93LC56.C"
SET [02H].4
#line 52 "D:\tt\E93LC56.C"
MOV A,0e0h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 53 "D:\tt\E93LC56.C"
MOV A,ERASE0
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 55 "D:\tt\E93LC56.C"
CLR [02H].4
#line 57 "D:\tt\E93LC56.C"
CALL _ChkBusy
L2:
RET
LOCAL b0_2 DB ?
_ERASE ENDP
#line 65 "D:\tt\E93LC56.C"
@WRITE .SECTION 'CODE'
PUBLIC _WRITE
_WRITE PROC
#pragma debug scope 4 1
#line 64 "D:\tt\E93LC56.C"
PUBLIC WRITE0
LOCAL WRITE0 DB ? ; EEADDR
#pragma debug variable 4 WRITE0 EEADDR
#line 64 "D:\tt\E93LC56.C"
PUBLIC WRITE1
LOCAL WRITE1 DB ? ; EEDATA
#pragma debug variable 4 WRITE1 EEDATA
#pragma debug scope 4 1 ; 66 "D:\tt\E93LC56.C"
#line 66 "D:\tt\E93LC56.C"
SET [02H].4
#line 68 "D:\tt\E93LC56.C"
MOV A,0a0h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 69 "D:\tt\E93LC56.C"
MOV A,WRITE0
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 70 "D:\tt\E93LC56.C"
MOV A,WRITE1
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 72 "D:\tt\E93LC56.C"
CLR [02H].4
#line 74 "D:\tt\E93LC56.C"
CALL _ChkBusy
L3:
RET
LOCAL b0_3 DB ?
_WRITE ENDP
#line 82 "D:\tt\E93LC56.C"
@EWEN .SECTION 'CODE'
PUBLIC _EWEN
_EWEN PROC
#pragma debug scope 5 1 ; 83 "D:\tt\E93LC56.C"
#line 83 "D:\tt\E93LC56.C"
SET [02H].4
#line 85 "D:\tt\E93LC56.C"
MOV A,090h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 86 "D:\tt\E93LC56.C"
MOV A,080h
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 88 "D:\tt\E93LC56.C"
CLR [02H].4
L4:
RET
LOCAL b0_4 DB ?
_EWEN ENDP
#line 96 "D:\tt\E93LC56.C"
@EWDS .SECTION 'CODE'
PUBLIC _EWDS
_EWDS PROC
#pragma debug scope 6 1 ; 97 "D:\tt\E93LC56.C"
#line 97 "D:\tt\E93LC56.C"
SET [02H].4
#line 99 "D:\tt\E93LC56.C"
MOV A,080h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 100 "D:\tt\E93LC56.C"
MOV A,00h
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 102 "D:\tt\E93LC56.C"
CLR [02H].4
L5:
RET
LOCAL b0_5 DB ?
_EWDS ENDP
#line 110 "D:\tt\E93LC56.C"
@ERAL .SECTION 'CODE'
PUBLIC _ERAL
_ERAL PROC
#pragma debug scope 7 1 ; 111 "D:\tt\E93LC56.C"
#line 111 "D:\tt\E93LC56.C"
SET [02H].4
#line 113 "D:\tt\E93LC56.C"
MOV A,090h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 114 "D:\tt\E93LC56.C"
MOV A,00h
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 116 "D:\tt\E93LC56.C"
CLR [02H].4
#line 118 "D:\tt\E93LC56.C"
CALL _ChkBusy
L6:
RET
LOCAL b0_6 DB ?
_ERAL ENDP
#line 126 "D:\tt\E93LC56.C"
@WRAL .SECTION 'CODE'
PUBLIC _WRAL
_WRAL PROC
#pragma debug scope 8 1
#line 125 "D:\tt\E93LC56.C"
PUBLIC WRAL0
LOCAL WRAL0 DB ? ; EEDATA
#pragma debug variable 8 WRAL0 EEDATA
#pragma debug scope 8 1 ; 127 "D:\tt\E93LC56.C"
#line 127 "D:\tt\E93LC56.C"
SET [02H].4
#line 129 "D:\tt\E93LC56.C"
MOV A,080h
MOV Shift0,A
MOV A,04h
MOV Shift1,A
CALL _Shift
#line 130 "D:\tt\E93LC56.C"
MOV A,080h
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 131 "D:\tt\E93LC56.C"
MOV A,WRAL0
MOV Shift0,A
MOV A,08h
MOV Shift1,A
CALL _Shift
#line 133 "D:\tt\E93LC56.C"
CLR [02H].4
#line 135 "D:\tt\E93LC56.C"
CALL _ChkBusy
L7:
RET
LOCAL b0_7 DB ?
_WRAL ENDP
#line 143 "D:\tt\E93LC56.C"
@Shift .SECTION 'CODE'
PUBLIC _Shift
_Shift PROC
#pragma debug scope 9 1
#line 142 "D:\tt\E93LC56.C"
PUBLIC Shift0
LOCAL Shift0 DB ? ; buf
#pragma debug variable 9 Shift0 buf
#line 142 "D:\tt\E93LC56.C"
PUBLIC Shift1
LOCAL Shift1 DB ? ; cnt
#pragma debug variable 9 Shift1 cnt
L9:
#pragma debug scope 9 1 ; 146 "D:\tt\E93LC56.C"
#pragma debug scope 10 9 ; 146 "D:\tt\E93LC56.C"
#line 146 "D:\tt\E93LC56.C"
SNZ Shift0.7
JMP L12
#line 147 "D:\tt\E93LC56.C"
SET [02H].6
#line 147 "D:\tt\E93LC56.C"
JMP L13
L12:
#line 149 "D:\tt\E93LC56.C"
CLR [02H].6
L13:
#line 151 "D:\tt\E93LC56.C"
SET [02H].5
#line 153 "D:\tt\E93LC56.C"
RL Shift0
#line 154 "D:\tt\E93LC56.C"
SNZ [02H].7
JMP L14
#line 155 "D:\tt\E93LC56.C"
SET Shift0.0
#line 155 "D:\tt\E93LC56.C"
JMP L15
L14:
#line 157 "D:\tt\E93LC56.C"
CLR Shift0.0
L15:
#line 159 "D:\tt\E93LC56.C"
CLR [02H].5
L10:
#line 161 "D:\tt\E93LC56.C"
#pragma debug scope 9 1 ; 161 "D:\tt\E93LC56.C"
DECA Shift1
MOV b0_8,A
MOV A,b0_8
MOV Shift1,A
SZ b0_8
JMP L9
#line 163 "D:\tt\E93LC56.C"
MOV A,Shift0
L8:
RET
LOCAL b0_8 DB ?
_Shift ENDP
#line 171 "D:\tt\E93LC56.C"
@ChkBusy .SECTION 'CODE'
PUBLIC _ChkBusy
_ChkBusy PROC
#pragma debug scope 11 1 ; 172 "D:\tt\E93LC56.C"
#line 172 "D:\tt\E93LC56.C"
SET [02H].4
#line 172 "D:\tt\E93LC56.C"
JMP L18
L17:
#pragma debug scope 12 11 ; 176 "D:\tt\E93LC56.C"
#line 176 "D:\tt\E93LC56.C"
NOP
#line 177 "D:\tt\E93LC56.C"
NOP
#line 178 "D:\tt\E93LC56.C"
SET [02H].5
#line 179 "D:\tt\E93LC56.C"
NOP
#line 180 "D:\tt\E93LC56.C"
SNZ [02H].7
JMP L20
#line 181 "D:\tt\E93LC56.C"
JMP L19
L20:
#line 183 "D:\tt\E93LC56.C"
NOP
#line 184 "D:\tt\E93LC56.C"
CLR [02H].5
L18:
#line 174 "D:\tt\E93LC56.C"
#pragma debug scope 11 1 ; 174 "D:\tt\E93LC56.C"
JMP L17
L19:
#line 187 "D:\tt\E93LC56.C"
CLR [02H].5
#line 188 "D:\tt\E93LC56.C"
CLR [02H].4
L16:
RET
_ChkBusy ENDP