4-2.asm

这是HOLTEK HT 48系列单片机应用实例

#pragma debug scope 1 1
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
__pa EQU [012H]
__pac EQU [013H]
@delay .SECTION 'CODE'
PUBLIC _delay
_delay PROC
#pragma debug scope 2 1 ; 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CLR CR1
CLR CR1[1]
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP L5
L2:
L3:
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
INC CR1
SZ [0AH].2
INC CR1[1]
L5:
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,07h
SUB A,CR1[1]
SNZ [0ah].0
JMP L6
SNZ [0ah].2
JMP L2
MOV A,0d0h
SUB A,CR1
SNZ [0ah].0
JMP L6
SNZ [0ah].2
JMP L2
L6:
L1:
RET
#line 6 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
LOCAL CR1 DB 2 DUP (?) ; i
#pragma debug variable 2 CR1 i
_delay ENDP
#line 8 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 3 1 ; 10 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#line 10 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CLR __pac
#line 10 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP L9
L8:
#pragma debug scope 4 3 ; 13 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#line 13 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,01h
MOV _ui,A
#line 14 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CLR CR2
#line 14 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP L14
L11:
#pragma debug scope 5 4 ; 16 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#line 16 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,_ui
MOV __pa,A
#line 17 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
RL _ui
#line 18 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CALL _delay
L12:
#line 14 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#pragma debug scope 4 3 ; 14 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
INC CR2
L14:
#line 14 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,CR2
SUB A,07h
SNZ [0ah].0
JMP L11
#line 20 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CLR CR2
#line 20 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP L18
L15:
#pragma debug scope 6 4 ; 22 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#line 22 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,_ui
MOV __pa,A
#line 23 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
RR _ui
#line 24 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
CALL _delay
L16:
#line 20 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#pragma debug scope 4 3 ; 20 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
INC CR2
L18:
#line 20 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
MOV A,CR2
SUB A,07h
SNZ [0ah].0
JMP L15
L9:
#line 11 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
#pragma debug scope 3 1 ; 11 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP L8
L7:
#line 27 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
JMP $
#line 9 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
LOCAL CR2 DB ? ; y
#pragma debug variable 3 CR2 y
_main ENDP
PUBLIC _ui
@ui .SECTION 'DATA'
#line 3 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
_ui DB ? ; ui
#pragma debug variable 1 _ui ui
#line 7 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
STARTSEC .SECTION 'CODE'
STARTUP:
RET
#line 7 "E:\SCHOOL\盡肈\HT48R50_絛ㄒ\4-2.C"
@CODE .SECTION AT 0 'CODE'
JMP begin
@DUMMY PROC
CALL _main
@DUMMY ENDP