tb-led-3.asm

此源代码程序为三色LED灯板PWM 控制程序

#pragma debug scope 1 1
#line 37 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
__acsr EQU [023H]
__adcr EQU [022H]
__adrh EQU [021H]
__adrl EQU [020H]
__pwm EQU [01aH]
__pdc EQU [019H]
__pd EQU [018H]
__pbc EQU [015H]
__pb EQU [014H]
__pac EQU [013H]
__pa EQU [012H]
__tmrc EQU [0eH]
__tmr EQU [0dH]
__intc EQU [0bH]
__status EQU [0aH]
__tblh EQU [08H]
__tblp EQU [07H]
__pcl EQU [06H]
__acc EQU [05H]
__mp EQU [01H]
__iar EQU [00H]
@@isr_extern0 .SECTION AT 04H 'CODE'
JMP _isr_extern0
@isr_extern0 .SECTION 'CODE'
_isr_extern0 PROC
MOV VA,A
MOV A,[0AH]
MOV VS,A
L1:
#pragma debug scope 2 1 ; 37 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,VS
MOV [0AH],A
MOV A,VA
RETI
_isr_extern0 ENDP
@isr_extern0 .SECTION 'DATA'
#line 39 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@@isr_timer0 .SECTION AT 08H 'CODE'
JMP _isr_timer0
@isr_timer0 .SECTION 'CODE'
_isr_timer0 PROC
MOV VA,A
MOV A,[0AH]
MOV VS,A
#pragma debug scope 3 1 ; 40 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 40 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR [012H].3
#line 47 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,0cH
CALL __DELAYX3
#line 48 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [012H].3
#line 49 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SZ [022H].6
JMP L3
#line 49 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CALL _adc_start
L3:
L2:
MOV A,VS
MOV [0AH],A
MOV A,VA
RETI
_isr_timer0 ENDP
@isr_timer0 .SECTION 'DATA'
b0_2 DB ?
#line 54 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@@isr_ad .SECTION AT 0cH 'CODE'
JMP _isr_ad
@isr_ad .SECTION 'CODE'
_isr_ad PROC
MOV VA,A
MOV A,[0AH]
MOV VS,A
#pragma debug scope 4 1 ; 55 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 55 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,__adrh
MOV _ad1,A
#line 56 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR [0AH].0
RLC _ad1
#line 57 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,__adrl
MOV _ad2,A
#line 58 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_ad2
CLR _ad2
SZ [05H].7
SET _ad2.0
#line 59 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_ad1
ADD A,_ad2
MOV _current_ad,A
L5:
MOV A,VS
MOV [0AH],A
MOV A,VA
RETI
_isr_ad ENDP
@isr_ad .SECTION 'DATA'
#line 64 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@safeguard_init .SECTION 'CODE'
PUBLIC _safeguard_init
_safeguard_init PROC
#pragma debug scope 5 1 ; 65 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 65 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR __intc
#line 66 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR __tmrc
#line 67 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR __tmr
#line 68 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET __pa
#line 69 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET __pb
#line 70 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET __pd
#line 72 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR __pac
#line 73 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,01h
MOV __pbc,A
#line 74 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR __pdc
#line 76 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,OFFSET _ii
MOV _p,A
#line 77 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
INC _p
#line 78 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,042h
MOV _ii,A
#line 78 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
JMP L10
L7:
#pragma debug scope 6 5 ; 80 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 80 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_p
MOV [01H],A
MOV A,00h
MOV [00H],A
L8:
#line 78 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#pragma debug scope 5 1 ; 78 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
INC _ii
INC _p
L10:
#line 78 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,07fh
SUB A,_ii
SZ [0ah].0
JMP L7
L6:
RET
_safeguard_init ENDP
#line 85 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@init .SECTION 'CODE'
PUBLIC _init
_init PROC
#pragma debug scope 7 1 ; 86 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 86 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,0ceh
MOV _cnt_p,A
#line 87 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,05ch
MOV _ad_r,A
#line 89 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [0BH].0
#line 91 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,093h
MOV __tmrc,A
#line 92 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_cnt_p
MOV __tmr,A
#line 93 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [0BH].2
#line 96 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,01h
MOV __acsr,A
#line 97 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,080h
MOV __adcr,A
#line 98 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [0BH].3
#line 99 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [012H].3
L11:
RET
_init ENDP
#line 106 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@adc_start .SECTION 'CODE'
PUBLIC _adc_start
_adc_start PROC
#pragma debug scope 8 1 ; 107 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 107 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR [022H].7
#line 108 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
SET [022H].7
#line 109 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
NOP
#line 110 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
NOP
#line 111 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
NOP
#line 112 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CLR [022H].7
L12:
RET
_adc_start ENDP
#line 119 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 9 1 ; 120 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 120 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CALL _safeguard_init
#line 121 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
CALL _init
#line 121 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
JMP L15
L14:
#pragma debug scope 10 9 ; 126 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 126 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_current_ad
SUB A,_ad_r
SZ [0ah].0
JMP L17
#pragma debug scope 11 10 ; 128 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 128 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_current_ad
SUB A,05h
SNZ [0ah].0
JMP L19
#pragma debug scope 12 11 ; 130 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 130 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,0fah
SUB A,_cnt_p
SNZ [0ah].0
JMP L21
#pragma debug scope 13 12 ; 130 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 130 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
INC _cnt_p
#line 130 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_cnt_p
MOV __tmr,A
L21:
L19:
L17:
#line 136 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#pragma debug scope 10 9 ; 136 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_ad_r
SUB A,_current_ad
SZ [0ah].0
JMP L23
#pragma debug scope 14 10 ; 138 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 138 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,0fah
SUB A,_current_ad
SNZ [0ah].0
JMP L25
#pragma debug scope 15 14 ; 141 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 141 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_cnt_p
SUB A,050h
SNZ [0ah].0
JMP L27
#pragma debug scope 16 15 ; 141 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#line 141 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
DEC _cnt_p
#line 141 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
MOV A,_cnt_p
MOV __tmr,A
L27:
L25:
L23:
L15:
#line 123 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
#pragma debug scope 9 1 ; 123 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
JMP L14
L13:
#line 148 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
JMP $
_main ENDP
PUBLIC _ad2
@ad2 .SECTION 'DATA'
#line 29 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_ad2 DB ? ; ad2
#pragma debug variable 8 1 _ad2 ad2
PUBLIC _ad1
@ad1 .SECTION 'DATA'
#line 28 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_ad1 DB ? ; ad1
#pragma debug variable 8 1 _ad1 ad1
PUBLIC _current_ad
@current_ad .SECTION 'DATA'
#line 27 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_current_ad DB ? ; current_ad
#pragma debug variable 8 1 _current_ad current_ad
PUBLIC _ad_r
@ad_r .SECTION 'DATA'
#line 25 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_ad_r DB ? ; ad_r
#pragma debug variable 8 1 _ad_r ad_r
PUBLIC _cnt_p
@cnt_p .SECTION 'DATA'
#line 24 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_cnt_p DB ? ; cnt_p
#pragma debug variable 8 1 _cnt_p cnt_p
@ii .SECTION AT 041H 'DATA'
PUBLIC _ii
#line 22 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_ii DB ? ; ii
#pragma debug variable 8 1 _ii ii
@p .SECTION AT 040H 'DATA'
PUBLIC _p
#line 21 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
_p DB ? ; p
#pragma debug variable 19 1 _p p
#line 118 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
STARTSEC .SECTION 'CODE'
STARTUP:
RET
EXTERN VA:BYTE
EXTERN VS:BYTE
EXTERN __DELAYX0:NEAR
EXTERN __DELAYX1:NEAR
EXTERN __DELAYX2:NEAR
EXTERN __DELAYX3:NEAR
EXTERN __DELAYX4:NEAR
EXTERN __DELAYX5:NEAR
EXTERN __DELAYX6:NEAR
#line 118 "E:\11天波港联开关电源3种型号\TB-LED-3\TB-LED-3.C"
@CODE .SECTION AT 0 'CODE'
JMP begin
@DUMMY PROC
CALL _main
@DUMMY ENDP
ROMBANK 0 @DUMMYNOP 
@DUMMYNOP .SECTION AT 07ffh 'CODE'
nop