main.asm

HT45R35在触控按键中的应用 - 使用C语言

#pragma debug scope 1 1
#line 64 "E:\HT45R35 with C\Touch Key with C\main.c"
rombank 0 _table
_table .SECTION INPAGE'CODE'
l_table:
MOV [06h],A
_table:
RET A,14
RET A,22
RET A,38
RET A,70
RET A,13
RET A,21
RET A,67
RET A,35
RET A,19
RET A,11
RET A,69
RET A,37
RET A,120
RET A,7
#line 72 "E:\HT45R35 with C\Touch Key with C\main.c"
__rcocr EQU [025H]
__tmrbl EQU [024H]
__tmrbh EQU [023H]
__rcoccr EQU [022H]
__tmral EQU [021H]
__tmrah EQU [020H]
__intc1 EQU [01eH]
__ascr2 EQU [01cH]
__ascr1 EQU [01bH]
__ascr0 EQU [01aH]
__pbc EQU [015H]
__pb EQU [014H]
__pac EQU [013H]
__pa EQU [012H]
__tmrc EQU [0eH]
__tmr EQU [0dH]
__intc0 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]
@delay_ms .SECTION 'CODE'
PUBLIC _delay_ms
_delay_ms PROC
#pragma debug scope 2 1
#line 71 "E:\HT45R35 with C\Touch Key with C\main.c"
PUBLIC delay_ms0
LOCAL delay_ms0 DB 2 DUP (?) ; tmp
#pragma debug variable  10 2 delay_ms0 tmp
#pragma debug scope 2 1 ; 74 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 74 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR CR1
CLR CR1[1]
#line 74 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L5
L2:
#line 75 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0f9H
CALL __DELAYX0
L3:
#line 74 "E:\HT45R35 with C\Touch Key with C\main.c"
INC CR1
SZ [0AH].2
INC CR1[1]
L5:
#line 74 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,delay_ms0[1]
SUB A,CR1[1]
SNZ [0AH].0
JMP L6
SNZ [0AH].2
JMP L2
MOV A,delay_ms0
SUB A,CR1
SNZ [0AH].0
JMP L6
SNZ [0AH].2
JMP L2
L6:
L1:
RET
#line 73 "E:\HT45R35 with C\Touch Key with C\main.c"
LOCAL CR1 DB 2 DUP (?) ; i
#pragma debug variable  10 2 CR1 i
_delay_ms ENDP
#line 82 "E:\HT45R35 with C\Touch Key with C\main.c"
@wait_overflow .SECTION 'CODE'
PUBLIC _wait_overflow
_wait_overflow PROC
#pragma debug scope 3 1 ; 84 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 84 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,017h
MOV CR2,A
MOV A,0fch
MOV CR2[1],A
#line 85 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __rcoccr
#line 86 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,03h
MOV __rcocr,A
#line 87 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR [01EH].4
#line 88 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,CR2
MOV __tmrbl,A
#line 89 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,CR2[1]
MOV b0_2,A
CLR b0_2[1]
MOV A,b0_2
MOV __tmrbh,A
#line 90 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __tmral
#line 91 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __tmrah
#line 92 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,010h
MOV __rcoccr,A
#line 92 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L9
L8:
#line 95 "E:\HT45R35 with C\Touch Key with C\main.c"
NOP
L9:
#line 94 "E:\HT45R35 with C\Touch Key with C\main.c"
SNZ [01EH].4
JMP L8
#line 96 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR [01EH].4
L7:
RET
LOCAL b0_2 DB 2 DUP(?)
#line 83 "E:\HT45R35 with C\Touch Key with C\main.c"
LOCAL CR2 DB 2 DUP (?) ; count
#pragma debug variable  10 3 CR2 count
_wait_overflow ENDP
#line 103 "E:\HT45R35 with C\Touch Key with C\main.c"
@first_time_setup .SECTION 'CODE'
PUBLIC _first_time_setup
_first_time_setup PROC
#pragma debug scope 4 1 ; 104 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 104 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
CLR [02H]
#line 104 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L15
L12:
#pragma debug scope 5 4 ; 106 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 106 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
MOV A,[02H]
MOV b0_3,A
SZ b0_3
JMP L30
JMP L18
L30:
MOV A,b0_3
XOR A,01h
SZ [0ah].2
JMP L19
MOV A,b0_3
XOR A,02h
SZ [0ah].2
JMP L20
MOV A,b0_3
XOR A,03h
SZ [0ah].2
JMP L21
MOV A,b0_3
XOR A,04h
SZ [0ah].2
JMP L22
MOV A,b0_3
XOR A,05h
SZ [0ah].2
JMP L23
MOV A,b0_3
XOR A,06h
SZ [0ah].2
JMP L24
MOV A,b0_3
XOR A,07h
SZ [0ah].2
JMP L25
MOV A,b0_3
XOR A,08h
SZ [0ah].2
JMP L26
MOV A,b0_3
XOR A,09h
SZ [0ah].2
JMP L27
MOV A,b0_3
XOR A,0ah
SZ [0ah].2
JMP L28
MOV A,b0_3
XOR A,0bh
SZ [0ah].2
JMP L29
#line 106 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L16
L18:
#pragma debug scope 6 5 ; 109 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 109 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0feh
MOV __ascr0,A
#line 110 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 111 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L19:
#line 113 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0fdh
MOV __ascr0,A
#line 114 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 115 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L20:
#line 117 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0fbh
MOV __ascr0,A
#line 118 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 119 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L21:
#line 121 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0f7h
MOV __ascr0,A
#line 122 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 123 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L22:
#line 125 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0efh
MOV __ascr0,A
#line 126 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 127 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L23:
#line 129 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0dfh
MOV __ascr0,A
#line 130 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 131 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L24:
#line 133 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0bfh
MOV __ascr0,A
#line 134 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 135 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L25:
#line 137 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,07fh
MOV __ascr0,A
#line 138 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr1
#line 139 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L26:
#line 141 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr0
#line 142 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0feh
MOV __ascr1,A
#line 143 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L27:
#line 145 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr0
#line 146 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0fdh
MOV __ascr1,A
#line 147 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L28:
#line 149 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr0
#line 150 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0fbh
MOV __ascr1,A
#line 151 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L17
L29:
#line 153 "E:\HT45R35 with C\Touch Key with C\main.c"
SET __ascr0
#line 154 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0f7h
MOV __ascr1,A
L16:
L17:
#line 157 "E:\HT45R35 with C\Touch Key with C\main.c"
#pragma debug scope 5 4 ; 157 "E:\HT45R35 with C\Touch Key with C\main.c"
CALL _wait_overflow
#line 158 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
MOV A,[02H]
MOV b0_3,A
CLR [0AH].0
RLC b0_3
MOV A,b0_3
ADD A,OFFSET _base
MOV b0_3,A
MOV A,BANK _base
MOV b0_3[1],A
MOV A,__tmrah
MOV b1_3,A
CLR b1_3[1]
MOV A,b0_3[1]
MOV [04H],A
MOV A,b0_3
MOV [03H],A
MOV A,b1_3
MOV [02H],A
INC [03H]
MOV A,b1_3[1]
MOV [02H],A
#line 159 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
MOV A,[02H]
MOV b0_3,A
CLR [0AH].0
RLC b0_3
MOV A,b0_3
ADD A,OFFSET _base
MOV b0_3,A
MOV A,BANK _base
MOV b0_3[1],A
MOV A,b0_3[1]
MOV [04H],A
MOV A,b0_3
MOV [03H],A
MOV A,[02H]
MOV b1_3,A
INC [03H]
MOV A,[02H]
MOV b1_3[1],A
MOV A,b1_3
MOV b1_3[1],A
CLR b1_3
MOV A,b0_3[1]
MOV [04H],A
MOV A,b0_3
MOV [03H],A
MOV A,b1_3
MOV [02H],A
INC [03H]
MOV A,b1_3[1]
MOV [02H],A
#line 160 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
MOV A,[02H]
MOV b0_3,A
CLR [0AH].0
RLC b0_3
MOV A,b0_3
ADD A,OFFSET _base
MOV b0_3,A
MOV A,BANK _base
MOV b0_3[1],A
MOV A,b0_3[1]
MOV [04H],A
MOV A,b0_3
MOV [03H],A
MOV A,[02H]
MOV b1_3,A
INC [03H]
MOV A,[02H]
MOV b1_3[1],A
MOV A,__tmral
MOV b2_3,A
CLR b2_3[1]
MOV A,b2_3
ADD A,b1_3
MOV b1_3,A
MOV A,b2_3[1]
ADC A,b1_3[1]
MOV b1_3[1],A
MOV A,b0_3[1]
MOV [04H],A
MOV A,b0_3
MOV [03H],A
MOV A,b1_3
MOV [02H],A
INC [03H]
MOV A,b1_3[1]
MOV [02H],A
L13:
#line 104 "E:\HT45R35 with C\Touch Key with C\main.c"
#pragma debug scope 4 1 ; 104 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
INC [02H]
L15:
#line 104 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
MOV A,[02H]
SUB A,0ch
SNZ [0AH].0
JMP L12
L11:
RET
LOCAL b0_3 DB 2 DUP(?)
LOCAL b1_3 DB 2 DUP(?)
LOCAL b2_3 DB 2 DUP(?)
_first_time_setup ENDP
#line 168 "E:\HT45R35 with C\Touch Key with C\main.c"
@initial .SECTION 'CODE'
PUBLIC _initial
_initial PROC
#pragma debug scope 7 1 ; 170 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 170 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,02ch
MOV delay_ms0,A
MOV A,01h
MOV delay_ms0[1],A
CALL _delay_ms
#line 172 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR _key_flag
#line 173 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR _scan_flag
#line 174 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR _update_flag
#line 175 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _interrupt
MOV [04H],A
MOV A,OFFSET _interrupt
MOV [03H],A
CLR [02H]
INC [03H]
CLR [02H]
#line 176 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
CLR [02H]
#line 177 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _sure_key
MOV [04H],A
MOV A,OFFSET _sure_key
MOV [03H],A
CLR [02H]
#line 178 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _total_key
MOV [04H],A
MOV A,OFFSET _total_key
MOV [03H],A
CLR [02H]
#line 179 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _current_key
MOV [04H],A
MOV A,OFFSET _current_key
MOV [03H],A
CLR [02H]
#line 180 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _last_key
MOV [04H],A
MOV A,OFFSET _last_key
MOV [03H],A
CLR [02H]
#line 182 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR CR6
#line 182 "E:\HT45R35 with C\Touch Key with C\main.c"
JMP L35
L32:
#pragma debug scope 8 7 ; 184 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 184 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,CR6
ADD A,OFFSET _press_on
MOV b0_4,A
MOV A,BANK _press_on
MOV b0_4[1],A
MOV A,b0_4[1]
MOV [04H],A
MOV A,b0_4
MOV [03H],A
MOV A,[02H]
MOV b0_4,A
MOV A,b0_4
MOV __mp0,A
#line 185 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __iar0
L33:
#line 182 "E:\HT45R35 with C\Touch Key with C\main.c"
#pragma debug scope 7 1 ; 182 "E:\HT45R35 with C\Touch Key with C\main.c"
INC CR6
L35:
#line 182 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,CR6
SUB A,0ch
SNZ [0ah].0
JMP L32
#line 188 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __pbc
#line 189 "E:\HT45R35 with C\Touch Key with C\main.c"
CLR __pb
#line 191 "E:\HT45R35 with C\Touch Key with C\main.c"
CALL _first_time_setup
#line 192 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,078h
MOV __pb,A
#line 193 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,0e8h
MOV delay_ms0,A
MOV A,03h
MOV delay_ms0[1],A
CALL _delay_ms
#line 194 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,07h
MOV __pb,A
#line 196 "E:\HT45R35 with C\Touch Key with C\main.c"
SET [0BH].0
#line 197 "E:\HT45R35 with C\Touch Key with C\main.c"
SET [0BH].3
#line 198 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,083h
MOV __tmr,A
#line 199 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,085h
MOV __tmrc,A
#line 200 "E:\HT45R35 with C\Touch Key with C\main.c"
SET [0EH].4
#line 202 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A
CLR [02H]
L31:
RET
LOCAL b0_4 DB 2 DUP(?)
#line 169 "E:\HT45R35 with C\Touch Key with C\main.c"
LOCAL CR6 DB ? ; i
#pragma debug variable  8 7 CR6 i
_initial ENDP
#line 209 "E:\HT45R35 with C\Touch Key with C\main.c"
@update_base .SECTION 'CODE'
PUBLIC _update_base
_update_base PROC
#pragma debug scope 9 1 ; 210 "E:\HT45R35 with C\Touch Key with C\main.c"
#line 210 "E:\HT45R35 with C\Touch Key with C\main.c"
MOV A,BANK _rf_cx
MOV [04H],A
MOV A,OFFSET _rf_cx
MOV [03H],A