wanjtest.asm

一个用嵌入c写的万年历程序

#pragma debug scope 1 1
#line 21 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
rombank 0 _msg
_msg .SECTION INPAGE'CODE'
l_msg:
MOV [06h],A
_msg:
RET A,109
RET A,111
RET A,110
RET A,100
RET A,97
RET A,121
RET A,109
RET A,111
RET A,110
RET A,100
RET A,97
RET A,121
RET A,109
RET A,111
RET A,110
RET A,100
RET A,97
RET A,121
RET A,32
RET A,32
RET A,50
RET A,48
RET A,48
RET A,54
RET A,46
RET A,48
RET A,53
RET A,46
RET A,48
RET A,50
RET A,32
RET A,49
RET A,54
RET A,58
RET A,52
RET A,49
RET A,58
RET A,50
RET A,51
RET A,32
RET A,0
#line 25 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
__tbhp EQU [01fH]
__scc EQU [01cH]
__usr EQU [01bH]
__usc EQU [01aH]
__pdc EQU [019H]
__pd EQU [018H]
__pcc EQU [017H]
__pc EQU [016H]
__pbc EQU [015H]
__pb EQU [014H]
__pac EQU [013H]
__pa EQU [012H]
__tmr1c EQU [011H]
__tmr1l EQU [010H]
__tmr1h EQU [0fH]
__tmr0c EQU [0eH]
__tmr0 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]
@delay .SECTION 'CODE'
PUBLIC _delay
_delay PROC
#pragma debug scope 2 1
#line 24 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC delay0
LOCAL delay0 DB ? ; us
#pragma debug variable 2 delay0 us
L2:
L3:
#pragma debug scope 2 1 ; 26 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 26 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
DECA delay0
MOV b0_1,A
MOV A,b0_1
MOV delay0,A
SZ b0_1
JMP L2
L1:
RET
LOCAL b0_1 DB ?
_delay ENDP
#line 29 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@delay1 .SECTION 'CODE'
PUBLIC _delay1
_delay1 PROC
#pragma debug scope 3 1
#line 28 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC delay10
LOCAL delay10 DB ? ; ms
#pragma debug variable 3 delay10 ms
#pragma debug scope 3 1 ; 29 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 29 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L7
L9:
#pragma debug scope 4 3 ; 33 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 33 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV delay0,A
CALL _delay
L10:
#line 32 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INCA CR2
MOV b0_2,A
MOV A,b0_2
MOV CR2,A
CLR b0_2[1]
MOV A,80h
XOR A,b0_2[1]
SUB A,084h
SNZ [0AH].0
JMP L9
SNZ [0AH].2
JMP L12
MOV A,05bh
SUB A,b0_2
SZ [0AH].0
JMP L9
L12:
L7:
#line 31 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 3 1 ; 31 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INCA CR3
MOV b0_2,A
MOV A,b0_2
MOV CR3,A
CLR b0_2[1]
MOV A,delay10
MOV b1_2,A
CLR b1_2[1]
MOV A,b1_2
MOV T2,A
MOV A,b1_2[1]
MOV RH,A
MOV A,03h
MOV T4,A
MOV A,0e8h
CALL MULL
MOV b1_2[1],A
MOV A,T6
MOV b1_2,A
MOV A,80h
XOR A,b1_2[1]
MOV RH,A
MOV A,80h
XOR A,b0_2[1]
SUB A,RH
SNZ [0AH].0
JMP L10
SNZ [0AH].2
JMP L13
MOV A,b1_2
SUB A,b0_2
SZ [0AH].0
JMP L10
L13:
L5:
RET
LOCAL b0_2 DB 2 DUP(?)
LOCAL b1_2 DB 2 DUP(?)
#line 30 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR2 DB ? ; j
#pragma debug variable 3 CR2 j
#line 30 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR3 DB ? ; i
#pragma debug variable 3 CR3 i
_delay1 ENDP
#line 38 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@wr_lcd .SECTION 'CODE'
PUBLIC _wr_lcd
_wr_lcd PROC
#pragma debug scope 5 1
#line 37 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC wr_lcd0
LOCAL wr_lcd0 DB ? ; dat_comm
#pragma debug variable 5 wr_lcd0 dat_comm
#line 37 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC wr_lcd1
LOCAL wr_lcd1 DB ? ; content
#pragma debug variable 5 wr_lcd1 content
#pragma debug scope 5 1 ; 41 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 41 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,wr_lcd1
MOV CR7,A
#line 42 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].2
#line 43 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
#line 44 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].3
#line 45 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR6
#line 45 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L18
L15:
#pragma debug scope 6 5 ; 47 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 47 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 48 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
L16:
#line 45 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 5 1 ; 45 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR6
L18:
#line 45 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR6
SUB A,05h
SNZ [0ah].0
JMP L15
#line 50 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].3
#line 51 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 52 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
#line 53 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SZ wr_lcd0
JMP L33
JMP L19
L33:
#line 54 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].3
#line 54 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L20
L19:
#line 56 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].3
L20:
#line 57 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 58 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
#line 59 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].3
#line 60 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 61 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
#line 62 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR8
#line 62 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L24
L21:
#pragma debug scope 7 5 ; 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR6
#line 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L28
L25:
#pragma debug scope 8 7 ; 66 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 66 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [0AH].0
RLC CR7
#line 67 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,[016H]
CLR [05H].3
SZ [0AH].0
SET [05H].3
MOV [016H],A
#line 68 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 69 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
L26:
#line 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 7 5 ; 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR6
L28:
#line 64 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR6
SUB A,04h
SNZ [0ah].0
JMP L25
#line 71 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].3
#line 72 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR6
#line 72 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L32
L29:
#pragma debug scope 9 7 ; 74 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 74 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].0
#line 75 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [016H].0
L30:
#line 72 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 7 5 ; 72 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR6
L32:
#line 72 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR6
SUB A,04h
SNZ [0ah].0
JMP L29
L22:
#line 62 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 5 1 ; 62 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR8
L24:
#line 62 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR8
SUB A,02h
SNZ [0ah].0
JMP L21
L14:
RET
#line 39 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR6 DB ? ; i
#pragma debug variable 5 CR6 i
#line 39 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR7 DB ? ; a
#pragma debug variable 5 CR7 a
#line 39 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR8 DB ? ; j
#pragma debug variable 5 CR8 j
_wr_lcd ENDP
#line 81 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@init_lcd .SECTION 'CODE'
PUBLIC _init_lcd
_init_lcd PROC
#pragma debug scope 10 1 ; 82 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 82 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET [016H].4
#line 84 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,030h
MOV wr_lcd1,A
CALL _wr_lcd
#line 85 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,01h
MOV wr_lcd1,A
CALL _wr_lcd
#line 86 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,050h
MOV delay0,A
CALL _delay
#line 87 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,06h
MOV wr_lcd1,A
CALL _wr_lcd
#line 88 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,0ch
MOV wr_lcd1,A
CALL _wr_lcd
L34:
RET
_init_lcd ENDP
#line 92 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@chn_disp1 .SECTION 'CODE'
PUBLIC _chn_disp1
_chn_disp1 PROC
#pragma debug scope 11 1 ; 94 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 94 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,030h
MOV wr_lcd1,A
CALL _wr_lcd
#line 95 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,080h
MOV wr_lcd1,A
CALL _wr_lcd
#line 96 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR10
#line 97 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR9
#line 97 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L39
L36:
#line 98 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV wr_lcd0,A
MOV A,CR10
MOV T2,A
MOV A,014h
CALL MULI
MOV b0_5,A
MOV A,CR9
ADDM A,b0_5
MOV A,1
ADD A,b0_5
ADD A,OFFSET l_msg
CALL l_msg
MOV b0_5,A
MOV A,b0_5
MOV wr_lcd1,A
CALL _wr_lcd
L37:
#line 97 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR9
L39:
#line 97 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR9
SUB A,014h
SNZ [0ah].0
JMP L36
L35:
RET
LOCAL b0_5 DB 2 DUP(?)
LOCAL b1_5 DB 2 DUP(?)
#line 93 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR9 DB ? ; i
#pragma debug variable 11 CR9 i
#line 93 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR10 DB ? ; j
#pragma debug variable 11 CR10 j
_chn_disp1 ENDP
#line 102 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@chn_disp2 .SECTION 'CODE'
PUBLIC _chn_disp2
_chn_disp2 PROC
#pragma debug scope 12 1 ; 104 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 104 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,030h
MOV wr_lcd1,A
CALL _wr_lcd
#line 105 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,090h
MOV wr_lcd1,A
CALL _wr_lcd
#line 106 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV CR12,A
#line 107 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR11
#line 107 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L44
L41:
#line 108 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV wr_lcd0,A
MOV A,CR12
MOV T2,A
MOV A,014h
CALL MULI
MOV b0_6,A
MOV A,CR11
ADDM A,b0_6
MOV A,1
ADD A,b0_6
ADD A,OFFSET l_msg
CALL l_msg
MOV b0_6,A
MOV A,b0_6
MOV wr_lcd1,A
CALL _wr_lcd
L42:
#line 107 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
INC CR11
L44:
#line 107 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR11
SUB A,012h
SNZ [0ah].0
JMP L41
L40:
RET
LOCAL b0_6 DB 2 DUP(?)
LOCAL b1_6 DB 2 DUP(?)
#line 103 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR11 DB ? ; i
#pragma debug variable 12 CR11 i
#line 103 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR12 DB ? ; j
#pragma debug variable 12 CR12 j
_chn_disp2 ENDP
#line 113 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@clrram .SECTION 'CODE'
PUBLIC _clrram
_clrram PROC
#pragma debug scope 13 1 ; 114 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 114 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,030h
MOV wr_lcd1,A
CALL _wr_lcd
#line 115 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,00h
MOV wr_lcd0,A
MOV A,01h
MOV wr_lcd1,A
CALL _wr_lcd
L45:
RET
_clrram ENDP
#line 169 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@showp .SECTION 'CODE'
PUBLIC _showp
_showp PROC
#pragma debug scope 14 1 ; 169 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 169 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [014H].0
L46:
RET
_showp ENDP
#line 171 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@showpn .SECTION 'CODE'
PUBLIC _showpn
_showpn PROC
#pragma debug scope 15 1 ; 171 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 171 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _init_lcd
#line 172 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _chn_disp1
#line 173 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _chn_disp2
L47:
RET
_showpn ENDP
#line 175 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@savetesk .SECTION 'CODE'
PUBLIC _savetesk
_savetesk PROC
#pragma debug scope 16 1 ; 175 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 175 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR [014H].1
L48:
RET
_savetesk ENDP
#line 177 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@begdaysinm .SECTION 'CODE'
PUBLIC _begdaysinm
_begdaysinm PROC
#pragma debug scope 17 1
#line 176 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC begdaysinm0
LOCAL begdaysinm0 DB 7 DUP (?) ; curtime
#pragma debug variable 17 begdaysinm0 curtime
#pragma debug scope 17 1 ; 177 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 177 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01fh
MOV CR13,A
#line 178 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR13
L49:
RET
#line 177 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR13 DB ? ; j
#pragma debug variable 17 CR13 j
_begdaysinm ENDP
#line 180 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@init .SECTION 'CODE'
PUBLIC _init
_init PROC
#pragma debug scope 18 1 ; 187 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 187 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET __pac
#line 188 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR __pbc
#line 189 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR __pb
#line 190 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SET __pa
#line 191 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR __pcc
#line 192 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,09h
MOV __intc,A
#line 193 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,080h
MOV __tmr1c,A
#line 194 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _set_timer
#line 199 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _key
MOV [04H],A
MOV A,OFFSET _key
MOV [03H],A
MOV A,046h
MOV [02H],A
#line 199 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _key[1]
MOV [04H],A
MOV A,OFFSET _key[1]
MOV [03H],A
MOV A,053h
MOV [02H],A
#line 199 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _key[2]
MOV [04H],A
MOV A,OFFSET _key[2]
MOV [03H],A
MOV A,044h
MOV [02H],A
#line 199 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _key[3]
MOV [04H],A
MOV A,OFFSET _key[3]
MOV [03H],A
MOV A,06ch
MOV [02H],A
#line 199 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"