📄 003.lst
字号:
01A1 268 WR_ZB:
01A1 7434 269 MOV A,#34H
01A3 120211 270 LCALL SEND_I
01A6 E531 271 MOV A,LCD_Y
01A8 120211 272 LCALL SEND_I
01AB E530 273 MOV A,LCD_X
01AD 120211 274 LCALL SEND_I
01B0 7430 275 MOV A,#30H
01B2 120211 276 LCALL SEND_I
01B5 22 277 RET
278
279 ;===============================================
01B6 280 FLASH:
01B6 7408 281 MOV A,#08H ;关闭显示
01B8 120211 282 LCALL SEND_I
01BB 120269 283 LCALL DELAY5
01BE 740C 284 MOV A,#0CH ;开显示,关光标,不闪烁
01C0 120211 285 LCALL SEND_I
01C3 120269 286 LCALL DELAY5
01C6 7408 287 MOV A,#08H ;关闭显示
01C8 120211 288 LCALL SEND_I
01CB 120269 289 LCALL DELAY5
01CE 740C 290 MOV A,#0CH ;开显示,关光标,不闪烁
01D0 120211 291 LCALL SEND_I
01D3 120269 292 LCALL DELAY5
01D6 7408 293 MOV A,#08H ;关闭显示
01D8 120211 294 LCALL SEND_I
01DB 120269 295 LCALL DELAY5
01DE 22 296 RET
297 ;==================================================
298 ;清屏
299 ;==================================================
01DF 300 CLEAR_P:
01DF 7401 301 MOV A,#01H ;清屏
01E1 120211 302 LCALL SEND_I
01E4 7434 303 MOV A,#34H
01E6 120211 304 LCALL SEND_I
01E9 7430 305 MOV A,#30H
01EB 120211 306 LCALL SEND_I
01EE 22 307 RET
308 ;==================================================
309 ;查表取数据送显示
310 ;==================================================
01EF 311 QUSHU:
01EF E4 312 CLR A
01F0 93 313 MOVC A,@A+DPTR ;查表取数据
01F1 120201 314 LCALL SEND_D ;送显示
01F4 A3 315 INC DPTR
316 ;延时80ms,
01F5 D532F7 317 DJNZ COUNT,QUSHU
01F8 22 318 RET
319 ;==================================================
320 ;查表取AD数据送显示
321 ;==================================================
01F9 322 ADSHU:
A51 MACRO ASSEMBLER 003 08/29/2008 18:26:42 PAGE 6
323
01F9 93 324 MOVC A,@A+DPTR ;查表取数据
01FA 120201 325 LCALL SEND_D ;送显示
326
01FD D532F9 327 DJNZ COUNT,ADSHU
0200 22 328 RET
329
330
331
332 ;===============================================
333 ;写数据子程序
334 ;RS=1,RW=0,E=高脉冲,D0-D7=数据
335 ;===============================================
0201 336 SEND_D:
0201 120232 337 LCALL CHK_BUSY ;写数据子程序
0204 D2A0 338 SETB RS
0206 C2A1 339 CLR RW
0208 F590 340 MOV P1,A
020A D2A2 341 SETB E
020C 00 342 NOP
020D 00 343 NOP
020E C2A2 344 CLR E
0210 22 345 RET
346 ;===============================================
347 ;写指令子程序
348 ;RS=0,RW=0,E=高脉冲,D0-D7=指令码
349 ;===============================================
0211 350 SEND_I:
0211 120232 351 LCALL CHK_BUSY
0214 C2A0 352 CLR RS
0216 C2A1 353 CLR RW
0218 F590 354 MOV P1,A
021A D2A2 355 SETB E
021C 00 356 NOP
021D 00 357 NOP
021E C2A2 358 CLR E
0220 22 359 RET
360 ;================================================
361 ;读数据子程序
362 ;RS=1,RW=1,E=H,D0-D7=数据
363 ;================================================
0221 364 READ_D:
0221 120232 365 LCALL CHK_BUSY ;读数据子程序
0224 D2A0 366 SETB RS
0226 D2A1 367 SETB RW
0228 D2A2 368 SETB E
022A 00 369 NOP
022B E590 370 MOV A,P1
022D C2A2 371 CLR E
022F F539 372 MOV STORE,A
0231 22 373 RET
374 ;================================================
375 ;;测忙碌子程序
376 ;RS=0,RW=1,E=H,D0-D7=状态字
377 ;================================================
0232 378 CHK_BUSY:
0232 7590FF 379 MOV P1,#0FFH ;测忙碌子程序
0235 C2A0 380 CLR RS
0237 D2A1 381 SETB RW
0239 D2A2 382 SETB E
023B 2097FD 383 JB P1.7,$
023E C2A2 384 CLR E
0240 22 385 RET
386 ;================================================
387 ;延时子程序
388
A51 MACRO ASSEMBLER 003 08/29/2008 18:26:42 PAGE 7
0241 389 DELAY3:
0241 7D16 390 MOV R5,#16H
0243 7E64 391 DEL31: MOV R6,#100
0245 7FFF 392 DEL32: MOV R7,#0FFH
0247 DFFE 393 DEL33: DJNZ R7,DEL33
0249 DEFA 394 DJNZ R6,DEL32
024B DDF6 395 DJNZ R5,DEL31
024D 22 396 RET
397
024E 398 DELAY2:
024E 7E0C 399 MOV R6,#0CH
0250 7F18 400 DEL21: MOV R7,#18H
0252 DFFE 401 DEL22: DJNZ R7,DEL22
0254 DEFA 402 DJNZ R6,DEL21
0256 22 403 RET
404
0257 405 DELAY1:
0257 7E06 406 MOV R6,#06H
0259 7F08 407 DEL11: MOV R7,#08H
025B DFFE 408 DEL12: DJNZ R7,DEL12
025D DEFA 409 DJNZ R6,DEL11
025F 22 410 RET
411
0260 412 DELAY4:
0260 7E64 413 MOV R6,#100
0262 7FC8 414 DEL41: MOV R7,#200
0264 DFFE 415 DEL42: DJNZ R7,DEL42
0266 DEFA 416 DJNZ R6,DEL41
0268 22 417 RET
418
0269 419 DELAY5:
0269 7D05 420 MOV R5,#05H
026B 7E64 421 DEL51: MOV R6,#100
026D 7FFF 422 DEL52: MOV R7,#0FFH
026F DFFE 423 DEL53: DJNZ R7,DEL53
0271 DEFA 424 DJNZ R6,DEL52
0273 DDF6 425 DJNZ R5,DEL51
0275 22 426 RET
427 ;***********************************************
0276 428 TAB1:
429
0276 D2BABEA7 430 zz1: db '液晶'
027A B5E7D1B9 431 zz2: db '电压'
027E B3CCD0F2 432 zz3: db '程序'
0282 CFD6D4DA 433 zz4: db '现在的电压是 . V'
0286 B5C4B5E7
028A D1B9CAC7
028E 202E2056
434
0292 30313233 435 BM: DB '0123456789'
0296 34353637
029A 3839
436
437
438
439
440
441
442 ;*-------------------------------------------------------------------- *
443 ;* Bitmap点阵数据表 *
444 ;* 图片: E:\图形8.bmp,横向取模左高位,数据排列:从左到右从上到下 *
445 ;* 图片尺寸: 128 * 64 *
446 ;*-------------------------------------------------------------------- *
029C 447 TU_TAB1: ; 数据表
448
029C 00000000 449 DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
A51 MACRO ASSEMBLER 003 08/29/2008 18:26:42 PAGE 8
02A0 00000000
02A4 00000000
02A8 00000000
02AC 00000000 450 DB 00H,00H,00H,00H,00H,00H,14H,00H,00H,00H,00H,00H,00H,00H,00H,00H
02B0 00001400
02B4 00000000
02B8 00000000
02BC 063001E0 451 DB 06H,30H,01H,0E0H,00H,00H,2AH,00H,00H,0D8H,00H,00H,00H,00H,00H,00H
02C0 00002A00
02C4 00D80000
02C8 00000000
02CC 0F7B63E0 452 DB 0FH,7BH,63H,0E0H,00H,00H,22H,00H,01H,24H,00H,00H,00H,00H,00H,00H
02D0 00002200
02D4 01240000
02D8 00000000
02DC 0FFB6307 453 DB 0FH,0FBH,63H,07H,34H,00H,14H,00H,01H,04H,00H,00H,00H,00H,00H,00H
02E0 34001400
02E4 01040000
02E8 00000000
02EC 0DDB6301 454 DB 0DH,0DBH,63H,01H,0BCH,00H,08H,00H,00H,88H,00H,00H,00H,00H,00H,00H
02F0 BC000800
02F4 00880000
02F8 00000000
02FC 0C1B6307 455 DB 0CH,1BH,63H,07H,0B0H,00H,00H,00H,00H,50H,00H,00H,00H,00H,00H,00H
0300 B0000000
0304 00500000
0308 00000000
030C 0C1B63ED 456 DB 0CH,1BH,63H,0EDH,0B0H,0DBH,00H,01H,00H,20H,00H,00H,00H,00H,00H,00H
0310 B0DB0001
0314 00200000
0318 00000000
031C 0C19E1E7 457 DB 0CH,19H,0E1H,0E7H,0B0H,0DBH,00H,02H,00H,00H,00H,00H,00H,00H,00H,00H
0320 B0DB0002
0324 00000000
0328 00000000
032C 0C19E1E7 458 DB 0CH,19H,0E1H,0E7H,0B0H,0DBH,00H,02H,00H,00H,00H,00H,00H,00H,00H,00H
0330 B0DB0002
0334 00000000
0338 00000000
033C 00006000 459 DB 00H,00H,60H,00H,00H,00H,00H,04H,00H,00H,00H,00H,00H,00H,00H,00H
0340 00000004
0344 00000000
0348 00000000
034C 0003C000 460 DB 00H,03H,0C0H,00H,00H,00H,00H,08H,00H,00H,00H,00H,00H,00H,00H,00H
0350 00000008
0354 00000000
0358 00000000
035C 00000000 461 DB 00H,00H,00H,00H,00H,00H,00H,08H,05H,00H,00H,00H,00H,00H,00H,00H
0360 00000008
0364 05000000
0368 00000000
036C 00000000 462 DB 00H,00H,00H,00H,00H,00H,00H,10H,0AH,80H,00H,00H,00H,00H,00H,00H
0370 00000010
0374 0A800000
0378 00000000
037C 00000A00 463 DB 00H,00H,0AH,00H,00H,0FFH,0F8H,0E0H,05H,00H,00H,00H,00H,00H,00H,00H
0380 00FFF8E0
0384 05000000
0388 00000000
038C 06C01500 464 DB 06H,0C0H,15H,00H,1FH,0FFH,0FFH,0C0H,02H,00H,00H,00H,00H,00H,00H,00H
0390 1FFFFFC0
0394 02000000
0398 00000000
039C 09201100 465 DB 09H,20H,11H,00H,0FBH,0FFH,0E1H,0F8H,00H,00H,00H,00H,00H,00H,00H,00H
03A0 FBFFE1F8
03A4 00000000
A51 MACRO ASSEMBLER 003 08/29/2008 18:26:42 PAGE 9
03A8 00000000
03AC 08200A03 466 DB 08H,20H,0AH,03H,9FH,00H,9EH,3EH,00H,00H,00H,00H,00H,00H,00H,00H
03B0 9F009E3E
03B4 00000000
03B8 00000000
03BC 0440040E 467 DB 04H,40H,04H,0EH,70H,00H,81H,0C7H,80H,01H,40H,00H,00H,00H,00H,00H
03C0 700081C7
03C4 80014000
03C8 00000000
03CC 0280001D 468 DB 02H,80H,00H,1DH,80H,00H,0E0H,61H,0E0H,02H,0A0H,00H,00H,00H,00H,00H
03D0 8000E061
03D4 E002A000
03D8 00000000
03DC 01000077 469 DB 01H,00H,00H,77H,9FH,0FCH,0F0H,18H,0F8H,02H,20H,00H,00H,00H,00H,00H
03E0 9FFCF018
03E4 F8022000
03E8 00000000
03EC 000001DF 470 DB 00H,00H,01H,0DFH,00H,00H,0F3H,0CH,3CH,01H,40H,00H,00H,00H,00H,00H
03F0 0000F30C
03F4 3C014000
03F8 00000000
03FC 0000039E 471 DB 00H,00H,03H,9EH,00H,00H,0F8H,06H,1EH,00H,80H,00H,00H,00H,00H,00H
0400 0000F806
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -