📄 lichengbiao.lst
字号:
227 01DA 12013A LCALL AT2401W
228 01DD 755000 MOV 50H,#00H
8051 Assembler Version 1.00 12/28/108 13:46:38 Page 5
C:\Documents and Settings\Administrator\桌面\新建文件夹 (2)\蒋富强\lichengbiao.a51
229 01E0 755122 MOV 51H,#22H
230 01E3 AD62 MOV R5,DATE3
231 01E5 12013A LCALL AT2401W
232 01E8 755000 MOV 50H,#00H
233 01EB 755123 MOV 51H,#23H
234 01EE AD63 MOV R5,DATE4
235 01F0 12013A LCALL AT2401W
236 01F3 22 RET
237 01F4 ;*************************************************************
238 01F4 ;在LCD显示的子程序
239 01F4 ;*************************************************************
240 01F4 9002D8 LCDXS: MOV DPTR,#TAB2 ;在LCD上写入MILE：字符
241 01F7 7A80 MOV R2,#80H
242 01F9 515D ACALL WRLCD
243 01FB 757806 MOV DATEN,#6
244 01FE 5181 ACALL WRN
245 0200
246 0200
247 0200 7A8C MOV R2,#8CH ;在LCD上写入里程数
248 0202 515D ACALL WRLCD
249 0204 9002CE MOV DPTR,#TAB1
250 0207 E563 MOV A,DATE4
251 0209 93 MOVC A,@A+DPTR
252 020A F579 MOV DATE,A
253 020C 5171 ACALL WRDATE
254 020E
255 020E 7A8D MOV R2,#8DH
256 0210 515D ACALL WRLCD
257 0212 E562 MOV A,DATE3
258 0214 93 MOVC A,@A+DPTR
259 0215 F579 MOV DATE,A
260 0217 5171 ACALL WRDATE
261 0219
262 0219 7A8E MOV R2,#8EH
263 021B 515D ACALL WRLCD
264 021D E561 MOV A,DATE2
265 021F 93 MOVC A,@A+DPTR
266 0220 F579 MOV DATE,A
267 0222 5171 ACALL WRDATE
268 0224
269 0224 7A8F MOV R2,#8FH
270 0226 515D ACALL WRLCD
271 0228 E560 MOV A,DATE1
272 022A 93 MOVC A,@A+DPTR
273 022B F579 MOV DATE,A
274 022D 5171 ACALL WRDATE
275 022F
276 022F 9002DE MOV DPTR,#TAB3 ;在LCD上写入DIAMETER：字符
277 0232 7AC0 MOV R2,#0C0H
278 0234 515D ACALL WRLCD
279 0236 757809 MOV DATEN,#9
280 0239 5181 ACALL WRN
281 023B
282 023B 7ACC MOV R2,#0CCH ;在LCD上写入直径
283 023D 515D ACALL WRLCD
284 023F 9002CE MOV DPTR,#TAB1
285 0242 E570 MOV A,70H
8051 Assembler Version 1.00 12/28/108 13:46:38 Page 6
C:\Documents and Settings\Administrator\桌面\新建文件夹 (2)\蒋富强\lichengbiao.a51
286 0244 93 MOVC A,@A+DPTR
287 0245 F579 MOV DATE,A
288 0247 5171 ACALL WRDATE
289 0249
290 0249 51C5 ACALL DELAY50MS
291 024B 22 RET
292 024C
293 024C ;*********************************************************
294 024C ;LCD显示程序初始化
295 024C ;*********************************************************
296 024C 7A01 LCDINT: MOV R2,#01H
297 024E 515D ACALL WRLCD
298 0250 7A3C MOV R2,#3CH
299 0252 515D ACALL WRLCD
300 0254 7A06 MOV R2,#06H
301 0256 515D ACALL WRLCD
302 0258 7A0C MOV R2,#0CH
303 025A 515D ACALL WRLCD
304 025C 22 RET
305 025D ;********************************************************
306 025D ;写命令的子程序，R2中存放要写入的命令
307 025D ;********************************************************
308 025D 518C WRLCD: ACALL BUSY
309 025F C0E0 PUSH ACC
310 0261 EA MOV A,R2
311 0262 C2A0 CLR RS
312 0264 C2A1 CLR RW
313 0266 F580 MOV P0,A
314 0268 C2A2 CLR E
315 026A 51AE ACALL DELAY
316 026C D2A2 SETB E
317 026E D0E0 POP ACC
318 0270 22 RET
319 0271 ;********************************************************
320 0271 ;写一位字符数据子程序，DATE中存放要写入的数据
321 0271 ;********************************************************
322 0271 518C WRDATE:ACALL BUSY
323 0273 D2A0 SETB RS
324 0275 C2A1 CLR RW
325 0277 857980 MOV P0,DATE
326 027A C2A2 CLR E
327 027C 51AE ACALL DELAY
328 027E D2A2 SETB E
329 0280 22 RET
330 0281 ;********************************************************
331 0281 ;写入LCD表示字符
332 0281 ;********************************************************
333 0281 E4 WRN: CLR A
334 0282 93 MOVC A,@A+DPTR
335 0283 A3 INC DPTR
336 0284 F579 MOV DATE,A
337 0286 5171 ACALL WRDATE
338 0288 D578F6 DJNZ DATEN,WRN
339 028B 22 RET
340 028C ;********************************************************
341 028C ;查询忙碌子程序
342 028C ;********************************************************
8051 Assembler Version 1.00 12/28/108 13:46:38 Page 7
C:\Documents and Settings\Administrator\桌面\新建文件夹 (2)\蒋富强\lichengbiao.a51
343 028C C2A0 BUSY: CLR RS
344 028E D2A1 SETB RW
345 0290 E580 MOV A,P0
346 0292 C2A2 CLR E
347 0294 51AE ACALL DELAY
348 0296 D2A2 SETB E
349 0298 20E7F1 JB ACC.7,BUSY
350 029B 22 RET
351 029C ;*********************************************************
352 029C ;将R0中存放的里程数据分解分个、十、百位
353 029C ;*********************************************************
354 029C E8 COV: MOV A,R0
355 029D 75F00A MOV B,#10
356 02A0 84 DIV AB
357 02A1 85F062 MOV DATE3,B
358 02A4 75F00A MOV B,#10
359 02A7 84 DIV AB
360 02A8 85F061 MOV DATE2,B
361 02AB F560 MOV DATE1,A
362 02AD 22 RET
363 02AE ;*********************************************************
364 02AE ;延时子程序
365 02AE ;*********************************************************
366 02AE 7E10 DELAY: MOV R6,#10H
367 02B0 7DFF D1: MOV R5,#0FFH
368 02B2 DDFE DJNZ R5,$
369 02B4 DEFA DJNZ R6,D1
370 02B6 22 RET
371 02B7 ;**********************************************************
372 02B7 ;延时子程序
373 02B7 ;**********************************************************
374 02B7 7A05 D1MS: MOV R2,#5 ;延时1ms子程序
375 02B9 7B64 D1MS1: MOV R3,#100
376 02BB DBFE D1MS2: DJNZ R3,D1MS2
377 02BD DAFA DJNZ R2,D1MS1
378 02BF 22 RET
379 02C0
380 02C0 7B07 D15US: MOV R3,#7 ;延时1us子程序
381 02C2 DBFE D12US1:DJNZ R3,D12US1
382 02C4 22 RET
383 02C5
384 02C5 7FC8 DELAY50MS:MOV R7,#200 ;延时50ms子程序
385 02C7 7E7D DELAY50MS1:MOV R6,#125
386 02C9 DEFE DELAY50MS2:DJNZ R6,DELAY50MS2
387 02CB DFFA DJNZ R7,DELAY50MS1
388 02CD 22 RET
389 02CE
390 02CE 30 31 32 TAB1: DB '0123456789'
02D1 33 34 35
02D4 36 37 38
02D7 39
391 02D8 4D 49 4C TAB2: DB 'MILES:'
02DB 45 53 3A
392 02DE 44 49 41TAB3: DB 'DIAMETER:'
02E1 4D 45 54
02E4 45 52 3A
393 02E7 END
8051 Assembler Version 1.00 12/28/108 13:46:38 Page 8
C:\Documents and Settings\Administrator\桌面\新建文件夹 (2)\蒋富强\lichengbiao.a51
Defined Symbols:
DATE 000079 121
DATE1 000060 96
DATE2 000061 97
DATE3 000062 98
DATE4 000063 99
DATEN 000078 120
E 0000A2 162
RS 0000A0 160
RW 0000A1 161
SCL 0000B0 176
SDA 0000B1 177
Defined Labels:
AT2401RC 000087 135
AT2401W 00013A 314
BACKM 00007E 126
BUSY 00028C 652
COV 00029C 668
D1 0002B0 688
D12US1 0002C2 706
D15US 0002C0 704
D1MS 0002B7 695
D1MS1 0002B9 697
D1MS2 0002BB 699
DELAY 0002AE 686
DELAY50MS 0002C5 709
DELAY50MS1 0002C7 711
DELAY50MS2 0002C9 713
DUSHU 000043 67
HERE 0000BF 191
JIESHU 0001C7 455
JISHU 00017D 381
JISHUAN 0000CD 205
LCDINT 00024C 588
LCDXS 0001F4 500
MAIN 000030 48
QINLING 0000AE 174
R2READ 0000EF 239
R2RLOP1 0000F3 243
R2SEND 00010E 270
R2SLOP1 000113 275
R2SLOP2 00012C 300
R2STAR 00015E 350
R2STOP 000170 368
TAB1 0002CE 718
TAB2 0002D8 728
TAB3 0002DE 734
WRDATE 000271 625
WRLCD 00025D 605
WRN 000281 641
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -