📄 skdy1.lst
字号:
0466 B2B2 715 CPL DOG
0468 E6 716 LPF6_TX: MOV A, @R0
0469 F7 717 MOV @R1, A
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 12
046A 09 718 INC R1
046B 03 719 RR A
046C F6 720 MOV @R0, A
046D E8 721 MOV A, R0
046E 2404 722 ADD A, #04H
0470 F8 723 MOV R0, A
0471 DAF5 724 DJNZ R2, LPF6_TX
0473 E8 725 MOV A, R0
0474 C3 726 CLR C
0475 9410 727 SUBB A, #16
0477 F8 728 MOV R0, A
0478 309502 729 JPB_TX: JNB SYN, JPB1_TX;;B p1.5
047B 8186 730 ajmp jpb2_TX
047D D28C 731 jpb1_TX: setb tr0
047F B2B2 732 cpl dog
0481 30D5F4 733 jnb f0, jpb_TX
0484 A18F 734 ajmp goret1
0486 C28C 735 jpb2_TX: clr tr0
0488 752900 736 mov 29h ,#00h
048B E55B 737 MOV a, 5BH
048D 13 738 RRC A
048E B3 739 CPL C
048F 9292 740 MOV POB, C
0491 D291 741 SETB POD
0493 209502 742 JPC_TX: JB SYN, JPC1_TX;;C
0496 81A1 743 ajmp jpc2_TX
0498 D28C 744 jpc1_TX: setb tr0
049A B2B2 745 cpl dog
049C 30D5F4 746 jnb f0, jpc_TX
049F A18F 747 ajmp goret1
04A1 C28C 748 jpc2_TX: clr tr0
04A3 752900 749 mov 29h ,#00h
04A6 E55C 750 MOV a, 5CH
04A8 13 751 RRC A
04A9 B3 752 CPL C
04AA 9290 753 MOV POC, C
04AC D293 754 SETB poa
04AE 309502 755 JPD_TX: JNB SYN, JPD1_TX;;D
04B1 81BC 756 ajmp jpd2_TX
04B3 D28C 757 jpd1_TX: setb tr0
04B5 B2B2 758 cpl dog
04B7 30D5F4 759 jnb f0, jpd_TX
04BA A18F 760 ajmp goret1
04BC C28C 761 jpd2_TX: clr tr0
04BE 752900 762 mov 29h ,#00h
04C1 E55D 763 MOV a, 5DH
04C3 13 764 RRC A
04C4 B3 765 CPL C
04C5 9291 766 MOV POD, C
04C7 D292 767 SETB POB
04C9 209502 768 JPA_TX: JB SYN, JPA1_TX;;A
04CC 81D7 769 ajmp jpa2_TX
04CE D28C 770 jpa1_TX: setb tr0
04D0 B2B2 771 cpl dog
04D2 30D5F4 772 jnb f0, jpa_TX
04D5 A18F 773 ajmp goret1
04D7 C28C 774 jpa2_TX: clr tr0
04D9 752900 775 mov 29h ,#00h
04DC E55A 776 MOV a, 5AH
04DE 13 777 RRC A
04DF B3 778 CPL C
04E0 9293 779 MOV POA, C
04E2 D290 780 SETB POC
04E4 DB10 781 DJNZ R3, LPF5_TX1
04E6 08 782 INC R0
04E7 DC0F 783 DJNZ R4, LPF4_TX1
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 13
04E9 E8 784 MOV A, R0
04EA 240C 785 ADD A, #12
04EC F8 786 MOV R0, A
04ED 7E50 787 MOV R6, #50H
04EF DEFE 788 JPG_TX: DJNZ R6, JPG_TX
04F1 DD07 789 DJNZ R5, LPF0_TX1
04F3 790 goret:
04F3 C294 791 clr moto
04F5 22 792 RET
793 ;;
04F6 8162 794 LPF5_TX1:AJMP LPF5_TX
04F8 8160 795 LPF4_TX1:AJMP LPF4_TX
04FA 8132 796 LPF0_TX1:AJMP LPF0_TX
797 ;///////////////////////////////////////////////////////////////////////
798
04FC 799 PRN_C:
04FC C294 800 clr MOTO
04FE 7808 801 MOV R0, #08h;;USE R1-R6
0500 20B702 802 LPF0: JB LINE, LPF01
0503 A127 803 ajmp LPF3;lpdll
0505 D28C 804 lpf01: setb tr0
0507 30D5F6 805 jnb f0, lpf0
050A B2B2 806 cpl dog
050C A18F 807 ajmp goret1
050E C28C 808 lpdll: clr tr0
0510 752900 809 mov 29h,#00h
0513 120427 810 LCALL DLL
0516 20B7E7 811 LPF00: JB LINE, LPF0 ;1 ajmp
0519 30B702 812 LPF1: JNB LINE, LPF11
051C A127 813 ajmp lpf3
051E D28C 814 lpf11: setb tr0
0520 30D5F6 815 jnb f0 ,lpf1
0523 B2B2 816 cpl dog
0525 A18F 817 ajmp goret1
0527 C28C 818 LPF3: clr tr0
0529 752900 819 mov 29h ,#00h
052C 7C04 820 MOV R4, #04H
052E 7B06 821 LPF4: MOV R3, #06H
0530 7A04 822 LPF5: MOV R2, #04H
0532 795A 823 MOV R1, #5AH
0534 B2B2 824 CPL DOG
0536 E6 825 LPF6: MOV A, @R0
0537 F7 826 MOV @R1, A
0538 09 827 INC R1
0539 03 828 RR A
053A F6 829 MOV @R0, A
053B E8 830 MOV A, R0
053C 2404 831 ADD A, #04H
053E F8 832 MOV R0, A
053F DAF5 833 DJNZ R2, LPF6
0541 E8 834 MOV A, R0
0542 C3 835 CLR C
0543 9410 836 SUBB A, #16
0545 F8 837 MOV R0, A
838 ;;********************
0546 209502 839 JPCX: JB SYN, JPCX1 ;;C
0549 A152 840 ajmp jpcx2
054B D28C 841 jpcx1: setb tr0
054D 20D53F 842 jb f0 ,goret1
0550 A146 843 ajmp jpcx
0552 C28C 844 jpcx2: clr tr0
0554 752900 845 mov 29h ,#00h
0557 E55C 846 MOV a, 5CH
0559 13 847 RRC A
055A B3 848 CPL C
055B 9290 849 MOV POC, C
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 14
055D 309502 850 JPDX: JNB SYN, JPDX1;;D
0560 A169 851 ajmp jpdx2
0562 D28C 852 jpdx1: setb tr0
0564 20D528 853 jb f0 ,goret1
0567 A15D 854 ajmp jpdx
0569 C28C 855 jpdx2: clr tr0
056B 752900 856 mov 29h,#00h
056E E55D 857 MOV a, 5DH
0570 13 858 RRC A
0571 B3 859 CPL C
0572 9291 860 MOV POD, C
0574 DBBA 861 NEXT1: DJNZ R3, LPF5
0576 08 862 INC R0
0577 DCB5 863 DJNZ R4, LPF4
0579 E8 864 MOV A, R0
057A 240C 865 ADD A, #12
057C F8 866 MOV R0, A
057D 7E50 867 MOV R6, #50H
057F DEFE 868 JPG: DJNZ R6, JPG
0581 D294 869 setb MOTO
0583 22 870 RET
871 ;;;
0584 7830 872 LD: MOV R0, #30H ;;;;;;;;;;;;;;;;;;;;;;;;;/////////////
0586 7910 873 MOV R1, #16
0588 B2B2 874 CPL DOG
058A F6 875 CONL: MOV @R0, A
058B 08 876 INC R0
058C D9FC 877 DJNZ R1, CONL
058E 22 878 RET
058F D294 879 goret1: setb moto
0591 D293 880 setb poa
0593 D292 881 setb pob
0595 C2D5 882 clr f0
0597 752900 883 mov 29h,#00h
059A 010D 884 ajmp main
885 ;;*****************
886 ;;*****************
059C B2B2 887 TIME0:cpl dog
059E 758C00 888 MOV TH0, #00H
05A1 758A00 889 MOV TL0, #00h
05A4 0529 890 inc 29h
05A6 E529 891 mov a ,29h
05A8 640E 892 xrl a ,#14 ;;1s
05AA 7005 893 jnz ok1
05AC D2D5 894 setb f0
05AE 752900 895 mov 29h ,#00h
05B1 00 896 ok1: nop
05B2 32 897 RETI
898 ;;*********************************
05B3 C2AC 899 INTR: CLR ES
05B5 109804 900 WAIT_1: JBC RI, NEXT_0
05B8 B2B2 901 CPL DOG
05BA A1B5 902 AJMP WAIT_1
05BC E599 903 NEXT_0: MOV A,SBUF
05BE 64BE 904 XRL A,#0BEH ;; addr
05C0 7002 905 JNZ GOBACK1
05C2 A1C6 906 ajmp csm2
05C4 C159 907 goback1: ajmp goback
05C6 C29D 908 csm2: clr sm2
05C8 109804 909 WAIT_11: JBC RI,NEXT_1
05CB B2B2 910 CPL DOG
05CD A1C8 911 AJMP WAIT_11
05CF E599 912 NEXT_1: MOV A,SBUF
05D1 F55F 913 MOV 5FH,A
05D3 B2B2 914 CPL DOG
05D5 6499 915 XRL A,#99H ;; 走纸
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 15
05D7 6010 916 JZ GO_PAPER
05D9 E4 917 CLR A
05DA E55F 918 MOV A,5FH
05DC 64EE 919 XRL A,#0EEH ;; 打印上半段
05DE 6011 920 JZ STEPPAPER
05E0 E4 921 CLR A
05E1 E55F 922 MOV A,5FH
05E3 64DD 923 XRL A,#0DDH ;; 打印
05E5 6035 924 JZ DAYING
05E7 C159 925 AJMP GOBACK
926 ;------------------------
05E9 927 GO_PAPER:
928 ; CLR RI
929 ; CLR TI
930 ; MOV SBUF,#0BBh
931 ;WAIT_2: JBC TI,NEXT_2
932 ; CPL DOG
933 ; AJMP WAIT_2
05E9 120661 934 NEXT_2: LCALL PRINT3
05EC 755F00 935 mov 5Fh,#00h
05EF C159 936 AJMP GOBACK
937 ;---------------------
05F1 938 STEPPAPER:
939 ; CLR RI
940 ; CLR TI
941 ; MOV SBUF,#0BBH
942 ;WAIT_3: JBC TI,NEXT_3
943 ; CPL DOG
944 ; AJMP WAIT_3
945 ;next_3:
05F1 7860 946 MOV R0,#60H
05F3 7C14 947 MOV R4,#20
05F5 109804 948 WAIT_5s: JBC RI,NEXT_5s
05F8 B2B2 949 CPL DOG
05FA A1F5 950 AJMP WAIT_5s
05FC E599 951 NEXT_5s: MOV A,SBUF
05FE F6 952 MOV @R0,a
05FF 08 953 INC R0
0600 DCF3 954 DJNZ R4,WAIT_5s
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -