csy.asm

抽水机程序

#pragma debug scope 1 1
#line 38 "D:\工作盘\项目\CHOU SHUI\CSY.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]
@delay1ms .SECTION 'CODE'
PUBLIC _delay1ms
_delay1ms PROC
#pragma debug scope 2 1
#line 38 "D:\工作盘\项目\CHOU SHUI\CSY.C"
PUBLIC delay1ms0
LOCAL delay1ms0 DB ? ; chu
#pragma debug variable 8 2 delay1ms0 chu
#pragma debug scope 2 1 ; 38 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 38 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L4
L3:
#line 40 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,0c7H
CALL __DELAYX0
L4:
#line 39 "D:\工作盘\项目\CHOU SHUI\CSY.C"
DECA delay1ms0
MOV b0_1,A
MOV A,b0_1
MOV delay1ms0,A
SZ b0_1
JMP L3
L2:
RET
LOCAL b0_1 DB ?
_delay1ms ENDP
#line 43 "D:\工作盘\项目\CHOU SHUI\CSY.C"
@timer0 .SECTION 'CODE'
PUBLIC _timer0
_timer0 PROC
#pragma debug scope 3 1 ; 44 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 44 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [0EH].4
#line 45 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,05h
MOV __tmr,A
#line 46 "D:\工作盘\项目\CHOU SHUI\CSY.C"
INC _ledtimer
#line 47 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,_ledtimer
SUB A,0fh
SNZ [0ah].0
JMP L7
#pragma debug scope 4 3 ; 48 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 48 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.4
#line 49 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _ledtimer
#line 50 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 3 1 ; 50 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L8
L7:
#line 51 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,_ledtimer
SUB A,0fh
SZ [0ah].0
JMP L9
#pragma debug scope 5 3 ; 52 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 52 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.4
L9:
L8:
#line 54 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 3 1 ; 54 "D:\工作盘\项目\CHOU SHUI\CSY.C"
NOP
#line 55 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ _bitbit.5
JMP L11
#pragma debug scope 6 3 ; 56 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 56 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ _bitbit.4
JMP L13
#line 56 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET __pa
#line 56 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L14
L13:
#line 57 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ _bitbit.4
JMP L15
#line 57 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR __pa
L15:
L14:
L11:
#line 59 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 3 1 ; 59 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ _bitbit.6
JMP L17
#pragma debug scope 7 3 ; 60 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 60 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,_ledtimer
SUB A,0fh
SNZ [0ah].0
JMP L19
#pragma debug scope 8 7 ; 61 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 61 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,_turnover
MOV __pa,A
#line 62 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,05h
MOV delay1ms0,A
CALL _delay1ms
#line 64 "D:\工作盘\项目\CHOU SHUI\CSY.C"
rlc _turnover
L19:
L17:
#line 68 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 3 1 ; 68 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [0EH].4
L6:
RET
_timer0 ENDP
#line 70 "D:\工作盘\项目\CHOU SHUI\CSY.C"
@adchange .SECTION 'CODE'
PUBLIC _adchange
_adchange PROC
#pragma debug scope 9 1 ; 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR CR2
#line 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L25
L22:
#pragma debug scope 10 9 ; 74 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 74 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [022H].7
#line 75 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [022H].7
#line 76 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [022H].7
L26:
L27:
#line 77 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ [022H].6
JMP L26
#line 78 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,__adrh
ADDM A,CR3
#line 79 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [022H].7
#line 80 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [022H].7
L23:
#line 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 9 1 ; 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
INC CR2
L25:
#line 73 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,CR2
SUB A,0ah
SNZ [0ah].0
JMP L22
#line 82 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,0ah
MOV RH,A
MOV A,CR3
CALL DIVUI
MOV b0_3,A
MOV A,b0_3
L21:
RET
LOCAL b0_3 DB ?
#line 71 "D:\工作盘\项目\CHOU SHUI\CSY.C"
LOCAL CR2 DB ? ; i
#pragma debug variable 8 9 CR2 i
#line 72 "D:\工作盘\项目\CHOU SHUI\CSY.C"
LOCAL CR3 DB ? ; advalue
#pragma debug variable 8 9 CR3 advalue
_adchange ENDP
#line 85 "D:\工作盘\项目\CHOU SHUI\CSY.C"
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 11 1 ; 92 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 92 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR __pac
#line 93 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR __pa
#line 94 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,06h
MOV __pbc,A
#line 95 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [014H].3
#line 96 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,05h
MOV __intc,A
#line 97 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,097h
MOV __tmrc,A
#line 98 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,05h
MOV __tmr,A
#line 99 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,01h
MOV __acsr,A
#line 100 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,048h
MOV __adcr,A
#line 102 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.0
#line 103 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.1
#line 104 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.3
#line 105 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _vtimer2s
#line 106 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,03h
MOV _turnover,A
#line 108 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,064h
MOV delay1ms0,A
CALL _delay1ms
#line 108 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L31
L30:
#pragma debug scope 12 11 ; 110 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 110 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ _bitbit.0
JMP L33
#pragma debug scope 13 12 ; 111 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 111 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CALL _adchange
MOV CR4,A
#line 112 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,CR4
SUB A,08fh
SNZ [0ah].0
JMP L35
#pragma debug scope 14 13 ; 113 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 113 "D:\工作盘\项目\CHOU SHUI\CSY.C"
INCA _vtimer2s
MOV b0_4,A
MOV A,b0_4
MOV _vtimer2s,A
MOV A,b0_4
SUB A,0c8h
SNZ [0ah].0
JMP L34
#pragma debug scope 15 14 ; 114 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 114 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _vtimer2s
#line 115 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [014H].3
#line 116 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.0
#line 117 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.5
#line 118 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.6
#line 120 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 13 12 ; 120 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L34
L35:
#line 121 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,087h
SUB A,CR4
SNZ [0ah].0
JMP L34
#pragma debug scope 16 13 ; 122 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 122 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _vtimer2s
#line 123 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [014H].3
#line 124 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.0
#line 125 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.5
#line 126 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.6
#line 128 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 128 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L34
L33:
#line 129 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ _bitbit.0
JMP L41
#pragma debug scope 17 12 ; 130 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 130 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CALL _adchange
MOV CR4,A
#line 131 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,CR4
SUB A,0a7h
SZ [0ah].0
JMP L43
#pragma debug scope 18 17 ; 132 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 132 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [014H].3
#line 133 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.0
#line 134 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.5
#line 135 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.6
#line 136 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 17 12 ; 136 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L44
L43:
#line 137 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,0a7h
SUB A,CR4
SZ [0ah].0
JMP L45
#pragma debug scope 19 17 ; 138 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 138 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [014H].3
#line 139 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.0
#line 140 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.5
#line 141 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.6
L45:
L44:
L41:
L34:
#line 144 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 144 "D:\工作盘\项目\CHOU SHUI\CSY.C"
INCA CR5
MOV b0_4,A
MOV A,b0_4
MOV CR5,A
CLR b0_4[1]
MOV A,80h
XOR A,b0_4[1]
SUB A,081h
SNZ [0ah].0
JMP L47
SNZ [0ah].2
JMP L66
MOV A,0f4h
SUB A,b0_4
SZ [0ah].0
JMP L47
L66:
SNZ _bitbit.0
JMP L47
#pragma debug scope 20 12 ; 145 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 145 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ [014H].2
JMP L49
#pragma debug scope 21 20 ; 146 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 146 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR CR5
#line 147 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.1
#line 148 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [014H].3
#line 149 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 20 12 ; 149 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L50
L49:
#line 150 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ [014H].2
JMP L51
#pragma debug scope 22 20 ; 151 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 151 "D:\工作盘\项目\CHOU SHUI\CSY.C"
INCA CR6
MOV b0_4,A
MOV A,b0_4
MOV CR6,A
MOV A,064h
SUB A,b0_4
SZ [0ah].0
JMP L53
#pragma debug scope 23 22 ; 152 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 152 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ [014H].2
JMP L55
#pragma debug scope 24 23 ; 153 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 153 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR CR6
#line 154 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR _bitbit.1
#line 155 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [014H].3
L55:
L53:
L51:
L50:
L47:
#line 160 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 160 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ [014H].1
JMP L57
SZ _bitbit.1
JMP L57
#pragma debug scope 25 12 ; 161 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 161 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [018H].0
#line 162 "D:\工作盘\项目\CHOU SHUI\CSY.C"
MOV A,064h
MOV delay1ms0,A
CALL _delay1ms
#line 163 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [018H].0
#line 164 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 164 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L62
L57:
#line 165 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ [014H].1
JMP L62
SZ _bitbit.1
JMP L62
#pragma debug scope 26 12 ; 166 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 166 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET [018H].0
#line 167 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 167 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L62
L61:
#pragma debug scope 27 12 ; 169 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#line 169 "D:\工作盘\项目\CHOU SHUI\CSY.C"
CLR [014H].3
#line 170 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SZ [014H].2
JMP L64
#line 170 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SET _bitbit.1
L64:
L62:
#line 168 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 12 11 ; 168 "D:\工作盘\项目\CHOU SHUI\CSY.C"
SNZ _bitbit.1
JMP L61
L31:
#line 109 "D:\工作盘\项目\CHOU SHUI\CSY.C"
#pragma debug scope 11 1 ; 109 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP L30
L29:
#line 173 "D:\工作盘\项目\CHOU SHUI\CSY.C"
JMP $
LOCAL b0_4 DB 2 DUP(?)
#line 87 "D:\工作盘\项目\CHOU SHUI\CSY.C"
LOCAL CR4 DB ? ; value
#pragma debug variable 8 11 CR4 value
#line 88 "D:\工作盘\项目\CHOU SHUI\CSY.C"
LOCAL CR5 DB ? ; ftimer5s
#pragma debug variable 8 11 CR5 ftimer5s
#line 89 "D:\工作盘\项目\CHOU SHUI\CSY.C"
LOCAL CR6 DB ? ; ftimer1s
#pragma debug variable 8 11 CR6 ftimer1s
_main ENDP
PUBLIC _bitbit
@bitbit .SECTION 'DATA'
#line 29 "D:\工作盘\项目\CHOU SHUI\CSY.C"
_bitbit DB ? ; bitbit
#pragma debug variable 4 1 _bitbit bitbit
PUBLIC _ledtimer
@ledtimer .SECTION 'DATA'
#line 18 "D:\工作盘\项目\CHOU SHUI\CSY.C"
_ledtimer DB ? ; ledtimer
#pragma debug variable 8 1 _ledtimer ledtimer
PUBLIC _turnover
@turnover .SECTION 'DATA'
#line 17 "D:\工作盘\项目\CHOU SHUI\CSY.C"
_turnover DB ? ; turnover
#pragma debug variable 8 1 _turnover turnover
PUBLIC _vtimer2s
@vtimer2s .SECTION 'DATA'
#line 16 "D:\工作盘\项目\CHOU SHUI\CSY.C"
_vtimer2s DB ? ; vtimer2s
#pragma debug variable 8 1 _vtimer2s vtimer2s
#line 85 "D:\工作盘\项目\CHOU SHUI\CSY.C"
STARTSEC .SECTION 'CODE'
STARTUP:
RET
EXTERN RH:BYTE
EXTERN T2:BYTE
EXTERN T3:BYTE
EXTERN T4:BYTE
EXTERN DIVUI:NEAR
EXTERN __DELAYX0:NEAR
EXTERN __DELAYX1:NEAR
EXTERN __DELAYX2:NEAR
EXTERN __DELAYX3:NEAR
EXTERN __DELAYX4:NEAR
EXTERN __DELAYX5:NEAR
EXTERN __DELAYX6:NEAR
#line 85 "D:\工作盘\项目\CHOU SHUI\CSY.C"
@CODE .SECTION AT 0 'CODE'
JMP begin
@DUMMY PROC
CALL _main
@DUMMY ENDP
ROMBANK 0 @DUMMYNOP 
@DUMMYNOP .SECTION AT 07ffh 'CODE'
nop