标题: 电子车牌程序（16×16LED点阵显示） [打印本页]

---

作者: daniu    时间: 2014-12-26 23:40
标题: 电子车牌程序（16×16LED点阵显示）

1. ********************************************************************
   
2. ;16×16LED点阵显示，IC:74HC138×2、74HC595×8、74HC245×1、
   
3. ;CPU:89C2051，晶振：3.579M
   
4. ;********************************************************************
   
5. 
   
6.          SDATA_595  EQU  P1.0   ;串行数据输入，接74HC595的14脚
   
7.          SCLK_595   EQU  P1.1   ;移位时钟脉冲，接74HC595的11脚
   
8.          RCK_595    EQU  P1.2   ;输出锁存器控制脉冲，接74HC595的10脚
   
9.          G_595      EQU  P1.7   ;显示允许控制信号端口，接74HC595的12脚
   
10.          G_74138    EQU  P1.3   ;行驱动片选控制端，接74HC138的4脚
    
11. 
    
12.          SRA        EQU  P1.6   ;接74HC138的A输入端，接74HC138的1脚
    
13.          SRB        EQU  P1.5   ;接74HC138的B输入端，接74HC138的2脚
    
14.          SRC        EQU  P1.4   ;接74HC138的C输入端，接74HC138的3脚
    
15. 
    
16.          SCKZ       EQU  P3.7   ;刹车控显示控制输入端
    
17.          ZZKZ       EQU  P3.5   ;左转弯显示控制输入端
    
18.          YZKZ       EQU  P3.4   ;右转弯显示控制输入端
    
19.          YLKZ       EQU  P3.3   ;预留显示控制输入端
    
20. 
    
21.          ;P3.2                  ;外部中断0
    
22.          ;P3.1                  ;编程口1
    
23.          ;P3.0                  ;编程口0
    
24. 
    
25.          ORG  0000H
    
26.          LJMP  MAIN
    
27.          ORG  0003H         ;外中断0中断程序入口
    
28.          LJMP INT00             ;中断返回
    
29.          ORG  0100H
    
30. 
    
31. ;--------------------------------------------------------------
    
32. ;初始化程序
    
33. ;--------------------------------------------------------------
    
34. MAIN:    MOV  SP,#50H
    
35.          MOV  A,#0FFH
    
36.          MOV  P1,A
    
37.          MOV  P3,A
    
38.          CLR  RCK_595        ;允许输入串行数据
    
39.          SETB EA             ;开总中断允许
    
40.          CLR IT0             ;外部中断低电平触发
    
41.          SETB EX0            ;允许外部中断0
    
42. 
    
43. GGAO:    MOV  R0,#0FFH       ;取码初始指针存入R0
    
44.          MOV  R3,#16         ;每字16组码
    
45. MAN2:    CLR EX0              ;关外部中断
    
46.          SETB G_595
    
47.          MOV  DPTR,#TAB22     ;显示第一个字
    
48.          LCALL SHUJU2
    
49. 
    
50.          MOV  DPTR,#TAB23     ;显示第二个字
    
51.          LCALL SHUJU1
    
52. 
    
53.          MOV  DPTR,#TAB24     ;显示第三个字
    
54.          LCALL SHUJU1
    
55. 
    
56.          MOV  DPTR,#TAB25     ;显示第四个字
    
57.          LCALL SHUJU1
    
58. 
    
59.          LCALL SHAOM          ;开始显示，轮回扫描
    
60.          LCALL DEL1MS         ;延时
    
61.          DJNZ  R3,MAN2        ;是否显示完4个字了
    
62.          SETB EX0             ;开外部中断
    
63.          AJMP GGAO
    
64. ;--------------------------------------------------------------
    
65. ;外部中断处理程序
    
66. ;--------------------------------------------------------------
    
67. INT00:   CLR EA              ;关总中断
    
68.          SETB G_595
    
69. SHACHE:  JB SCKZ,ZUOZH       ;检查是否刹车
    
70.          LCALL DEL1MS
    
71.          JB SCKZ,LPT2
    
72. LPT1:    LCALL MAIN1
    
73.          JNB SCKZ,LPT1       ;检查是否松开刹车开关
    
74.          ;LCALL DEL1MS
    
75.          ;JNB SCKZ,LPT1
    
76.          AJMP LPT2
    
77. 
    
78. ZUOZH:   JB ZZKZ,YUOZH       ;检查是否左转弯
    
79.          LCALL DEL1MS
    
80.          JB ZZKZ,LPT2
    
81. LPT3:    LCALL ZZHX
    
82.          JNB ZZKZ,LPT3       ;检查是否松开左转弯开关
    
83.          ;LCALL DEL1MS
    
84.          ;JNB ZZKZ,LPT3
    
85.          AJMP LPT2
    
86. 
    
87. YUOZH:   JB YZKZ,LPT2        ;检查是否左转弯
    
88.          LCALL DEL1MS
    
89.          JB YZKZ,LPT2
    
90. LPT4:    LCALL YZHX
    
91.          JNB YZKZ,LPT4       ;检查是否松开左转弯开关
    
92.          ;LCALL DEL1MS
    
93.          ;JNB YZKZ,LPT4
    
94.          ;AJMP LPT2
    
95. 
    
96. LPT2:    SETB EA             ;开总中断
    
97.          RETI                ;返回
    
98. 
    
99. ;--------------------------------------------------------------
    
100. ;左转弯显示程序：箭头向左移动然后显示“左转弯”
     
101. ;--------------------------------------------------------------
     
102. ZZHX:    MOV R1,#3           ;轮回显示次数
     
103. ZZHX1:   MOV R2,#12          ;每组文字显示时间
     
104. MAIN14:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
105.          MOV  R3,#16         ;每字16组码
     
106. MAIN15:  SETB G_595
     
107.          MOV  DPTR,#TAB0     ;显示第一个字
     
108.          LCALL SHUJU2
     
109. 
     
110.          MOV  DPTR,#TAB0     ;显示第二个字
     
111.          LCALL SHUJU1
     
112. 
     
113.          MOV  DPTR,#TAB0     ;显示第三个字
     
114.          LCALL SHUJU1
     
115. 
     
116.          MOV  DPTR,#TAB10    ;显示第四个字
     
117.          LCALL SHUJU1
     
118. 
     
119.          LCALL SHAOM         ;开始显示，轮回扫描
     
120.          LCALL DEL1MS        ;延时
     
121.          DJNZ  R3,MAIN15     ;是否显示完4个字了
     
122.          DJNZ  R2,MAIN14
     
123.          SETB G_595          ;关显示
     
124.          ;LCALL DEL1S         ;每组文字延时时间
     
125. 
     
126.          MOV R2,#12          ;每组文字显示时间
     
127. MAIN24:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
128.          MOV  R3,#16         ;每字16组码
     
129. MAIN25:  SETB G_595
     
130.          MOV  DPTR,#TAB0     ;显示第一个字
     
131.          LCALL SHUJU2
     
132. 
     
133.          MOV  DPTR,#TAB0     ;显示第二个字
     
134.          LCALL SHUJU1
     
135. 
     
136.          MOV  DPTR,#TAB10    ;显示第三个字
     
137.          LCALL SHUJU1
     
138. 
     
139.          MOV  DPTR,#TAB0     ;显示第四个字
     
140.          LCALL SHUJU1
     
141. 
     
142.          LCALL SHAOM         ;开始显示，轮回扫描
     
143.          LCALL DEL1MS        ;延时
     
144.          DJNZ  R3,MAIN25     ;是否显示完4个字了
     
145.          DJNZ  R2,MAIN24
     
146.          SETB G_595          ;关显示
     
147.          ;LCALL DEL1S         ;每组文字延时时间
     
148. 
     
149.          MOV R2,#12          ;每组文字显示时间
     
150. MAIN34:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
151.          MOV  R3,#16         ;每字16组码
     
152. MAIN35:  SETB G_595
     
153.          MOV  DPTR,#TAB0     ;显示第一个字
     
154.          LCALL SHUJU2
     
155. 
     
156.          MOV  DPTR,#TAB10    ;显示第二个字
     
157.          LCALL SHUJU1
     
158. 
     
159.          MOV  DPTR,#TAB0     ;显示第三个字
     
160.          LCALL SHUJU1
     
161. 
     
162.          MOV  DPTR,#TAB0     ;显示第四个字
     
163.          LCALL SHUJU1
     
164. 
     
165.          LCALL SHAOM         ;开始显示，轮回扫描
     
166.          LCALL DEL1MS        ;延时
     
167.          DJNZ  R3,MAIN35     ;是否显示完4个字了
     
168.          DJNZ  R2,MAIN34
     
169.          SETB G_595          ;关显示
     
170.          ;LCALL DEL1S         ;每组文字延时时间
     
171. 
     
172.          MOV R2,#12          ;每组文字显示时间
     
173. MAIN44:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
174.          MOV  R3,#16         ;每字16组码
     
175. MAIN45:  SETB G_595
     
176.          MOV  DPTR,#TAB10    ;显示第一个字
     
177.          LCALL SHUJU2
     
178. 
     
179.          MOV  DPTR,#TAB0     ;显示第二个字
     
180.          LCALL SHUJU1
     
181. 
     
182.          MOV  DPTR,#TAB0     ;显示第三个字
     
183.          LCALL SHUJU1
     
184. 
     
185.          MOV  DPTR,#TAB0     ;显示第四个字
     
186.          LCALL SHUJU1
     
187. 
     
188.          LCALL SHAOM         ;开始显示，轮回扫描
     
189.          LCALL DEL1MS        ;延时
     
190.          DJNZ  R3,MAIN45     ;是否显示完4个字了
     
191.          DJNZ  R2,MAIN44
     
192.          SETB G_595          ;关显示
     
193.          ;LCALL DEL1S         ;每组文字延时时间
     
194.          DJNZ R1,ZZHX2
     
195. 
     
196.          MOV R1,#2           ;轮回闪烁显示次数
     
197. ZZHX3:   MOV R2,#40          ;每组文字显示时间
     
198. MAIN54:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
199.          MOV  R3,#16         ;每字16组码
     
200. MAIN55:  SETB G_595
     
201.          MOV  DPTR,#TAB10     ;显示第一个字
     
202.          LCALL SHUJU2
     
203. 
     
204.          MOV  DPTR,#TAB11     ;显示第二个字
     
205.          LCALL SHUJU1
     
206. 
     
207.          MOV  DPTR,#TAB12     ;显示第三个字
     
208.          LCALL SHUJU1
     
209. 
     
210.          MOV  DPTR,#TAB13     ;显示第四个字
     
211.          LCALL SHUJU1
     
212. 
     
213.          LCALL SHAOM         ;开始显示，轮回扫描
     
214.          LCALL DEL1MS        ;延时
     
215.          DJNZ  R3,MAIN55     ;是否显示完4个字了
     
216.          DJNZ  R2,MAIN54
     
217.          SETB G_595          ;关显示
     
218.          LCALL DEL1S         ;每组文字延时时间
     
219.          DJNZ R1,ZZHX3
     
220. 
     
221.          RET
     
222. 
     
223. ZZHX2:   AJMP ZZHX1
     
224. 
     
225. ;--------------------------------------------------------------
     
226. ;右转弯显示程序：箭头向右移动然后显示“右转弯”
     
227. ;--------------------------------------------------------------
     
228. YZHX:    MOV R1,#3           ;轮回显示次数
     
229. YZHX1:   MOV R2,#12          ;每组文字显示时间
     
230. MAIN114: MOV  R0,#0FFH       ;取码初始指针存入R0
     
231.          MOV  R3,#16         ;每字16组码
     
232. MAIN115: SETB G_595
     
233.          MOV  DPTR,#TAB15    ;显示第一个字
     
234.          LCALL SHUJU2
     
235. 
     
236.          MOV  DPTR,#TAB0     ;显示第二个字
     
237.          LCALL SHUJU1
     
238. 
     
239.          MOV  DPTR,#TAB0     ;显示第三个字
     
240.          LCALL SHUJU1
     
241. 
     
242.          MOV  DPTR,#TAB0     ;显示第四个字
     
243.          LCALL SHUJU1
     
244. 
     
245.          LCALL SHAOM         ;开始显示，轮回扫描
     
246.          LCALL DEL1MS        ;延时
     
247.          DJNZ  R3,MAIN115    ;是否显示完4个字了
     
248.          DJNZ  R2,MAIN114
     
249.          SETB G_595          ;关显示
     
250.          ;LCALL DEL1S         ;每组文字延时时间
     
251. 
     
252.          MOV R2,#12          ;每组文字显示时间
     
253. MAIN124:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
254.          MOV  R3,#16         ;每字16组码
     
255. MAIN125:  SETB G_595
     
256.          MOV  DPTR,#TAB0     ;显示第一个字
     
257.          LCALL SHUJU2
     
258. 
     
259.          MOV  DPTR,#TAB15    ;显示第二个字
     
260.          LCALL SHUJU1
     
261. 
     
262.          MOV  DPTR,#TAB0     ;显示第三个字
     
263.          LCALL SHUJU1
     
264. 
     
265.          MOV  DPTR,#TAB0     ;显示第四个字
     
266.          LCALL SHUJU1
     
267. 
     
268.          LCALL SHAOM         ;开始显示，轮回扫描
     
269.          LCALL DEL1MS        ;延时
     
270.          DJNZ  R3,MAIN125     ;是否显示完4个字了
     
271.          DJNZ  R2,MAIN124
     
272.          SETB G_595          ;关显示
     
273.          ;LCALL DEL1S         ;每组文字延时时间
     
274. 
     
275.          MOV R2,#12          ;每组文字显示时间
     
276. MAIN134:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
277.          MOV  R3,#16         ;每字16组码
     
278. MAIN135:  SETB G_595
     
279.          MOV  DPTR,#TAB0     ;显示第一个字
     
280.          LCALL SHUJU2
     
281. 
     
282.          MOV  DPTR,#TAB0     ;显示第二个字
     
283.          LCALL SHUJU1
     
284. 
     
285.          MOV  DPTR,#TAB15    ;显示第三个字
     
286.          LCALL SHUJU1
     
287. 
     
288.          MOV  DPTR,#TAB0     ;显示第四个字
     
289.          LCALL SHUJU1
     
290. 
     
291.          LCALL SHAOM         ;开始显示，轮回扫描
     
292.          LCALL DEL1MS        ;延时
     
293.          DJNZ  R3,MAIN135     ;是否显示完4个字了
     
294.          DJNZ  R2,MAIN134
     
295.          SETB G_595          ;关显示
     
296.          ;LCALL DEL1S         ;每组文字延时时间
     
297. 
     
298.          MOV R2,#12          ;每组文字显示时间
     
299. MAIN144:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
300.          MOV  R3,#16         ;每字16组码
     
301. MAIN145:  SETB G_595
     
302.          MOV  DPTR,#TAB0     ;显示第一个字
     
303.          LCALL SHUJU2
     
304. 
     
305.          MOV  DPTR,#TAB0     ;显示第二个字
     
306.          LCALL SHUJU1
     
307. 
     
308.          MOV  DPTR,#TAB0     ;显示第三个字
     
309.          LCALL SHUJU1
     
310. 
     
311.          MOV  DPTR,#TAB15    ;显示第四个字
     
312.          LCALL SHUJU1
     
313. 
     
314.          LCALL SHAOM         ;开始显示，轮回扫描
     
315.          LCALL DEL1MS        ;延时
     
316.          DJNZ  R3,MAIN145    ;是否显示完4个字了
     
317.          DJNZ  R2,MAIN144
     
318.          SETB G_595          ;关显示
     
319.          ;LCALL DEL1S         ;每组文字延时时间
     
320.          DJNZ R1,YZHX2
     
321. 
     
322.          MOV R1,#2           ;轮回闪烁显示次数
     
323. YZHX3:   MOV R2,#40          ;每组文字显示时间
     
324. MAIN154:  MOV  R0,#0FFH       ;取码初始指针存入R0
     
325.          MOV  R3,#16         ;每字16组码
     
326. MAIN155:  SETB G_595
     
327.          MOV  DPTR,#TAB14     ;显示第一个字
     
328.          LCALL SHUJU2
     
329. 
     
330.          MOV  DPTR,#TAB12     ;显示第二个字
     
331.          LCALL SHUJU1
     
332. 
     
333.          MOV  DPTR,#TAB13     ;显示第三个字
     
334.          LCALL SHUJU1
     
335. 
     
336.          MOV  DPTR,#TAB15     ;显示第四个字
     
337.          LCALL SHUJU1
     
338. 
     
339.          LCALL SHAOM         ;开始显示，轮回扫描
     
340.          LCALL DEL1MS        ;延时
     
341.          DJNZ  R3,MAIN155     ;是否显示完4个字了
     
342.          DJNZ  R2,MAIN154
     
343.          SETB G_595          ;关显示
     
344.          LCALL DEL1S         ;每组文字延时时间
     
345.          DJNZ R1,YZHX3
     
346. 
     
347.          RET
     
348. 
     
349. YZHX2:   AJMP YZHX1
     
350. ;--------------------------------------------------------------
     
351. ;刹车显示程序
     
352. ;--------------------------------------------------------------
     
353. ;显示第一组文字
     
354. MAIN1:   MOV R2,#70          ;每组文字显示时间
     
355. MAIN2:   MOV  R0,#0FFH       ;取码初始指针存入R0
     
356.          MOV  R3,#16         ;每字16组码
     
357. MAIN3:   SETB G_595
     
358.          MOV  DPTR,#TAB1     ;显示第一个字
     
359.          LCALL SHUJU2
     
360.          LCALL SHAOM         ;开始显示，轮回扫描
     
361.          LCALL DEL1MS        ;延时
     
362.          DJNZ  R3,MAIN3      ;是否显示完4个字了
     
363.          DJNZ  R2,MAIN2
     
364.          SETB G_595          ;关显示
     
365.          LCALL DEL1S         ;每组文字延时时间
     
366. 
     
367. ;显示第二组文字
     
368.          MOV R2,#70          ;每组文字显示时间
     
369. MAIN4:   MOV  R0,#0FFH       ;取码初始指针存入R0
     
370.          MOV  R3,#16         ;每字16组码
     
371. MAIN5:   SETB G_595
     
372.          MOV  DPTR,#TAB2     ;显示第一个字
     
373.          LCALL SHUJU2
     
374. 
     
375.          MOV  DPTR,#TAB3     ;显示第二个字
     
376.          LCALL SHUJU1
     
377. 
     
378.          MOV  DPTR,#TAB4     ;显示第三个字
     
379.          LCALL SHUJU1
     
380. 
     
381.          MOV  DPTR,#TAB5     ;显示第四个字
     
382.          LCALL SHUJU1
     
383. 
     
384.          LCALL SHAOM         ;开始显示，轮回扫描
     
385.          LCALL DEL1MS        ;延时
     
386.          DJNZ  R3,MAIN5      ;是否显示完4个字了
     
387.          DJNZ  R2,MAIN4
     
388.          SETB G_595          ;关显示
     
389.          LCALL DEL1S         ;每组文字延时时间
     
390. 
     
391. ;显示第三组文字
     
392.          MOV R2,#70          ;每组文字显示时间
     
393. MAIN6:   MOV  R0,#0FFH       ;取码初始指针存入R0
     
394.          MOV  R3,#16         ;每字16组码
     
395. MAIN7:   SETB G_595
     
396.          MOV  DPTR,#TAB6     ;显示第一个字
     
397.          LCALL SHUJU2
     
398. 
     
399.          MOV  DPTR,#TAB7     ;显示第二个字
     
400.          LCALL SHUJU1
     
401. 
     
402.          MOV  DPTR,#TAB3     ;显示第三个字
     
403.          LCALL SHUJU1
     
404. 
     
405.          MOV  DPTR,#TAB9     ;显示第四个字
     
406.          LCALL SHUJU1
     
407. 
     
408.          LCALL SHAOM         ;开始显示，轮回扫描
     
409.          LCALL DEL1MS        ;延时
     
410.          DJNZ  R3,MAIN7      ;是否显示完4个字了
     
411.          DJNZ  R2,MAIN6
     
412.          SETB G_595          ;关显示
     
413.          LCALL DEL1S         ;每组文字延时时间
     
414. 
     
415.          RET
     
416.         
     
417. ;--------------------------------------------------------------
     
418. ;文字代码输入74HC595
     
419. ;--------------------------------------------------------------
     
420. SHUJU1:  DEC R0
     
421.          DEC R0
     
422. SHUJU2:  INC R0
     
423.          MOV  A,R0           ;文字右半边取码
     
424.          MOVC  A,@A+DPTR
     
425.          LCALL  WR_595
     
426.          INC R0
     
427.          MOV  A,R0           ;文字右半边取码
     
428.          MOVC  A,@A+DPTR
     
429.          LCALL  WR_595
     
430.          RET
     
431. ;--------------------------------------------------------------
     
432. ;移位寄存器接收数据子程序
     
433. ;--------------------------------------------------------------
     
434. WR_595:  MOV R4,#08H         ;每半边为8位数据
     
435.          CLR C
     
436. WR_LOOP: RLC A
     
437.          MOV SDATA_595,C     ;输入串行数据
     
438.          SETB SCLK_595       ;上升沿发生移位
     
439.          NOP
     
440.          NOP
     
441.          NOP
     
442.          NOP
     
443.          CLR SCLK_595
     
444.          DJNZ R4,WR_LOOP
     
445.          RET
     
446. ;--------------------------------------------------------------
     
447. ;延时子程序
     
448. ;--------------------------------------------------------------
     
449. DEL1MS:  MOV  R6,#5
     
450. DEL1MS1: MOV  R7,#140        ;延时1ms
     
451.          DJNZ  R7,$
     
452.          DJNZ  R6,DEL1MS1
     
453.          RET
     
454. 
     
455. DEL1S:   MOV  R5,#10
     
456. DEL1S1:  MOV  R6,#255
     
457. DEL1S2:  MOV  R7,#255        ;延时1s
     
458.          DJNZ  R7,$
     
459.          DJNZ  R6,DEL1S2
     
460.          DJNZ  R5,DEL1S1
     
461.          RET
     
462. ;--------------------------------------------------------------
     
463. ;扫描显示
     
464. ;--------------------------------------------------------------
     
465. SHAOM:   SETB  RCK_595       ;上升沿将数据送到输出锁存器
     
466.          NOP
     
467.          NOP
     
468.          CLR  RCK_595        ;恢复低电平
     
469. 
     
470. ;右半边，由上端扫描到下边
     
471.          CJNE R3,#16,L1
     
472.          CLR SRA
     
473.          CLR SRB
     
474.          CLR SRC
     
475.          AJMP L10
     
476. 
     
477. L1:      CJNE R3,#15,L2
     
478.          SETB SRA
     
479.          CLR SRB
     
480.          CLR SRC
     
481.          AJMP L10
     
482. 
     
483. L2:      CJNE R3,#14,L3
     
484.          CLR SRA
     
485.          SETB SRB
     
486.          CLR SRC
     
487.          AJMP L10
     
488. 
     
489. L3:      CJNE R3,#13,L4
     
490.          SETB SRA
     
491.          SETB SRB
     
492.          CLR SRC
     
493.          AJMP L10
     
494. 
     
495. L4:      CJNE R3,#12,L5
     
496.          CLR SRA
     
497.          CLR SRB
     
498.          SETB SRC
     
499.          AJMP L10
     
500. 
     
501. L5:      CJNE R3,#11,L6
     
502.          SETB SRA
     
503.          CLR SRB
     
504.          SETB SRC
     
505.          AJMP L10
     
506. 
     
507. L6:      CJNE R3,#10,L7
     
508.          CLR SRA
     
509.          SETB SRB
     
510.          SETB SRC
     
511.          AJMP L10
     
512. 
     
513. L7:      CJNE R3,#9,L9
     
514.          SETB SRA
     
515.          SETB SRB
     
516.          SETB SRC
     
517.          AJMP L10
     
518. 
     
519. ;左半边，由上端扫描到下边
     
520. L9:      CJNE R3,#8,L11
     
521.          CLR SRA
     
522.          CLR SRB
     
523.          CLR SRC
     
524.          AJMP L8
     
525. 
     
526. L11:     CJNE R3,#7,L12
     
527.          SETB SRA
     
528.          CLR SRB
     
529.          CLR SRC
     
530.          AJMP L8
     
531. 
     
532. L12:     CJNE R3,#6,L13
     
533.          CLR SRA
     
534.          SETB SRB
     
535.          CLR SRC
     
536.          AJMP L8
     
537. 
     
538. L13:     CJNE R3,#5,L14
     
539.          SETB SRA
     
540.          SETB SRB
     
541.          CLR SRC
     
542.          AJMP L8
     
543. 
     
544. L14:     CJNE R3,#4,L15
     
545.          CLR SRA
     
546.          CLR SRB
     
547.          SETB SRC
     
548.          AJMP L8
     
549. 
     
550. L15:     CJNE R3,#3,L16
     
551.          SETB SRA
     
552.          CLR SRB
     
553.          SETB SRC
     
554.          AJMP L8
     
555. 
     
556. L16:     CJNE R3,#2,L17
     
557.          CLR SRA
     
558.          SETB SRB
     
559.          SETB SRC
     
560.          AJMP L8
     
561. 
     
562. L17:     CJNE R3,#1,L10
     
563.          SETB SRA
     
564.          SETB SRB
     
565.          SETB SRC
     
566. 
     
567. L8:      SETB G_74138           ;显示文字左半边
     
568.          SJMP L18
     
569. L10:     CLR G_74138            ;显示文字右半边
     
570. L18:     CLR G_595              ;打开整体显示开关
     
571.          RET
     
572. 
     
573. ;--------------------------------------------------------------
     
574. ;文字数据表
     
575. ;--------------------------------------------------------------
     
576. TAB0:                      ;全灭
     
577. DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
     
578. DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
     
579. 
     
580. TAB1:                      ;全亮
     
581. DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
     
582. DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
     
583. 
     
584. TAB2:                      ;刹
     
585. DB 0DFH,07BH,0EEH,07BH,0F5H,0DBH,0FBH,0DBH,0F5H,0DBH,0EEH,05BH,09BH,05BH,0FBH,0DBH
     
586. DB 00H,01BH,0FBH,0DBH,0EAH,0DBH,0EBH,07BH,0DBH,07BH,0BBH,0FBH,0EBH,0EBH,0F7H,0F7H
     
587. 
     
588. TAB3:                      ;车
     
589. DB 0FDH,0FFH,0FDH,0F7H,080H,03H,0FBH,0FFH,0F6H,0FFH,0EEH,0FFH,0DEH,0DFH,0C0H,0FH
     
590. DB 0FEH,0FFH,0FEH,0FBH,00H,01H,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH
     
591. 
     
592. TAB4:                      ;注
     
593. DB 0FFH,07FH,0BFH,0BFH,0CFH,0BBH,0E8H,01H,07FH,0BFH,09FH,0BFH,0DFH,0BFH,0F7H,0B7H
     
594. DB 0E8H,03H,0DFH,0BFH,01FH,0BFH,0DFH,0BFH,0DFH,0BFH,0DFH,0BBH,0D0H,01H,0DFH,0FFH
     
595. 
     
596. TAB5:                      ;意
     
597. DB 0FEH,0EFH,0C0H,07H,0F7H,0DFH,0FBH,0BBH,00H,01H,0FFH,0EFH,0E0H,07H,0EFH,0EFH
     
598. DB 0E0H,0FH,0EFH,0EFH,0E0H,0FH,0FDH,0FFH,0AEH,07BH,0AFH,06DH,06FH,0EDH,0F0H,0FH
     
599. 
     
600. TAB6:                      ;保
     
601. DB 0F7H,0F7H,0F4H,03H,0F5H,0F7H,0EDH,0F7H,0EDH,0F7H,0CCH,07H,0CDH,0BFH,0AFH,0BBH
     
602. DB 060H,01H,0EFH,0BFH,0EFH,01FH,0EEH,0AFH,0EDH,0B7H,0EBH,0B1H,0E7H,0BBH,0EFH,0BFH
     
603. 
     
604. TAB7:                      ;持
     
605. DB 0EFH,0BFH,0EFH,0BFH,0EFH,0AFH,0ECH,07H,03H,0BFH,0EFH,0B7H,0E8H,03H,0E7H,0EFH
     
606. DB 0CFH,0EBH,028H,01H,0EDH,0EFH,0EEH,0EFH,0EEH,0EFH,0EFH,0EFH,0AFH,0AFH,0DFH,0DFH
     
607. 
     
608. ;TAB8:                      ;车
     
609. ;DB 0FDH,0FFH,0FDH,0F7H,080H,03H,0FBH,0FFH,0F6H,0FFH,0EEH,0FFH,0DEH,0DFH,0C0H,0FH
     
610. ;DB 0FEH,0FFH,0FEH,0FBH,00H,01H,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH
     
611. 
     
612. TAB9:                      ;距
     
613. DB 0FFH,0F7H,082H,03H,0BAH,0FFH,0BAH,0FFH,0BAH,0F7H,082H,03H,0EEH,0F7H,0EEH,0F7H
     
614. DB 0AEH,0F7H,0A2H,07H,0AEH,0F7H,0AEH,0FFH,0A2H,0FFH,0EH,0FBH,0BEH,01H,0FFH,0FFH
     
615. 
     
616. TAB10:                     ;←
     
617. DB 0FEH,7FH,0FCH,7FH,0F8H,7FH,0F0H,7FH,0E0H,00H,0C0H,00H,80H,00H,00H,00H,
     
618. DB 00H,00H,80H,00H,0C0H,00H,0E0H,00H,0F0H,7FH,0F8H,7FH,0FCH,7FH,0FEH,7FH,
     
619. 
     
620. TAB11:                     ;左
     
621. DB 0FDH,0FFH,0FDH,0FFH,0FDH,0F7H,00H,03H,0FBH,0FFH,0FBH,0FFH,0FBH,0FFH,0F7H,0EFH,
     
622. DB 0F0H,07H,0EFH,07FH,0EFH,07FH,0DFH,07FH,0BFH,07FH,07FH,07BH,080H,01H,0FFH,0FFH
     
623. 
     
624. TAB12:                     ;转
     
625. DB 0EFH,0BFH,0EFH,0BFH,0EFH,0B7H,02H,03H,0DFH,0BFH,0D7H,0BBH,0B4H,01H,083H,07FH,
     
626. DB 0F7H,07FH,0F6H,03H,0E3H,0F7H,017H,0EFH,0B7H,06FH,0F7H,09FH,0F7H,0DFH,0F7H,0EFH
     
627. 
     
628. TAB13:                     ;弯
     
629. DB 0FEH,0FBH,00H,01H,0FBH,0BFH,0EBH,0AFH,0CBH,0B3H,0BBH,0BBH,0C0H,0FH,0FFH,0EFH,
     
630. DB 0E0H,0FH,0EFH,0FFH,0E0H,07H,0FFH,0F7H,0FFH,0F7H,0FFH,077H,0FFH,0AFH,0FFH,0DFH
     
631. 
     
632. TAB14:                     ;右
     
633. DB 0FDH,0FFH,0FDH,0FFH,0FDH,0FBH,00H,01H,0FBH,0FFH,0FBH,0FFH,0F7H,0FFH,0F7H,0F7H,
     
634. DB 0E0H,03H,0D7H,0F7H,0B7H,0F7H,077H,0F7H,0F7H,0F7H,0F7H,0F7H,0F0H,07H,0F7H,0F7H
     
635. 
     
636. TAB15:                     ;→
     
637. DB 0FEH,7FH,0FEH,3FH,0FEH,1FH,0FEH,0FH,00H,07H,00H,03H,00H,01H,00H,00H,
     
638. DB 00H,00H,00H,01H,00H,03H,00H,07H,0FEH,0FH,0FEH,1FH,0FEH,3FH,0FEH,7FH,
     
639. 
     
640. TAB16:                     ;益
     
641. DB 0F7H,0DFH,0FBH,0BFH,0FFH,0F7H,080H,03H,0FFH,0FFH,0FBH,0BFH,0F7H,0CFH,0EFH,0EFH,
     
642. DB 0FFH,0FFH,0C0H,07H,0DBH,0B7H,0DBH,0B7H,0DBH,0B7H,0DBH,0B7H,00H,01H,0FFH,0FFH
     
643. 
     
644. TAB17:                     ;美
     
645. DB 0F7H,0DFH,0F9H,09FH,0FDH,077H,080H,03H,0FEH,0FFH,0C0H,07H,0FEH,0FFH,00H,01H,
     
646. DB 0FEH,0FFH,0FEH,0F7H,080H,03H,0FEH,0FFH,0FDH,07FH,0FBH,09FH,0E7H,0E1H,01FH,0FBH
     
647. 
     
648. TAB18:                     ;汽
     
649. DB 0FDH,0FFH,0BDH,0F7H,0CCH,03H,0EBH,0FFH,078H,07H,097H,0FFH,0D8H,0FH,0FFH,0EFH,
     
650. DB 0EFH,0EFH,0DFH,0EFH,01FH,0EFH,0DFH,0EFH,0DFH,0EFH,0DFH,0F5H,0DFH,0F5H,0DFH,0F9H
     
651. 
     
652. ;TAB19:                     ;车
     
653. ;DB 0FDH,0FFH,0FDH,0F7H,080H,03H,0FBH,0FFH,0F6H,0FFH,0EEH,0FFH,0DEH,0DFH,0C0H,0FH
     
654. ;DB 0FEH,0FFH,0FEH,0FBH,00H,01H,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH,0FEH,0FFH
     
655. 
     
656. TAB20:                     ;音
     
657. DB 0FDH,0FFH,0FEH,0EFH,0C0H,07H,0F7H,0DFH,0FBH,0DFH,0FBH,0BBH,00H,01H,0FFH,0EFH,
     
658. DB 0E0H,07H,0EFH,0EFH,0EFH,0EFH,0E0H,0FH,0EFH,0EFH,0EFH,0EFH,0E0H,0FH,0EFH,0EFH
     
659. 
     
660. TAB21:                     ;响
     
661. DB 0FFH,0DFH,0F7H,0BFH,083H,07BH,0B4H,01H,0B5H,0FBH,0B5H,0FBH,0B5H,0BH,0B5H,06BH,
     
662. DB 0B5H,06BH,0B5H,06BH,0B5H,06BH,085H,0BH,0B5H,0FBH,0FDH,0FBH,0FDH,0EBH,0FDH,0F7H
     
663. 
     
664. TAB22:                     ;桂
     
665. DB 0EFH,0BFH,0EFH,0BFH,0EFH,0B7H,0ECH,03H,03H,0BFH,0EFH,0BBH,0C8H,01H,0C7H,0BFH,
     
666. DB 0ABH,0BFH,0AFH,0B7H,06CH,03H,0EFH,0BFH,0EFH,0BFH,0EFH,0BBH,0E0H,01H,0EFH,0FFH
     
667. 
     
668. TAB23:                     ;GK
     
669. DB 0FFH,0FFH,0C3H,0BFH,99H,0BDH,0BDH,0BBH,0BDH,0B7H,0BFH,0AFH,0BFH,9FH,0BFH,0BFH,
     
670. DB 0B1H,0BFH,0BDH,0BFH,0BDH,9FH,0BDH,0AFH,0BDH,0B7H,99H,0BBH,0C5H,0BDH,0FFH,0FFH,
     
671. 
     
672. TAB24:                     ;62
     
673. DB 0FFH,0FFH,0C3H,0C3H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BFH,0FDH,0BFH,0FDH,
     
674. DB 0A3H,0C3H,9DH,0BFH,0BDH,0BFH,0BDH,0BFH,0BDH,0BFH,0BDH,0BFH,0C3H,81H,0FFH,0FFH,
     
675. ;DB 0FFH,0FFH,0C3H,0C3H,99H,99H,0BDH,0BDH,0BDH,0BDH,0BFH,0FDH,0BFH,0FDH,0A3H,0F9H,
     
676. ;DB 9DH,0C3H,0BDH,0BFH,0BDH,0BFH,0BDH,0BFH,0BDH,0BFH,99H,0BDH,0C3H,81H,0FFH,0FFH,
     
677. 
     
678. TAB25:                     ;88
     
679. DB 0FFH,0FFH,0C3H,0C3H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0C3H,0C3H,
     
680. DB 0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0C3H,0C3H,0FFH,0FFH,
     
681. ;DB 0FFH,0FFH,0C3H,0C3H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0C3H,0C3H,
     
682. ;DB 0C3H,0C3H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,0C3H,0C3H,0FFH,0FFH,
     
683. ;DB 0FFH,0FFH,0C3H,0C3H,99H,99H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,99H,99H,0C3H,0C3H,
     
684. ;DB 0C3H,0C3H,99H,99H,0BDH,0BDH,0BDH,0BDH,0BDH,0BDH,99H,99H,0C3H,0C3H,0FFH,0FFH,
     
685. 
     
686. 
     
687.        END

复制代码

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1