wanjtest.asm

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

#line 309 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showpn
#line 310 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L97
L124:
#line 313 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
INC [02H]
#line 314 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,[02H]
MOV b0_16,A
MOV A,BANK _focnbmax
MOV [04H],A
MOV A,OFFSET _focnbmax
MOV [03H],A
MOV A,[02H]
MOV b1_16,A
MOV A,b1_16
MOV RH,A
MOV A,b0_16
CALL DIVUI
MOV A,T3
MOV b0_16,A
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,b0_16
MOV [02H],A
#line 315 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showp
#line 316 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L97
L125:
#line 319 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
DECA [02H]
MOV b0_16,A
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,b0_16
MOV [02H],A
SZ b0_16
JMP L127
MOV A,BANK _focnbmax
MOV [04H],A
MOV A,OFFSET _focnbmax
MOV [03H],A
MOV A,[02H]
MOV b0_16,A
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,[02H]
ADD A,b0_16
MOV CR26,A
JMP L128
L127:
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,[02H]
MOV CR26,A
L128:
MOV A,BANK _focnb
MOV [04H],A
MOV A,OFFSET _focnb
MOV [03H],A
MOV A,CR26
MOV [02H],A
#line 320 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showp
#line 321 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L97
L129:
#line 324 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _upflag
MOV [04H],A
MOV A,OFFSET _upflag
MOV [03H],A
MOV A,01h
MOV [02H],A
#line 325 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _key_adjust
#line 326 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showp
#line 327 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L97
L130:
#line 330 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _upflag
MOV [04H],A
MOV A,OFFSET _upflag
MOV [03H],A
CLR [02H]
#line 331 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _key_adjust
#line 332 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showp
L97:
L94:
L93:
RET
LOCAL b0_16 DB ?
LOCAL b1_16 DB ?
LOCAL CR26 DB ? ; 126
_wan_testkb ENDP
#line 342 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@getkey .SECTION 'CODE'
PUBLIC _getkey
_getkey PROC
#pragma debug scope 42 1 ; 343 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 343 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR28
#line 346 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SZ b0_17
JMP L154
JMP L136
L154:
#pragma debug scope 43 42 ; 349 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 349 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01H
MOV RH,A
MOV A,0f2H
CALL __DELAYY1
#line 352 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SZ b0_17
JMP L155
JMP L138
L155:
#pragma debug scope 44 43 ; 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.6
JMP L140
#pragma debug scope 45 44 ; 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,06h
MOV [02H],A
#line 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 356 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L141
L140:
#line 357 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.5
JMP L142
#pragma debug scope 46 44 ; 357 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 357 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,05h
MOV [02H],A
#line 357 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 357 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L143
L142:
#line 358 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.4
JMP L144
#pragma debug scope 47 44 ; 358 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 358 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,04h
MOV [02H],A
#line 358 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 358 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L145
L144:
#line 359 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.3
JMP L146
#pragma debug scope 48 44 ; 359 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 359 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,03h
MOV [02H],A
#line 359 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 359 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L147
L146:
#line 360 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.2
JMP L148
#pragma debug scope 49 44 ; 360 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 360 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,02h
MOV [02H],A
#line 360 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 360 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L149
L148:
#line 361 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.1
JMP L150
#pragma debug scope 50 44 ; 361 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 361 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
MOV A,01h
MOV [02H],A
#line 361 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 361 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L151
L150:
#line 362 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CPLA __pa
MOV b0_17,A
SNZ b0_17.0
JMP L152
#pragma debug scope 51 44 ; 362 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 362 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _keyvalue
MOV [04H],A
MOV A,OFFSET _keyvalue
MOV [03H],A
CLR [02H]
L152:
L151:
L149:
L147:
L145:
L143:
L141:
#line 363 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 44 43 ; 363 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV CR28,A
L138:
L136:
#line 366 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 42 1 ; 366 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR28
L135:
RET
LOCAL b0_17 DB ?
#line 343 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR28 DB ? ; j
#pragma debug variable 42 CR28 j
_getkey ENDP
#line 371 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@key_adjust .SECTION 'CODE'
PUBLIC _key_adjust
_key_adjust PROC
#pragma debug scope 52 1 ; 373 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 373 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR29
L157:
#line 375 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _upflag
MOV [04H],A
MOV A,OFFSET _upflag
MOV [03H],A
MOV A,[02H]
XOR A,01h
SNZ [0AH].2
JMP L158
#pragma debug scope 53 52 ; 377 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 377 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
INC [02H]
#line 378 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
MOV A,[02H]
MOV b0_18,A
MOV A,BANK _focvmax
MOV [04H],A
MOV A,OFFSET _focvmax
MOV [03H],A
MOV A,[02H]
MOV b1_18,A
MOV A,b1_18
MOV RH,A
MOV A,b0_18
CALL DIVUI
MOV A,T3
MOV b0_18,A
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
MOV A,b0_18
MOV [02H],A
#line 379 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 52 1 ; 379 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L159
L158:
#pragma debug scope 54 52 ; 383 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 383 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
SZ [02H]
JMP L161
MOV A,BANK _focvmax
MOV [04H],A
MOV A,OFFSET _focvmax
MOV [03H],A
MOV A,[02H]
MOV CR31,A
JMP L162
L161:
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
DECA [02H]
MOV b0_18,A
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
MOV A,b0_18
MOV [02H],A
MOV A,b0_18
MOV CR31,A
L162:
MOV A,BANK _focvalue
MOV [04H],A
MOV A,OFFSET _focvalue
MOV [03H],A
MOV A,CR31
MOV [02H],A
L159:
#line 385 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 52 1 ; 385 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _curtime[6]
MOV [04H],A
MOV A,OFFSET _curtime[6]
MOV [03H],A
MOV A,[02H]
MOV b0_18,A
MOV A,b0_18
MOV CR30,A
#line 385 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L166
L165:
#pragma debug scope 55 52 ; 388 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 388 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _showp
#line 389 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SZ CR29
JMP L168
#pragma debug scope 56 55 ; 391 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 391 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _curtime[6]
MOV [04H],A
MOV A,OFFSET _curtime[6]
MOV [03H],A
MOV A,[02H]
ADD A,078h
MOV b0_18,A
MOV A,b0_18
SUB A,CR30
MOV b0_18,A
MOV A,078h
MOV RH,A
MOV A,b0_18
CALL DIVUI
MOV A,T3
MOV b0_18,A
MOV A,02h
SUB A,b0_18
SZ [0ah].0
JMP L169
#pragma debug scope 57 56 ; 393 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 393 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV CR29,A
#line 394 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L157
L168:
#pragma debug scope 58 55 ; 399 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 399 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _curtime[6]
MOV [04H],A
MOV A,OFFSET _curtime[6]
MOV [03H],A
MOV A,[02H]
XOR A,CR30
SZ [0AH].2
JMP L174
#line 400 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
JMP L157
L174:
L169:
L166:
#line 386 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 52 1 ; 386 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
SZ __pa
JMP L178
JMP L165
L178:
#line 405 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CALL _set_timer
L156:
RET
LOCAL b0_18 DB ?
LOCAL b1_18 DB ?
#line 373 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR29 DB ? ; held_long_time
#pragma debug variable 52 CR29 held_long_time
#line 372 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR30 DB ? ; hfconsec
#pragma debug variable 52 CR30 hfconsec
LOCAL CR31 DB ? ; 160
_key_adjust ENDP
#line 410 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@ftiequal .SECTION 'CODE'
PUBLIC _ftiequal
_ftiequal PROC
#pragma debug scope 59 1
#line 409 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC ftiequal0
LOCAL ftiequal0 DB 7 DUP (?) ; one
#pragma debug variable 59 ftiequal0 one
#line 409 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC ftiequal1
LOCAL ftiequal1 DB 7 DUP (?) ; twe
#pragma debug variable 59 ftiequal1 twe
#pragma debug scope 59 1 ; 410 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 410 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR34
#line 413 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,ftiequal0
XOR A,ftiequal1
SNZ [0ah].2
JMP L180
MOV A,ftiequal0[1]
XOR A,ftiequal1[1]
SNZ [0ah].2
JMP L180
MOV A,ftiequal0[2]
XOR A,ftiequal1[2]
SNZ [0ah].2
JMP L180
MOV A,ftiequal0[3]
XOR A,ftiequal1[3]
SNZ [0ah].2
JMP L180
#line 414 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,ftiequal0[4]
XOR A,ftiequal1[4]
SNZ [0ah].2
JMP L188
MOV A,ftiequal0[5]
XOR A,ftiequal1[5]
SNZ [0ah].2
JMP L188
MOV A,ftiequal0[6]
XOR A,ftiequal1[6]
SNZ [0ah].2
JMP L188
#pragma debug scope 60 59 ; 415 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 415 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV CR34,A
L188:
L180:
#line 416 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 59 1 ; 416 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR34
L179:
RET
#line 410 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR34 DB ? ; flag
#pragma debug variable 59 CR34 flag
_ftiequal ENDP
#line 419 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@hmsequal .SECTION 'CODE'
PUBLIC _hmsequal
_hmsequal PROC
#pragma debug scope 61 1
#line 418 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC hmsequal0
LOCAL hmsequal0 DB 3 DUP (?) ; one
#pragma debug variable 61 hmsequal0 one
#line 418 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
PUBLIC hmsequal1
LOCAL hmsequal1 DB 3 DUP (?) ; twe
#pragma debug variable 61 hmsequal1 twe
#pragma debug scope 61 1 ; 420 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 420 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR35
#line 421 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,hmsequal0
XOR A,hmsequal1
SNZ [0ah].2
JMP L201
MOV A,hmsequal0[1]
XOR A,hmsequal1[1]
SNZ [0ah].2
JMP L201
MOV A,hmsequal0[2]
XOR A,hmsequal1[2]
SNZ [0ah].2
JMP L201
#pragma debug scope 62 61 ; 422 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 422 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,01h
MOV CR35,A
L201:
#line 423 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#pragma debug scope 61 1 ; 423 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR35
L200:
RET
#line 420 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
LOCAL CR35 DB ? ; flag
#pragma debug variable 61 CR35 flag
_hmsequal ENDP
#line 429 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 63 1 ; 429 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
#line 429 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
CLR CR36
#line 430 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR36
MOV T2,A
MOV A,09h
CALL MULI
MOV b0_21,A
MOV A,b0_21
ADD A,OFFSET _wan_ints[6]
MOV b0_21,A
MOV A,BANK _wan_ints[6]
MOV b0_21[1],A
MOV A,3
MOV RH,A
MOV A,OFFSET CR38
MOV [01H],A
MOV A,b0_21
MOV [03H],A
MOV A,b0_21[1]
MOV [04H],A
ASB357:
MOV A,[02H]
MOV [00H],A
INC [01H]
INC [03H]
SDZ RH
JMP ASB357
#line 431 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,CR36
MOV T2,A
MOV A,09h
CALL MULI
MOV b0_21,A
MOV A,b0_21
ADD A,OFFSET _wan_ints[2]
MOV b0_21,A
MOV A,BANK _wan_ints[2]
MOV b0_21[1],A
MOV A,7
MOV RH,A
MOV A,OFFSET CR37
MOV [01H],A
MOV A,b0_21
MOV [03H],A
MOV A,b0_21[1]
MOV [04H],A
ASB358:
MOV A,[02H]
MOV [00H],A
INC [01H]
INC [03H]
SDZ RH
JMP ASB358
#line 432 "D:\APPLICATIONSOFT\HOLTEK\WANGNL\WANJTEST.C"
MOV A,BANK _picnb
MOV [04H],A