📄 4pled-a3.lst
字号:
1 ;*******************************************************************
2 ;The data out to the VFD display
3 ;32 bit
4 ;倒车镜四探头波段数码显示
5 ;新增语音控制：上电初始化后，接收到插入语音控制盒指令（9FH），即设定
6 ; 标记（MARK，ALARM）禁止显示器声音提示。
7 ; ALARM=1 禁止
8 ; ALARM=0 允许
9 ;*******************************************************************
10 0000 F0 EQU 0x00
11 0001 TCC EQU 0x01
12 0002 PC EQU 0x02
13 0003 STATUS EQU 0x03
14 0000 C EQU 0
15 0001 DC EQU 1
16 0002 Z EQU 2
17 0003 T EQU 3
18 0004 P EQU 4
19 0007 GP EQU 7
20 0004 FSR EQU 0x04
21 ;-------------------------------------------------------------------
22 0005 RA EQU 0x05
23 0002 CP EQU 0x02
24 0001 DATA EQU 0x01
25 0003 EN EQU 0x03
26 0000 PXPWO EQU 0x00
27 ;-------------------------------------------------------------------
28 0006 RB EQU 0x06
29 0000 RXD EQU 0x00
30 0001 RCP EQU 0x01
31 0002 M_T EQU 0x02
32 0003 SP EQU 0x03
33 0004 DISP1 EQU 0x04 ;十位显示输出
34 0005 DISP2 EQU 0x05 ;个位显示输出
35 0006 DISP3 EQU 0x06 ;左边显示输出
36 0007 DISP4 EQU 0x07 ;右边显示输出
37 ;-------------------------------------------------------------------
38 0010 COUNT EQU 0x10
39 0011 DATA_A EQU 0x11 ;十位数据
40 0012 DATA_B EQU 0x12 ;个位数据
41 0013 DATA_C EQU 0x13 ;左波段数据
42 0014 DATA_D EQU 0x14 ;右波段数据
43 0015 DOUT_A EQU 0x15 ;十位七段码数据
44 0016 DOUT_B EQU 0x16 ;个位七段码数据
45 0017 DOUT_C EQU 0x17 ;左波段显示数据输出
46 0018 DOUT_D EQU 0x18 ;右波段显示数据输出
47 001F DOUT_S EQU 0x1F
48 0019 T100MS EQU 0x19
49 001A DISP_BIT EQU 0x1A
50 001B T100MST EQU 0x1B
51 001C RXD_SA EQU 0x1C ;接收数据结果寄存器
52 0005 RIG EQU 5
53 0006 LEF EQU 6
54 001D TEMP1 EQU 0x1D
55 001E TEMP2 EQU 0x1E
56 0024 TEMP3 EQU 0x24
57 0020 DP_SA EQU 0x20 ;接收数据处理寄存器
58 0021 DP_SAH EQU 0x21
59 0022 ALARM_TIME EQU 0x22
60 ;T1S_TIME EQU 0x23
61 0025 ALARM_PX EQU 0x25
62 0026 DATA_SA EQU 0x26
63 0023 T_FLASH EQU 0x23 ;图形高位高半字节
64 0029 DP_MARK EQU 0x29
65 0000 RL_SH EQU 0
66 0001 RR_SH EQU 1
67 0002 SH_ENI EQU 2
68
69 ;-------------------距离状态标记------------------------------------
70 ;DISP_M EQU 0x2C
71 0030 DA_RA EQU 0x30
72 0031 DA_RB EQU 0x31
73 0032 DA_RC EQU 0x32
74 0033 DA_RD EQU 0x33
75 0034 DA_FE EQU 0x34
76 0035 DA_FF EQU 0x35
77 0036 DA_FG EQU 0x36
78 0037 DA_FH EQU 0x37
79 ;----------------程序运行标志---------------------------------------
80 002D MARK EQU 0x2D
81 0002 T500MS EQU 0x02
82 0003 EN_OUT EQU 0x03
83 0000 RXDM EQU 0x00
84 0004 ALARM EQU 0x04 ;声音控制, =0 使能 =1 禁止
85 0005 PX_OUT EQU 0x05
86 0007 FLASH EQU 0x07
87 0006 ALA_EN EQU 0x06
88 ;-------------------------------------------------------------------
89 ;中断现场保护
90 ;-------------------------------------------------------------------
91 ;DP_SB EQU 0x30
92 002A D_COUNT EQU 0x2A
93 002B L_COUNT EQU 0x2B
94 002C H_COUNT EQU 0x2C
95 0027 ATTTT EQU 0x27
96 0028 TEMP4 EQU 0x28
97 002F STACK_A EQU 0x2F
98 002E STACK_S EQU 0x2E
99 ;-------------------------------------------------------------------
100 0005 IOC5 EQU 0x05
101 0006 IOC6 EQU 0x06
102 0000 TCIE EQU 0
103 000D IOCD EQU 0x0D
104 000E IOCE EQU 0x0E
105 000F IOCF EQU 0x0F
106 000F RF EQU 0x0F
107 0000 TCIF EQU 0
108 0002 EXIF EQU 2
109 ;***************************************************************
110 ;常数赋值
111 ;显示扫描=100Hz T=10mS BIT=10/4=2.5mS
112 ;---------------------------------------------------------------
113 0002 ALA_ON EQU 2 ;报警开启时间 2T=2*100MS=0.2S
114 00B2 T10MSD EQU 0xB2
115 0002 DOT_TK EQU 2
116 ;---------------------------------------------------------------
117 ORG 0x00
118 00000 14ED JMP MAIN ;Jmp main
119 00001 0000 NOP
120 00002 0000 NOP
121 00003 0000 NOP
122 00004 0000 NOP
123 00005 0000 NOP
124 00006 0000 NOP
125 00007 0000 NOP
126 ORG 0x08
127 00008 1432 JMP INT_START
128 00009 0000 NOP
129 ;-------------------------------------------------------------------
130 ORG 0x0A
131 ;*******************************************************************
132 0000A TAB_A:
133 0000A 1A0F AND A,@0x0F ;-GFEDCBA
134 0000B 03C2 ADD PC,A
135 0000C 1C3F RETL 0x3F
136 0000D 1C06 RETL 0x06
137 0000E 1C5B RETL 0x5B
138 0000F 1C4F RETL 0x4F
139 00010 1C66 RETL 0x66
140 00011 1C6D RETL 0x6D
141 00012 1C7D RETL 0x7D
142 00013 1C07 RETL 0x07
143 00014 1C7F RETL 0x7F
144 00015 1C6F RETL 0x6F
145 00016 1C08 RETL 0x08 ;01011100 40
146 00017 1C00 RETL 0x00
147
148 00018 TAB_RL_D:
149 00018 1A03 AND A,@0x03
150 00019 03C2 ADD PC,A
151 0001A 0000 NOP
152 0001B 1C00 RETL 0x00
153 0001C 1C02 RETL 0x02
154 0001D 1C04 RETL 0x04
155
156
157 0001E TAB_C:
158 0001E 1A07 AND A,@0x07
159 0001F 03C2 ADD PC,A
160 00020 1C00 RETL 0x00 ;00000000
161 00021 1C01 RETL 0x01 ;00000001
162 00022 1C03 RETL 0x03 ;00000011
163 00023 1C07 RETL 0x07 ;00000111
164 00024 1C0F RETL 0x0F ;00001111
165 00025 1C1F RETL 0x1F ;00011111
166 00026 1C3F RETL 0x3F ;00111111
167 00027 1C7F RETL 0x7F ;01111111
168
169 00028 TAB_ARM_TIME:
170 00028 1A07 AND A,@0x07
171 00029 03C2 ADD PC,A
172 0002A 1C0A RETL 0x0A
173 0002B 1C0A RETL 0x0A
174 0002C 1C08 RETL 0x08
175 0002D 1C06 RETL 0x06
176 0002E 1C04 RETL 0x04
177 0002F 1C03 RETL 0x03
178 00030 1C02 RETL 0x02
179 00031 1C01 RETL 0x01
180 ;*********************************************************************
181 00032 INT_START:
182 00032 0C0F JBC RF,TCIF
183 00033 1435 JMP INT_START1
184 00034 14EC JMP ERR_PASS
185 00035 INT_START1:
186 00035 0004 WDTC
187 00036 0011 DISI
188 00037 006F MOV STACK_A,A
189 00038 076F SWAP STACK_A
190 00039 0703 SWAPA STATUS
191 0003A 006E MOV STACK_S,A
192 0003B 18B2 MOV A,@T10MSD
193 0003C 0041 MOV TCC,A
194 0003D 104D CALL DISP_OUT
195 0003E 055B INC T100MST
196 0003F 041B MOV A,T100MST
197 00040 1D28 SUB A,@40
198 00041 0C03 JBC STATUS,C
199 00042 1445 JMP INT_RET
200 00043 00DB CLR T100MST
201 00044 0B6D BS MARK,PX_OUT
202 00045 INT_RET:
203 00045 00CF CLR RF
204 00046 072E SWAPA STACK_S
205 00047 0043 MOV STATUS,A
206 00048 072F SWAPA STACK_A
207 00049 0013 RETI
208 0004A 0000 NOP
209 0004B 0000 NOP
210 0004C 14EC JMP ERR_PASS
211 ;****************************************
212 0004D DISP_OUT:
213 0004D 0406 MOV A,RB
214 0004E 19F0 OR A,@0xF0 ;Close disp out
215 0004F 0046 MOV RB,A
216 00050 0068 MOV TEMP4,A
217
218
219 00051 0D1A JBC DISP_BIT,4
220 00052 0416 MOV A,DOUT_B
221
222 00053 0D5A JBC DISP_BIT,5
223 00054 0415 MOV A,DOUT_A
224
225 00055 0D9A JBC DISP_BIT,6
226 00056 0418 MOV A,DOUT_D
227
228 00057 0DDA JBC DISP_BIT,7
229 00058 0417 MOV A,DOUT_C
230
231 00059 005F MOV DOUT_S,A
232 0005A 09DF BC DOUT_S,7
233 0005B 04DF COM DOUT_S
234 0005C DISP_ENOK:
235 0005C 1808 MOV A,@8
236 0005D 0050 MOV COUNT,A
237 0005E DISP_OUT_LOOP:
238 0005E 0845 BC RA,DATA
239 0005F 0803 BC STATUS,C
240 00060 06DF RLC DOUT_S
241 00061 0C03 JBC STATUS,C
242 00062 0A45 BS RA,DATA
243 00063 0000 NOP
244 00064 0000 NOP
245 00065 0A85 BS RA,CP
246 00066 0000 NOP
247 00067 0000 NOP
248 00068 0885 BC RA,CP
249 00069 0000 NOP
250 0006A 0000 NOP
251 0006B 05D0 DJZ COUNT
252 0006C 145E JMP DISP_OUT_LOOP
253 0006D 0845 BC RA,DATA
254 0006E 180F MOV A,@0x0F
255 0006F 02E8 AND TEMP4,A
256 00070 049A COMA DISP_BIT
257 00071 1AF0 AND A,@0xF0
258 00072 0228 OR A,TEMP4
259 00073 0046 MOV RB,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -