📄 s52wnl.lst
字号:
044B 200E08 536 JB 0EH,GFLASH6
044E 75750F 537 MOV 75H,#0FH
0451 75740F 538 MOV 74H,#0FH
0454 811D 539 AJMP GFLASHOUT
0456 540 GFLASH6:
0456 75730F 541 MOV 73H,#0FH
0459 75720F 542 MOV 72H,#0FH
045C 811D 543 AJMP GFLASHOUT
544
545
546
045E 547 ADD1:
045E EF 548 MOV A,R7
045F 2401 549 ADD A,#1
0461 D4 550 DA A
0462 22 551 RET
552
0463 553 JIAN1:
0463 EF 554 MOV A,R7
0464 14 555 DEC A
0465 B44F02 556 CJNE A,#4FH,KK1
0468 7449 557 MOV A,#49H
046A 558 KK1:
046A B43F02 559 CJNE A,#3FH,KK2
046D 7439 560 MOV A,#39H
046F 561 KK2:
046F B42F02 562 CJNE A,#2FH,KK3
0472 7429 563 MOV A,#29H
0474 564 KK3:
0474 B41F02 565 CJNE A,#1FH,KK4
0477 7419 566 MOV A,#19H
0479 567 KK4:
0479 B40F02 568 CJNE A,#0FH,KK5
047C 7409 569 MOV A,#09H
047E 570 KK5:
047E 22 571 RET
572
573
574
047F 575 DIVIDE:
047F E8 576 MOV A,R0
0480 540F 577 ANL A,#0FH
0482 F9 578 MOV R1,A
0483 E8 579 MOV A,R0
0484 C4 580 SWAP A
0485 540F 581 ANL A,#0FH
0487 FA 582 MOV R2,A
0488 22 583 RET
584
585
586
A51 MACRO ASSEMBLER S52WNL 01/14/2008 10:38:57 PAGE 10
0489 587 WRITE:
0489 C2B2 588 CLR SCLK
048B 00 589 NOP
048C D2B4 590 SETB RST
048E 00 591 NOP
048F E532 592 MOV A,32H
0491 7C08 593 MOV R4,#8
0493 594 WRITE1:
0493 13 595 RRC A
0494 00 596 NOP
0495 00 597 NOP
0496 C2B2 598 CLR SCLK
0498 00 599 NOP
0499 00 600 NOP
049A 00 601 NOP
049B 92B3 602 MOV IO,C
049D 00 603 NOP
049E 00 604 NOP
049F 00 605 NOP
04A0 D2B2 606 SETB SCLK
04A2 00 607 NOP
04A3 00 608 NOP
04A4 DCED 609 DJNZ R4,WRITE1
04A6 C2B2 610 CLR SCLK
04A8 00 611 NOP
04A9 E531 612 MOV A,31H
04AB 7C08 613 MOV R4,#8
04AD 614 WRITE2:
04AD 13 615 RRC A
04AE 00 616 NOP
04AF C2B2 617 CLR SCLK
04B1 00 618 NOP
04B2 00 619 NOP
04B3 92B3 620 MOV IO,C
04B5 00 621 NOP
04B6 00 622 NOP
04B7 00 623 NOP
04B8 D2B2 624 SETB SCLK
04BA 00 625 NOP
04BB 00 626 NOP
04BC DCEF 627 DJNZ R4,WRITE2
04BE C2B4 628 CLR RST
04C0 22 629 RET
630
631
632
04C1 633 READ:
04C1 C2B2 634 CLR SCLK
04C3 00 635 NOP
04C4 00 636 NOP
04C5 D2B4 637 SETB RST
04C7 00 638 NOP
04C8 E532 639 MOV A,32H
04CA 7C08 640 MOV R4,#8
04CC 641 READ1:
04CC 13 642 RRC A
04CD 00 643 NOP
04CE 92B3 644 MOV IO,C
04D0 00 645 NOP
04D1 00 646 NOP
04D2 00 647 NOP
04D3 D2B2 648 SETB SCLK
04D5 00 649 NOP
04D6 00 650 NOP
04D7 00 651 NOP
04D8 C2B2 652 CLR SCLK
A51 MACRO ASSEMBLER S52WNL 01/14/2008 10:38:57 PAGE 11
04DA 00 653 NOP
04DB 00 654 NOP
04DC DCEE 655 DJNZ R4,READ1
04DE 7C08 656 MOV R4,#8
04E0 657 READ2:
04E0 C2B2 658 CLR SCLK
04E2 00 659 NOP
04E3 00 660 NOP
04E4 00 661 NOP
04E5 A2B3 662 MOV C,IO
04E7 00 663 NOP
04E8 00 664 NOP
04E9 00 665 NOP
04EA 00 666 NOP
04EB 00 667 NOP
04EC 13 668 RRC A
04ED 00 669 NOP
04EE 00 670 NOP
04EF 00 671 NOP
04F0 00 672 NOP
04F1 D2B2 673 SETB SCLK
04F3 00 674 NOP
04F4 DCEA 675 DJNZ R4,READ2
04F6 F531 676 MOV 31H,A
04F8 C2B4 677 CLR RST
04FA 22 678 RET
679
680
04FB 681 BCD_10:
04FB E8 682 MOV A,R0
04FC 540F 683 ANL A,#0FH
04FE F9 684 MOV R1,A
04FF E8 685 MOV A,R0
0500 C4 686 SWAP A
0501 540F 687 ANL A,#0FH
0503 75F00A 688 MOV B,#10
0506 A4 689 MUL AB
0507 29 690 ADD A,R1
0508 F8 691 MOV R0,A
0509 22 692 RET
693
694
695
050A 696 CHECKMONTH:
050A 1204FB 697 LCALL BCD_10
050D E8 698 MOV A,R0
050E 75F004 699 MOV B,#04
0511 A4 700 MUL AB
0512 F9 701 MOV R1,A
0513 900F8B 702 MOV DPTR,#TAB
0516 93 703 MOVC A,@A+DPTR
0517 FF 704 MOV R7,A
0518 09 705 INC R1
0519 E9 706 MOV A,R1
051A 93 707 MOVC A,@A+DPTR
051B FE 708 MOV R6,A
051C 09 709 INC R1
051D E9 710 MOV A,R1
051E 93 711 MOVC A,@A+DPTR
051F FD 712 MOV R5,A
0520 09 713 INC R1
0521 E9 714 MOV A,R1
0522 93 715 MOVC A,@A+DPTR
0523 FC 716 MOV R4,A
0524 22 717 RET
718
A51 MACRO ASSEMBLER S52WNL 01/14/2008 10:38:57 PAGE 12
719
720
721
722
0525 7A00 723 GENGXIAN: MOV R2,#00H
0527 7B00 724 MOV R3,#00H
0529 E565 725 MOV A,month
052B B40109 726 CJNE A,#01H,GM2
052E A863 727 MOV R0,day
0530 1204FB 728 LCALL BCD_10
0533 E8 729 MOV A,R0
0534 FA 730 MOV R2,A
0535 A1DD 731 AJMP TIAOZHENG1
0537 B4020B 732 GM2: CJNE A,#02H,GM3
053A A863 733 MOV R0,day
053C 1204FB 734 LCALL BCD_10
053F E8 735 MOV A,R0
0540 241F 736 ADD A,#31
0542 FA 737 MOV R2,A
0543 A1DD 738 AJMP TIAOZHENG1
0545 B4030B 739 GM3: CJNE A,#03H,GM4
0548 A863 740 MOV R0,day
054A 1204FB 741 LCALL BCD_10
054D E8 742 MOV A,R0
054E 243B 743 ADD A,#59
0550 FA 744 MOV R2,A
0551 A1DD 745 AJMP TIAOZHENG1
0553 B4040B 746 GM4: CJNE A,#04H,GM5
0556 A863 747 MOV R0,day
0558 1204FB 748 LCALL BCD_10
055B E8 749 MOV A,R0
055C 245A 750 ADD A,#90
055E FA 751 MOV R2,A
055F A1DD 752 AJMP TIAOZHENG1
0561 B4050B 753 GM5: CJNE A,#05H,GM6
0564 A863 754 MOV R0,day
0566 1204FB 755 LCALL BCD_10
0569 E8 756 MOV A,R0
056A 2478 757 ADD A,#120
056C FA 758 MOV R2,A
056D A1DD 759 AJMP TIAOZHENG1
056F B4060B 760 GM6: CJNE A,#06H,GM7
0572 A863 761 MOV R0,day
0574 1204FB 762 LCALL BCD_10
0577 E8 763 MOV A,R0
0578 2497 764 ADD A,#151
057A FA 765 MOV R2,A
057B A1DD 766 AJMP TIAOZHENG1
057D B4070B 767 GM7: CJNE A,#07H,GM8
0580 A863 768 MOV R0,day
0582 1204FB 769 LCALL BCD_10
0585 E8 770 MOV A,R0
0586 24B5 771 ADD A,#181
0588 FA 772 MOV R2,A
0589 A1DD 773 AJMP TIAOZHENG1
058B B4080B 774 GM8:CJNE A,#08H,GM9
058E A863 775 MOV R0,day
0590 1204FB 776 LCALL BCD_10
0593 E8 777 MOV A,R0
0594 24D4 778 ADD A,#212
0596 FA 779 MOV R2,A
0597 A1DD 780 AJMP TIAOZHENG1
0599 B40914 781 GM9:CJNE A,#09H,GM10
059C A863 782 MOV R0,day
059E 1204FB 783 LCALL BCD_10
05A1 E8 784 MOV A,R0
A51 MACRO ASSEMBLER S52WNL 01/14/2008 10:38:57 PAGE 13
05A2 C3 785 CLR C
05A3 24F3 786 ADD A,#243
05A5 4003 787 JC GGG
05A7 FA 788 MOV R2,A
05A8 A1DD 789 AJMP TIAOZHENG1
05AA 7BFF 790 GGG: MOV R3,#0FFH
05AC 04 791 INC A
05AD FA 792 MOV R2,A
05AE A1DD 793 AJMP TIAOZHENG1
05B0 B4100D 794 GM10: CJNE A,#10H,GM11
05B3 A863 795 MOV R0,day
05B5 1204FB 796 LCALL BCD_10
05B8 E8 797 MOV A,R0
05B9 2412 798 ADD A,#18
05BB FA 799 MOV R2,A
05BC 7BFF 800 MOV R3,#0FFH
05BE A1DD 801 AJMP TIAOZHENG1
05C0 B4110D 802 GM11:CJNE A,#11H,GM12
05C3 A863 803 MOV R0,day
05C5 1204FB 804 LCALL BCD_10
05C8 E8 805 MOV A,R0
05C9 2431 806 ADD A,#49
05CB FA 807 MOV R2,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -