📄 final.lst
字号:
02C4 0202D9 384 JMP BAJO1
02C7 DE30 385 BAJO: DJNZ R6, SALIR
02C9 300605 386 JNB 20H.6, CIS
02CC B2B1 387 CPL PULSO1
02CE 0202D3 388 JMP SER
02D1 B2B0 389 CIS: CPL PULSO
02D3 C3 390 SER: CLR C
02D4 74C8 391 MOV A, #200
02D6 9525 392 SUBB A, 25H
02D8 F9 393 MOV R1, A
02D9 D91E 394 BAJO1: DJNZ R1, SALIR
02DB AE25 395 MOV R6, 25H
02DD 300605 396 JNB 20H.6, CIS1
02E0 B2B1 397 CPL PULSO1
02E2 0202E7 398 JMP SER1
02E5 B2B0 399 CIS1: CPL PULSO
02E7 DC10 400 SER1: DJNZ R4, SALIR
02E9 7C32 401 MOV R4, #50
02EB C28C 402 CLR TR0
02ED 200607 403 JB 20H.6, DE
02F0 D200 404 SETB 20H.0
02F2 D201 405 SETB 20H.1
FINAL PAGE 8
02F4 0202F9 406 JMP SALIR
02F7 C206 407 DE: CLR 20H.6
02F9 32 408 SALIR: RETI
409
410
02FA E521 411 SERVO1: MOV A, 21H
02FC B4170A 412 CJNE A, #23, COM
02FF 7E0D 413 MOV R6, #13
0301 75250D 414 MOV 25H, #13
0304 D28C 415 SETB TR0
0306 02032A 416 JMP SALIR2
0309 B40D17 417 COM: CJNE A, #13, COM2
030C 30810A 418 JNB FOTO2, COM1
030F 7E03 419 MOV R6, #3
0311 752503 420 MOV 25H, #3
0314 D28C 421 SETB TR0
0316 02032A 422 JMP SALIR2
0319 7E0D 423 COM1: MOV R6, #13
031B 75250D 424 MOV 25H, #13
031E D28C 425 SETB TR0
0320 02032A 426 JMP SALIR2
0323 7E0D 427 COM2: MOV R6, #13
0325 75250D 428 MOV 25H, #13
0328 D28C 429 SETB TR0
032A 852125 430 SALIR2: MOV 25H, 21H
032D 32 431 RETI
432
433
032E E523 434 SERVO2: MOV A, 23H
0330 B4170C 435 CJNE A, #23, COM3
0333 30822B 436 JNB FOTO3, SALIR1
0336 7E12 437 MOV R6, #18
0338 752512 438 MOV 25H, #18
033B D28C 439 SETB TR0
033D 80BA 440 JMP SALIR
033F B41215 441 COM3: CJNE A, #18, COM5
0342 308209 442 JNB FOTO3, COM4
0345 7E0D 443 MOV R6, #13
0347 75250D 444 MOV 25H, #13
034A D28C 445 SETB TR0
034C 80AB 446 JMP SALIR
034E 7E17 447 COM4: MOV R6, #23
0350 752517 448 MOV 25H, #23
0353 D28C 449 SETB TR0
0355 80A2 450 JMP SALIR
0357 30839F 451 COM5: JNB FOTO4, SALIR
035A 7E12 452 MOV R6, #18
035C 752512 453 MOV 25H, #18
035F D28C 454 SETB TR0
0361 852523 455 SALIR1: MOV 23H, 25H
0364 32 456 RETI
457
0365 D2B4 458 VERTIN: SETB RS
0367 D2B5 459 SETB E
0369 759020 460 MOV P1,#' '
036C 11FE 461 CALL ESC
036E D2B4 462 SETB RS
0370 759056 463 MOV P1,#'V'
FINAL PAGE 9
0373 11FE 464 CALL ESC
0375 D2B4 465 SETB RS
0377 759045 466 MOV P1,#'E'
037A 11FE 467 CALL ESC
037C D2B4 468 SETB RS
037E 759052 469 MOV P1,#'R'
0381 11FE 470 CALL ESC
0383 D2B4 471 SETB RS
0385 759054 472 MOV P1,#'T'
0388 11FE 473 CALL ESC
038A D2B4 474 SETB RS
038C 759049 475 MOV P1,#'I'
038F 11FE 476 CALL ESC
0391 D2B4 477 SETB RS
0393 759043 478 MOV P1,#'C'
0396 11FE 479 CALL ESC
0398 D2B4 480 SETB RS
039A 759041 481 MOV P1,#'A'
039D 11FE 482 CALL ESC
039F D2B4 483 SETB RS
03A1 75904C 484 MOV P1,#'L'
03A4 11FE 485 CALL ESC
03A6 D2B4 486 SETB RS
03A8 759020 487 MOV P1,#' '
03AB 11FE 488 CALL ESC
03AD 22 489 RET
490
03AE C2B4 491 MANUAL23: CLR RS
03B0 759001 492 MOV P1, #00000001 ;Limpiar Pantalla
03B3 11FE 493 CALL ESC
03B5 D2B4 494 SETB RS
03B7 D2B4 495 SETB RS
03B9 D2B5 496 SETB E
03BB 75904D 497 MOV P1,#'M'
03BE 11FE 498 CALL ESC
03C0 D2B4 499 SETB RS
03C2 759041 500 MOV P1,#'A'
03C5 11FE 501 CALL ESC
03C7 D2B4 502 SETB RS
03C9 75904E 503 MOV P1,#'N'
03CC 11FE 504 CALL ESC
03CE D2B4 505 SETB RS
03D0 759055 506 MOV P1,#'U'
03D3 11FE 507 CALL ESC
03D5 D2B4 508 SETB RS
03D7 759041 509 MOV P1,#'A'
03DA 11FE 510 CALL ESC
03DC D2B4 511 SETB RS
03DE 75904C 512 MOV P1,#'L'
03E1 11FE 513 CALL ESC
03E3 22 514 RET
515
03E4 D2B4 516 NU: SETB RS
03E6 D2B5 517 SETB E
03E8 759020 518 MOV P1,#' '
03EB 11FE 519 CALL ESC
03ED BF000A 520 CJNE R7, #0, N1
03F0 D2B4 521 SETB RS
FINAL PAGE 10
03F2 759030 522 MOV P1,#'0'
03F5 11FE 523 CALL ESC
03F7 02046C 524 JMP SALIRNU
03FA BF010A 525 N1: CJNE R7, #1, N2
03FD D2B4 526 SETB RS
03FF 759031 527 MOV P1,#'1'
0402 11FE 528 CALL ESC
0404 02046C 529 JMP SALIRNU
0407 BF020A 530 N2: CJNE R7, #2, N3
040A D2B4 531 SETB RS
040C 759032 532 MOV P1,#'2'
040F 11FE 533 CALL ESC
0411 02046C 534 JMP SALIRNU
0414 BF030A 535 N3: CJNE R7, #3, N4
0417 D2B4 536 SETB RS
0419 759033 537 MOV P1,#'3'
041C 11FE 538 CALL ESC
041E 02046C 539 JMP SALIRNU
0421 BF040A 540 N4: CJNE R7, #4, N5
0424 D2B4 541 SETB RS
0426 759034 542 MOV P1,#'4'
0429 11FE 543 CALL ESC
042B 02046C 544 JMP SALIRNU
042E BF050A 545 N5: CJNE R7, #5, N6
0431 D2B4 546 SETB RS
0433 759035 547 MOV P1,#'5'
0436 11FE 548 CALL ESC
0438 02046C 549 JMP SALIRNU
043B BF060A 550 N6: CJNE R7, #6, N7
043E D2B4 551 SETB RS
0440 759036 552 MOV P1,#'6'
0443 11FE 553 CALL ESC
0445 02046C 554 JMP SALIRNU
0448 BF070A 555 N7: CJNE R7, #7, N8
044B D2B4 556 SETB RS
044D 759037 557 MOV P1,#'7'
0450 11FE 558 CALL ESC
0452 02046C 559 JMP SALIRNU
0455 BF080A 560 N8: CJNE R7, #8, N9
0458 D2B4 561 SETB RS
045A 759038 562 MOV P1,#'8'
045D 11FE 563 CALL ESC
045F 02046C 564 JMP SALIRNU
0462 BF0907 565 N9: CJNE R7, #9, SALIRNU
0465 D2B4 566 SETB RS
0467 759039 567 MOV P1,#'9'
046A 11FE 568 CALL ESC
046C 22 569 SALIRNU: RET
570
046D D2B4 571 ENTER: SETB RS
046F D2B5 572 SETB E
0471 759020 573 MOV P1,#' '
0474 11FE 574 CALL ESC
0476 D2B4 575 SETB RS
0478 7590AB 576 MOV P1,#'⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -