⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mj.asm

📁 可运行的麻将机控制程序,用C51编译机HEX文件后写入单片机即可
💻 ASM
📖 第 1 页 / 共 5 页
字号:
        MOV    70H, #0F7H
        MOV    A, 6FH
        ADD    A, ACC
        MOV    35H, A
        LCALL  L1EA8H
        SETB   0AH
L0926H:
        MOV    R7, 6FH
        LCALL  L15F4H
        SJMP   L0939H
L092DH:
        LCALL  L164BH
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        SETB   5BH
L0939H:
        JB     5BH, L093FH
        LJMP   L086BH
L093FH:
        CLR    5BH
L0941H:
        CLR    A
        MOV    6EH, A
        JB     5BH, L094AH
        LJMP   L078AH
L094AH:
        RET
L094BH:
        PUSH   ACC
        PUSH   B
        PUSH   DPH
        PUSH   DPL
        PUSH   PSW
        MOV    PSW, #08H
        CLR    TR0
        INC    2EH
        MOV    TH0, #0FEH
        MOV    TL0, #83H
        CLR    TF0
        LCALL  L1AE7H
        LCALL  L1A5BH
        MOV    A, 2EH
        CLR    C
        SUBB   A, #0AH
        JNC    L0974H
        LJMP   L0B0EH
L0974H:
        MOV    2EH, #00H
        INC    2CH
        INC    2DH
        MOV    A, 66H
        JNZ    L0982H
        LJMP   L0A0DH
L0982H:
        JB     4CH, L09DEH
        CLR    P4.0
        SETB   P4.1
        SETB   P4.2
        MOV    P0, #0FFH
        SETB   P2.5
        NOP
        NOP
        CLR    P2.5
        MOV    C, 27H
        MOV    50H, C
        MOV    C, 26H
        MOV    51H, C
        MOV    6CH, 66H
        MOV    A, 66H
        XRL    A, #0DH
        JZ     L09AEH
        MOV    A, 66H
        XRL    A, #0EH
        JZ     L09AEH
        LCALL  L14C9H
L09AEH:
        MOV    66H, 6CH
        MOV    3FH, #00H
        SETB   4CH
        MOV    P1, #0FFH
        ORL    P2, #0FH
        MOV    26H, #00H
        MOV    27H, #1FH
        MOV    R7, 66H
        LCALL  L15F4H
        ORL    21H, #0FH
        MOV    A, 66H
        XRL    A, #0DH
        JZ     L09D5H
        MOV    A, 66H
        CJNE   A, #0EH, L09DEH
L09D5H:
        MOV    26H, #1FH
        MOV    27H, #1FH
        ORL    20H, #1FH
L09DEH:
        LCALL  L1F2EH
L09E1H:
        MOV    A, 3FH
        XRL    A, #20H
        JZ     L09ECH
        MOV    A, 3FH
        CJNE   A, #10H, L09F8H
L09ECH:
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        MOV    WDT_CONTR, #38H
L09F6H:
        SJMP   L09F6H
L09F8H:
        JNB    49H, L0A07H
        MOV    A, 66H
        CLR    C
        RRC    A
        ADD    A, #10H
        MOV    R7, A
        LCALL  L000EH
        CLR    49H
L0A07H:
        MOV    A, 3FH
        JZ     L0A0DH
        SETB   49H
L0A0DH:
        MOV    R7, 21H
        MOV    R6, 20H
        MOV    A, 2CH
        CLR    C
        SUBB   A, #06H
        JC     L0A2AH
        MOV    A, 27H
        CPL    A
        MOV    R5, A
        MOV    A, 26H
        CPL    A
        XCH    A, R6
        ANL    A, R6
        XCH    A, R6
        MOV    A, R5
        XCH    A, R7
        ANL    A, R7
        XCH    A, R7
        SETB   P3.5
        SJMP   L0A2CH
L0A2AH:
        CLR    P3.5
L0A2CH:
        LCALL  L19BFH
        MOV    A, 2CH
        CLR    C
        SUBB   A, #32H
        JC     L0A56H
        MOV    2CH, #00H
        INC    46H
        INC    67H
        INC    40H
        INC    45H
        INC    30H
        MOV    A, #11H
        ADD    A, 33H
        MOV    33H, A
        INC    32H
        INC    3EH
        INC    6BH
        MOV    A, 68H
        ANL    A, #7FH
        INC    A
        MOV    68H, A
L0A56H:
        MOV    A, 32H
        CLR    C
        SUBB   A, #05H
        JC     L0A5FH
        CLR    06H
L0A5FH:
        MOV    A, 2DH
        CLR    C
        SUBB   A, #0AH
        JC     L0A86H
        INC    69H
        MOV    2DH, #00H
        LCALL  L1C81H
        MOV    A, 3FH
        CPL    A
        ANL    A, #3FH
        MOV    3FH, A
        MOV    A, 3FH
        XRL    A, 2FH
        JZ     L0A83H
        MOV    2FH, 3FH
        MOV    3FH, #00H
        SJMP   L0A86H
L0A83H:
        MOV    2FH, 3FH
L0A86H:
        LCALL  L17B5H
        LCALL  L1A29H
        LCALL  L1BF8H
        MOV    A, 3DH
        CLR    C
        SUBB   A, #02H
        JC     L0B06H
        SETB   4DH
        MOV    A, 3DH
        SUBB   A, #03H
        JC     L0B06H
        CLR    EA
        SETB   P4.0
        SETB   P4.1
        SETB   P4.2
        MOV    P0, #0FFH
        SETB   P2.5
        NOP
        NOP
        CLR    P2.5
        MOV    P1, #0FFH
        ORL    P2, #0FH
        MOV    26H, #1FH
        MOV    27H, #1FH
        MOV    23H, #00H
        ANL    22H, #03H
        MOV    5FH, #01H
        MOV    C, 27H
        MOV    50H, C
        MOV    C, 26H
        MOV    51H, C
        MOV    A, 59H
        JNZ    L0AE1H
        MOV    A, 21H
        ANL    A, #0F0H
        MOV    R7, A
        MOV    A, 20H
        MOV    20H, A
        MOV    A, R7
        ORL    A, 65H
        MOV    21H, A
        MOV    59H, #01H
L0AE1H:
        MOV    A, 53H
        SETB   C
        SUBB   A, #00H
        JC     L0AF4H
        MOV    A, 53H
        SUBB   A, #0FFH
        JNC    L0AF4H
        DEC    53H
        CLR    10H
        CLR    11H
L0AF4H:
        MOV    A, 66H
        JNZ    L0B01H
        JNB    4EH, L0B01H
        JB     53H, L0B01H
        LCALL  L14C9H
L0B01H:
        MOV    WDT_CONTR, #0B3H
L0B04H:
        SJMP   L0B04H
L0B06H:
        INC    3DH
        ANL    3DH, #7FH
        ANL    40H, #7FH
L0B0EH:
        SETB   TR0
        POP    PSW
        POP    DPL
        POP    DPH
        POP    B
        POP    ACC
        RETI
L0B1BH:
        MOV    3BH, R7
        MOV    A, R7
        LCALL  L13BBH
        INC    R4
        RL     A
        SJMP   L0B30H
        MOV    R6, SP
        INC    R3
        CJNE   R1, #82H, L0B36H
        XCH    A, @R1
        MOVC   A, @A+PC
        INC    R3
        DB     0D5H
        DIV    AB
L0B30H:
        INC    R3
        MOVX   A, @R1
        MOV    0F1H, 0BH
        DB     86H
L0B36H:
        INC    R3
        MOV    R7, A
        MOV    0CH, @R1
        INC    R2
        DB     88H
L0B3CH:
        INC    R4
        DEC    TMOD
        INC    R3
        XRL    A, #0C0H
        INC    R3
        XRL    A, #0C1H
        INC    R3
        JMP    @A+DPTR
        CLR    0BH
        MOV    R6, #0C3H
        INC    R3
        MOV    0C4H, R5
        INC    R3
        SUBB   A, R4
        XCH    A, 0BH
        SUBB   A, R6
        XCH    A, @R0
        INC    R3
        ORL    C, /PX3
        INC    R3
        INC    DPTR
        XCH    A, R0
        INC    R3
        MOVX   A, @R1
        XCH    A, R1
        INC    R4
        ACALL  L09E1H
        NOP
        NOP
        INC    R4
        ADDC   A, R5
        MOV    34H, #22H
        MOV    35H, #22H
        MOV    36H, #22H
        MOV    37H, #22H
        LJMP   L0C3DH
        MOV    34H, #22H
        MOV    35H, #24H
        MOV    36H, #22H
        SJMP   L0B87H
        MOV    34H, #24H
        MOV    35H, #24H
        MOV    36H, #24H
L0B87H:
        MOV    37H, #24H
        LJMP   L0C3DH
        MOV    34H, #12H
        MOV    35H, #12H
        MOV    36H, #12H
        MOV    37H, #12H
        LJMP   L0C3DH
        SJMP   L0BF1H
        SJMP   L0BD5H
        LJMP   L0C23H
        MOV    34H, #1CH
        MOV    35H, #1CH
        MOV    36H, #1CH
        SJMP   L0BECH
        MOV    34H, #20H
        MOV    35H, #20H
        MOV    36H, #20H
        SJMP   L0C1EH
        MOV    34H, #18H
        MOV    35H, #18H
        MOV    36H, #18H
        MOV    37H, #18H
        SJMP   L0C3DH
        MOV    34H, #18H
        MOV    35H, #1AH
        MOV    36H, #18H
        MOV    37H, #1AH
        SJMP   L0C3DH
L0BD5H:
        MOV    34H, #1EH
        MOV    35H, #1EH
        MOV    36H, #1EH
        MOV    37H, #1EH
        SJMP   L0C3DH
        MOV    34H, #1AH
        MOV    35H, #1CH
        MOV    36H, #1AH
L0BECH:
        MOV    37H, #1CH
        SJMP   L0C3DH
L0BF1H:
        MOV    34H, #14H
        MOV    35H, #16H
        MOV    36H, #14H
        MOV    37H, #16H
        SJMP   L0C3DH
        MOV    34H, #1CH
        MOV    35H, #1CH
        MOV    36H, #1CH
        SJMP   L0C1EH
        MOV    34H, #12H
        MOV    35H, #12H
        MOV    36H, #12H
        SJMP   L0C1EH
        MOV    34H, #18H
        MOV    35H, #18H
        MOV    36H, #18H
L0C1EH:
        CLR    A
        MOV    37H, A
        SJMP   L0C3DH
L0C23H:
        MOV    34H, #20H
        MOV    35H, #20H
        MOV    36H, #20H
        MOV    37H, #20H
        SJMP   L0C3DH
        MOV    34H, #28H
        MOV    35H, #28H
        MOV    36H, #28H
        MOV    37H, #28H
L0C3DH:
        MOV    A, 37H
        ADD    A, 36H
        ADD    A, 35H
        ADD    A, 34H
        MOV    38H, A
        MOV    3AH, #01H
        MOV    A, 34H
        CLR    C
        SUBB   A, #22H
        JC     L0C58H
        MOV    A, R7
        ANL    A, #0F0H
        XRL    A, #0C0H
        JZ     L0C66H
L0C58H:
        MOV    A, 34H
        SETB   C
        SUBB   A, #1EH
        JC     L0C69H
        MOV    A, R7
        ANL    A, #0F0H
        MOV    R6, A
        CJNE   R6, #80H, L0C69H
L0C66H:
        CLR    A
        MOV    3AH, A
L0C69H:
        MOV    A, 34H
        CLR    C
        SUBB   A, #1EH
        JC     L0C77H
        MOV    A, R7
        ANL    A, #0F0H
        XRL    A, #0C0H
        JZ     L0C85H
L0C77H:
        MOV    A, 34H
        SETB   C
        SUBB   A, #1EH
        JC     L0C88H
        MOV    A, R7
        ANL    A, #0F0H
        MOV    R7, A
        CJNE   R7, #80H, L0C88H
L0C85H:
        CLR    A
        MOV    3AH, A
L0C88H:
        MOV    A, 39H
        ORL    A, #01H
        MOV    39H, A
        LJMP   L164BH
L0C91H:
        CLR    5BH
        CLR    5CH
        CLR    A
        MOV    64H, A
        MOV    31H, A
        MOV    22H, A
        MOV    23H, A
        LCALL  L1B11H
        MOV    10H, R7
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
L0CAAH:
        MOV    R7, #14H
        MOV    R6, #00H
        LCALL  L1D7FH
        JB     22H, L0CBBH
        CLR    10H
        LCALL  L1F27H
        SETB   11H
L0CBBH:
        JB     23H, L0CC5H
        CLR    11H
        LCALL  L1F27H
        SETB   10H
L0CC5H:
        LCALL  L1E29H
        MOV    10H, R7
        MOV    A, 10H
        DEC    A
        JZ     L0D2CH
        ADD    A, #0FDH
        JZ     L0CFEH
        ADD    A, #0FCH
        JNZ    L0CDAH
        LJMP   L0D86H
L0CDAH:
        ADD    A, #0F8H
        JNZ    L0CE1H
        LJMP   L0DC2H
L0CE1H:
        ADD    A, #0F0H
        JNZ    L0CE8H
        LJMP   L0D97H
L0CE8H:
        ADD    A, #1EH
        JZ     L0CEFH
        LJMP   L0DEDH
L0CEFH:
        MOV    6AH, #05H
        CLR    A
        MOV    3EH, A
        MOV    23H, A
        ANL    22H, #08H
        CPL    13H
        SJMP   L0CAAH
L0CFEH:
        MOV    23H, #00H
        ANL    22H, #04H
        SETB   10H
L0D06H:
        MOV    R7, #32H
        LCALL  L188DH
        LCALL  L1F20H
        LCALL  L1F20H
        LCALL  L1BB1H
        LCALL  L1F20H
        LCALL  L1DE7H
        LCALL  L1F20H
        LCALL  L1B11H
        MOV    10H, R7
        MOV    A, 10H
        CJNE   A, #04H, L0D06H
        CLR    10H
        LJMP   L0CAAH
L0D2CH:
        CLR    A
        MOV    22H, A
        MOV    23H, A
L0D31H:
        LCALL  L1F19H
        LCALL  L1E29H
        MOV    10H, R7
        MOV    A, 10H
        DEC    A
        JZ     L0D68H
        ADD    A, #0FDH
        JZ     L0D5EH
        ADD    A, #0FCH
        JZ     L0D54H
        ADD    A, #06H
        JNZ    L0D70H
        ANL    23H, #01H
        MOV    22H, #00H
        CPL    18H
        SJMP   L0D70H
L0D54H:
        ANL    23H, #02H
        MOV    22H, #00H
        CPL    19H
        SJMP   L0D70H
L0D5EH:
        ANL    23H, #04H
        MOV    22H, #00H
        CPL    1AH
        SJMP   L0D70H
L0D68H:
        ANL    23H, #08H
        MOV    22H, #00H
        CPL    1BH
L0D70H:
        MOV    A, 10H
        XRL    A, #20H
        JZ     L0D7BH
        MOV    A, 10H
        CJNE   A, #10H, L0D31H
L0D7BH:
        MOV    R7, #01H
        LCALL  L10E2H
        CLR    A
        MOV    10H, A
        LJMP   L0CAAH
L0D86H:
        CPL    5CH
        JNB    5CH, L0D90H
        SETB   10H
        LJMP   L0CAAH
L0D90H:
        CLR    10H
        CLR    11H
        LJMP   L0CAAH
L0D97H:
        MOV    23H, #00H
        ANL    22H, #0C0H
        INC    64H
        MOV    A, 64H
        CJNE   A, #01H, L0DA9H
        SETB   16H
        LJMP   L0CAAH
L0DA9H:
        MOV    A, 64H
        CJNE   A, #02H, L0DB8H
        CLR    16H
        LCALL  L1F20H
        SETB   17H
        LJMP   L0CAAH
L0DB8H:
        CLR    A
        MOV    64H, A
        CLR    17H
        CLR    16H
        LJMP   L0CAAH
L0DC2H:
        MOV    23H, #00H
        ANL    22H, #30H
        INC    31H
        MOV    A, 31H
        CJNE   A, #01H, L0DD4H

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -