main.asm

第二届盛群比赛之前做的一个项目

#pragma debug scope 39 1
#line 554 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
PUBLIC LCD_write_string0
LOCAL LCD_write_string0 DB ? ; X
#pragma debug variable 8 39 LCD_write_string0 X
#line 554 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
PUBLIC LCD_write_string1
LOCAL LCD_write_string1 DB ? ; Y
#pragma debug variable 8 39 LCD_write_string1 Y
#line 554 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
PUBLIC LCD_write_string2
LOCAL LCD_write_string2 DB ? ; s
#pragma debug variable 19 39 LCD_write_string2 s
#pragma debug scope 39 1 ; 556 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
#line 556 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,LCD_write_string0
MOV LCD_set_xy0,A
MOV A,LCD_write_string1
MOV LCD_set_xy1,A
CALL _LCD_set_xy
#line 556 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
JMP L135
L134:
#pragma debug scope 40 39 ; 559 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
#line 559 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,LCD_write_string2
MOV [01H],A
MOV A,[00H]
MOV b0_17,A
MOV A,b0_17
MOV __pb,A
#line 560 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,LCD_write_string2
MOV [01H],A
MOV A,[00H]
MOV b0_17,A
MOV A,b0_17
MOV LCD_en_dat0,A
CALL _LCD_en_dat
#line 561 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
INC LCD_write_string2
L135:
#line 557 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
#pragma debug scope 39 1 ; 557 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,LCD_write_string2
MOV [01H],A
MOV A,[00H]
MOV b0_17,A
SZ b0_17
JMP L134
L133:
RET
LOCAL b0_17 DB ?
_LCD_write_string ENDP
#line 566 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
@LCD_init .SECTION 'CODE'
PUBLIC _LCD_init
_LCD_init PROC
#pragma debug scope 41 1 ; 567 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
#line 567 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,01h
MOV LCD_en_command0,A
CALL _LCD_en_command
#line 568 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,038h
MOV LCD_en_command0,A
CALL _LCD_en_command
#line 569 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,0ch
MOV LCD_en_command0,A
CALL _LCD_en_command
#line 570 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,080h
MOV LCD_en_command0,A
CALL _LCD_en_command
#line 571 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,01h
MOV LCD_en_command0,A
CALL _LCD_en_command
L137:
RET
_LCD_init ENDP
#line 576 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
@delay_nms .SECTION 'CODE'
PUBLIC _delay_nms
_delay_nms PROC
#pragma debug scope 42 1
#line 575 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
PUBLIC delay_nms0
LOCAL delay_nms0 DB ? ; n
#pragma debug variable 8 42 delay_nms0 n
#pragma debug scope 42 1 ; 577 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
#line 577 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
CLR CR21
#line 577 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
CLR CR20
#line 578 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,delay_nms0
MOV CR21,A
#line 578 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
JMP L142
L139:
#line 579 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
CLR CR20
#line 579 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
JMP L146
L143:
L144:
#line 579 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
INC CR20
L146:
#line 579 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
MOV A,CR20
MOV b0_19,A
CLR b0_19[1]
MOV A,80h
XOR A,b0_19[1]
SUB A,084h
SNZ [0ah].0
JMP L143
SNZ [0ah].2
JMP L147
MOV A,b0_19
SUB A,074h
SNZ [0ah].0
JMP L143
L147:
L140:
#line 578 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
DEC CR21
L142:
#line 578 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
SZ CR21
JMP L139
L138:
RET
LOCAL b0_19 DB 2 DUP(?)
#line 577 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
LOCAL CR20 DB ? ; j
#pragma debug variable 8 42 CR20 j
#line 577 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
LOCAL CR21 DB ? ; i
#pragma debug variable 8 42 CR21 i
_delay_nms ENDP
PUBLIC _keycnt
@keycnt .SECTION 'DATA'
#line 56 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_keycnt DB 2 DUP (?) ;keycnt
#pragma debug variable 10 1 _keycnt keycnt
PUBLIC _alarmcnt
@alarmcnt .SECTION 'DATA'
#line 53 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_alarmcnt DB 2 DUP (?) ;alarmcnt
#pragma debug variable 10 1 _alarmcnt alarmcnt
PUBLIC _poscnt
@poscnt .SECTION 'DATA'
#line 52 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_poscnt DB ? ; poscnt
#pragma debug variable 8 1 _poscnt poscnt
PUBLIC _loopcnt
@loopcnt .SECTION 'DATA'
#line 51 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_loopcnt DB 2 DUP (?) ;loopcnt
#pragma debug variable 10 1 _loopcnt loopcnt
PUBLIC _DATA_BUF
@DATA_BUF .SECTION 'DATA'
#line 49 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_DATA_BUF DB ? ; DATA_BUF
#pragma debug variable 8 1 _DATA_BUF DATA_BUF
PUBLIC _RecFirChar
@RecFirChar .SECTION 'DATA'
#line 46 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_RecFirChar DB ? ; RecFirChar
#pragma debug variable 8 1 _RecFirChar RecFirChar
PUBLIC _RxBuf
@RxBuf .SECTION 'DATA'
#line 45 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_RxBuf DB 32 DUP (?) ;RxBuf
#pragma debug variable 4 1 _RxBuf RxBuf
PUBLIC _TxBuf
@TxBuf .SECTION 'DATA'
#line 44 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_TxBuf DB 32 DUP (?) ;TxBuf
#pragma debug variable 4 1 _TxBuf TxBuf
BITDATASEC .SECTION 'DATA'
PUBLIC _signstar
#line 57 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_signstar DBIT ; signstar
#pragma debug variable 2 1 _signstar signstar
PUBLIC _IsAlarm
#line 55 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_IsAlarm DBIT ; IsAlarm
#pragma debug variable 2 1 _IsAlarm IsAlarm
PUBLIC _FlagShowAlarm
#line 54 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_FlagShowAlarm DBIT ; FlagShowAlarm
#pragma debug variable 2 1 _FlagShowAlarm FlagShowAlarm
PUBLIC _FlagRec
#line 50 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
_FlagRec DBIT ; FlagRec
#pragma debug variable 2 1 _FlagRec FlagRec
#line 128 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
STARTSEC .SECTION 'CODE'
STARTUP:
@46 .SECTION 'DATA'
L46 DB 6 DUP (?) ;46
@46 .SECTION INPAGE 'CODE'
l_L46:
MOV [06h],A
RET A,32
RET A,32
RET A,32
RET A,32
RET A,32
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L46
MOV [01H],A
MOV A,OFFSET l_L46+1
MOV RH,A
m_L46:
MOV A,RH
CALL l_L46
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L46
@45 .SECTION 'DATA'
L45 DB 6 DUP (?) ;45
@45 .SECTION INPAGE 'CODE'
l_L45:
MOV [06h],A
RET A,65
RET A,99
RET A,107
RET A,32
RET A,32
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L45
MOV [01H],A
MOV A,OFFSET l_L45+1
MOV RH,A
m_L45:
MOV A,RH
CALL l_L45
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L45
@44 .SECTION 'DATA'
L44 DB 6 DUP (?) ;44
@44 .SECTION INPAGE 'CODE'
l_L44:
MOV [06h],A
RET A,65
RET A,108
RET A,97
RET A,114
RET A,109
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L44
MOV [01H],A
MOV A,OFFSET l_L44+1
MOV RH,A
m_L44:
MOV A,RH
CALL l_L44
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L44
@25 .SECTION 'DATA'
L25 DB 13 DUP (?) ;25
@25 .SECTION INPAGE 'CODE'
l_L25:
MOV [06h],A
RET A,32
RET A,67
RET A,97
RET A,114
RET A,32
RET A,80
RET A,97
RET A,114
RET A,116
RET A,110
RET A,101
RET A,114
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L25
MOV [01H],A
MOV A,OFFSET l_L25+1
MOV RH,A
m_L25:
MOV A,RH
CALL l_L25
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L25
@3 .SECTION 'DATA'
L3 DB 7 DUP (?) ;3
@3 .SECTION INPAGE 'CODE'
l_L3:
MOV [06h],A
RET A,32
RET A,82
RET A,101
RET A,97
RET A,100
RET A,121
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L3
MOV [01H],A
MOV A,OFFSET l_L3+1
MOV RH,A
m_L3:
MOV A,RH
CALL l_L3
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L3
@2 .SECTION 'DATA'
L2 DB 15 DUP (?) ;2
@2 .SECTION INPAGE 'CODE'
l_L2:
MOV [06h],A
RET A,32
RET A,32
RET A,32
RET A,67
RET A,97
RET A,114
RET A,32
RET A,80
RET A,97
RET A,114
RET A,116
RET A,110
RET A,101
RET A,114
RET A,0
STARTSEC .SECTION 'CODE'
MOV A,OFFSET L2
MOV [01H],A
MOV A,OFFSET l_L2+1
MOV RH,A
m_L2:
MOV A,RH
CALL l_L2
MOV [00H],A
INC [01H]
INC RH
SZ [05H]
JMP m_L2
RET
EXTERN RH:BYTE
EXTERN __DELAYX0:NEAR
EXTERN __DELAYX1:NEAR
EXTERN __DELAYX2:NEAR
EXTERN __DELAYX3:NEAR
EXTERN __DELAYX4:NEAR
EXTERN __DELAYX5:NEAR
EXTERN __DELAYX6:NEAR
EXTERN __DELAYY0:NEAR
EXTERN __DELAYY1:NEAR
EXTERN __DELAYY2:NEAR
EXTERN __DELAYY3:NEAR
EXTERN __DELAYY4:NEAR
EXTERN __DELAYY5:NEAR
#line 128 "E:\重要！！！\重要！！！\射频通信\2378\HT CAR\RF905\MAIN.C"
@CODE .SECTION AT 0 'CODE'
CALL STARTUP
JMP begin
@DUMMY PROC
CALL _main
@DUMMY ENDP
ROMBANK 0 @DUMMYNOP 
@DUMMYNOP .SECTION AT 0fffh 'CODE'
nop