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

📄 mj.asm

📁 可运行的麻将机控制程序,用C51编译机HEX文件后写入单片机即可
💻 ASM
📖 第 1 页 / 共 5 页
字号:
        JC     L0498H
L0494H:
        CLR    16H
        CLR    14H
L0498H:
        MOV    A, 45H
        CLR    C
        SUBB   A, #06H
        JC     L04A7H
        JNB    11H, L04A7H
        MOV    66H, #05H
L04A5H:
        SJMP   L04A5H
L04A7H:
        MOV    A, 66H
        JNZ    L0445H
        MOV    A, 6DH
        XRL    A, #20H
        JZ     L04C0H
        MOV    A, 6DH
        XRL    A, #10H
        JZ     L04C0H
        MOV    A, 6DH
        XRL    A, #30H
        JZ     L04C0H
        JNB    5AH, L0445H
L04C0H:
        INC    31H
        CLR    5AH
        LCALL  L158CH
        MOV    A, 31H
        ANL    A, #01H
        DEC    A
        JZ     L04F9H
        INC    A
        JZ     L04D4H
        LJMP   L0575H
L04D4H:
        MOV    6AH, #01H
        LCALL  L1F19H
        SETB   56H
        CLR    A
        MOV    67H, A
        MOV    40H, #0AH
        MOV    A, 3AH
        JNZ    L04ECH
        JB     53H, L04ECH
        LCALL  L1C1BH
L04ECH:
        JB     25H, L04F2H
        LJMP   L0445H
L04F2H:
        SETB   16H
        SETB   14H
        LJMP   L0445H
L04F9H:
        MOV    A, 3AH
        JNZ    L050BH
        JNB    23H, L050BH
        CLR    45H
        MOV    45H, A
        MOV    62H, #01H
        CLR    43H
        SETB   11H
L050BH:
        LCALL  L1D04H
        MOV    44H, R7
        LCALL  L0B1BH
        CLR    A
        MOV    6AH, A
        SETB   4AH
        LCALL  L1E72H
        MOV    55H, #01H
        CLR    0CH
        CLR    A
        MOV    54H, A
        MOV    64H, A
        CLR    56H
        MOV    31H, #0FFH
        CLR    43H
        MOV    62H, A
        MOV    A, 66H
        JNZ    L0535H
        LCALL  L14C9H
L0535H:
        LCALL  L0016H
        MOV    A, 66H
        JNZ    L053FH
        LCALL  L14C9H
L053FH:
        CLR    A
        MOV    6AH, A
        MOV    53H, A
        MOV    50H, A
        MOV    51H, A
        MOV    52H, A
        MOV    5EH, A
        MOV    A, 31H
        CPL    A
        JNZ    L0554H
        LJMP   L0445H
L0554H:
        MOV    6AH, #01H
        SETB   56H
        JNB    58H, L055FH
        LJMP   L0445H
L055FH:
        JNB    20H, L0565H
        JNB    21H, L0568H
L0565H:
        LCALL  L1F20H
L0568H:
        MOV    A, 31H
        JB     ACC.0, L0570H
        LJMP   L0445H
L0570H:
        SETB   5AH
        LJMP   L0445H
L0575H:
        LCALL  L1F2EH
        LJMP   L0445H
L057BH:
        LCALL  L1F2EH
        LJMP   L0367H
L0581H:
        MOV    73H, R7
        JNB    0CH, L058BH
        MOV    74H, #0AH
        SJMP   L058EH
L058BH:
        CLR    A
        MOV    74H, A
L058EH:
        MOV    A, 66H
        JZ     L0595H
        LJMP   L0779H
L0595H:
        MOV    A, 73H
        DEC    A
        JNZ    L059DH
        LJMP   L06C5H
L059DH:
        ADD    A, #0FDH
        JNZ    L05A4H
        LJMP   L0672H
L05A4H:
        ADD    A, #0FCH
        JZ     L0620H
        ADD    A, #0F8H
        JNZ    L05AFH
        LJMP   L0735H
L05AFH:
        ADD    A, #0F0H
        JNZ    L05B6H
        LJMP   L0735H
L05B6H:
        ADD    A, #0F0H
        JNZ    L05BDH
        LJMP   L071BH
L05BDH:
        ADD    A, #0F0H
        JNZ    L05C4H
        LJMP   L0767H
L05C4H:
        ADD    A, #3EH
        JZ     L05CBH
        LJMP   L0748H
L05CBH:
        MOV    68H, #0CH
        JNB    4AH, L0612H
        CLR    4AH
        MOV    4FH, #00H
        JNB    09H, L05FAH
        JB     47H, L05FAH
        MOV    A, 4EH
        ANL    A, #0F0H
        MOV    R7, A
        CLR    C
        SUBB   A, #90H
        JNC    L05F0H
        MOV    4EH, R7
        MOV    A, #10H
        ADD    A, 4EH
        MOV    4EH, A
        SJMP   L05F3H
L05F0H:
        MOV    4EH, #10H
L05F3H:
        MOV    A, 4EH
        LCALL  L1D61H
        SJMP   L05FDH
L05FAH:
        CLR    A
        MOV    4EH, A
L05FDH:
        CLR    47H
        ANL    21H, #0F0H
        SETB   09H
        MOV    A, 4EH
        SWAP   A
        ANL    A, #0FH
        ADD    A, 74H
        MOV    R7, A
        LCALL  L15F4H
        LJMP   L0714H
L0612H:
        JB     09H, L061AH
        LCALL  L1E4FH
        SETB   09H
L061AH:
        CLR    A
        MOV    68H, A
        LJMP   L0714H
L0620H:
        MOV    68H, #0CH
        JNB    4AH, L0664H
        CLR    4AH
        MOV    4FH, #00H
        JNB    0BH, L064EH
        JB     47H, L064EH
        MOV    A, 4EH
        ANL    A, #0FH
        MOV    R7, A
        CLR    C
        SUBB   A, #09H
        JNC    L0641H
        MOV    4EH, R7
        INC    4EH
        SJMP   L0644H
L0641H:
        MOV    4EH, #01H
L0644H:
        MOV    A, 4EH
        ANL    A, #0FH
        MOV    R7, A
        LCALL  L1D65H
        SJMP   L0651H
L064EH:
        CLR    A
        MOV    4EH, A
L0651H:
        ANL    21H, #0F0H
        SETB   0BH
        MOV    A, 4EH
        ANL    A, #0FH
        ADD    A, 74H
        MOV    R7, A
        LCALL  L15F4H
        CLR    47H
        SJMP   L066FH
L0664H:
        JB     0BH, L066CH
        LCALL  L1E4FH
        SETB   0BH
L066CH:
        CLR    A
        MOV    68H, A
L066FH:
        LJMP   L0714H
L0672H:
        MOV    68H, #0CH
        JNB    4AH, L06B8H
        CLR    4AH
        MOV    4EH, #00H
        JNB    0AH, L06A1H
        JB     47H, L06A1H
        MOV    A, 4FH
        ANL    A, #0FH
        CLR    C
        SUBB   A, #90H
        JNC    L0697H
        ANL    4FH, #0F0H
        MOV    A, #10H
        ADD    A, 4FH
        MOV    4FH, A
        SJMP   L069AH
L0697H:
        MOV    4FH, #10H
L069AH:
        MOV    A, 4FH
        LCALL  L1D61H
        SJMP   L06A4H
L06A1H:
        CLR    A
        MOV    4FH, A
L06A4H:
        CLR    47H
        ANL    21H, #0F0H
        SETB   0AH
        MOV    A, 4FH
        SWAP   A
        ANL    A, #0FH
        ADD    A, 74H
        MOV    R7, A
        LCALL  L15F4H
        SJMP   L06C3H
L06B8H:
        JB     0AH, L06C0H
        LCALL  L1E4FH
        SETB   0AH
L06C0H:
        CLR    A
        MOV    68H, A
L06C3H:
        SJMP   L0714H
L06C5H:
        MOV    68H, #0CH
        JNB    4AH, L0709H
        CLR    4AH
        MOV    4EH, #00H
        JNB    08H, L06F3H
        JB     47H, L06F3H
        MOV    A, 4FH
        ANL    A, #0FH
        MOV    R7, A
        CLR    C
        SUBB   A, #09H
        JNC    L06E6H
        MOV    4FH, R7
        INC    4FH
        SJMP   L06E9H
L06E6H:
        MOV    4FH, #01H
L06E9H:
        MOV    A, 4FH
        ANL    A, #0FH
        MOV    R7, A
        LCALL  L1D65H
        SJMP   L06F6H
L06F3H:
        CLR    A
        MOV    4FH, A
L06F6H:
        CLR    47H
        ANL    21H, #0F0H
        SETB   08H
        MOV    A, 4FH
        ANL    A, #0FH
        ADD    A, 74H
        MOV    R7, A
        LCALL  L15F4H
        SJMP   L0714H
L0709H:
        JB     08H, L0711H
        LCALL  L1E4FH
        SETB   08H
L0711H:
        CLR    A
        MOV    68H, A
L0714H:
        SETB   06H
        CLR    A
        MOV    32H, A
        SJMP   L0767H
L071BH:
        JB     13H, L0767H
        MOV    A, 4CH
        XRL    A, 38H
        JNZ    L072BH
        JB     59H, L072BH
        CLR    EX1
L0729H:
        SJMP   L0729H
L072BH:
        MOV    A, 55H
        CJNE   A, #01H, L0735H
        LCALL  L1D42H
        SJMP   L0767H
L0735H:
        JB     13H, L0767H
        CLR    A
        MOV    45H, A
        MOV    3EH, A
        MOV    A, 55H
        JNZ    L0767H
        SETB   13H
        MOV    6AH, #02H
        SJMP   L0767H
L0748H:
        MOV    A, 68H
        CLR    C
        SUBB   A, #03H
        JC     L0767H
        MOV    A, 59H
        JNZ    L0767H
        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    68H, #0CH
        MOV    59H, #01H
L0767H:
        MOV    A, 73H
        JZ     L0770H
        JNB    41H, L0770H
        SJMP   L0776H
L0770H:
        MOV    A, 73H
        ANL    A, #0FH
        JZ     L0779H
L0776H:
        LCALL  L14C9H
L0779H:
        RET
L077AH:
        LCALL  L16AAH
        LCALL  L158CH
        CLR    A
        MOV    4EH, A
        MOV    4FH, A
        LCALL  L1ED3H
        CLR    5BH
L078AH:
        CLR    A
        MOV    5AH, A
        MOV    R7, A
        LCALL  L15F4H
        LCALL  L1D04H
        MOV    44H, R7
        MOV    A, 44H
        ANL    A, #0FH
        MOV    6FH, A
        ADD    A, #0FEH
        JZ     L07B8H
        ADD    A, #0FDH
        JZ     L07FDH
        ADD    A, #0FDH
        JNZ    L07ABH
        LJMP   L0848H
L07ABH:
        ADD    A, #07H
        JZ     L07B2H
        LJMP   L0941H
L07B2H:
        LCALL  L152BH
        LJMP   L0941H
L07B8H:
        CLR    5BH
        MOV    6FH, 3AH
        MOV    R7, 6FH
        LCALL  L15F4H
L07C2H:
        LCALL  L1E29H
        MOV    6EH, R7
        MOV    A, 6EH
        ADD    A, #0FEH
        JZ     L07E1H
        ADD    A, #0FEH
        JZ     L07E1H
        ADD    A, #0FCH
        JZ     L07E1H
        ADD    A, #0F8H
        JZ     L07E6H
        ADD    A, #0F0H
        JZ     L07E6H
        ADD    A, #1FH
        JNZ    L07F5H
L07E1H:
        LCALL  L15ECH
        SJMP   L07F5H
L07E6H:
        MOV    3AH, 6FH
        LCALL  L164BH
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        SETB   5BH
L07F5H:
        JNB    5BH, L07C2H
        CLR    5BH
        LJMP   L0941H
L07FDH:
        CLR    5BH
        MOV    A, 39H
        LCALL  L15EFH
L0804H:
        LCALL  L1E29H
        MOV    6EH, R7
        MOV    A, 6EH
        ADD    A, #0FEH
        JZ     L0823H
        ADD    A, #0FEH
        JZ     L0823H
        ADD    A, #0FCH
        JZ     L0823H
        ADD    A, #0F8H
        JZ     L0828H
        ADD    A, #0F0H
        JZ     L0828H
        ADD    A, #1FH
        JNZ    L0840H
L0823H:
        LCALL  L15ECH
        SJMP   L0840H
L0828H:
        MOV    A, 6FH
        ANL    A, #01H
        MOV    R7, A
        MOV    A, 39H
        ANL    A, #0FEH
        ORL    A, R7
        MOV    39H, A
        LCALL  L164BH
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        SETB   5BH
L0840H:
        JNB    5BH, L0804H
        CLR    5BH
        LJMP   L0941H
L0848H:
        CLR    5BH
        MOV    70H, #0FFH
        LCALL  L16AAH
        MOV    6FH, 34H
        MOV    A, 6FH
        CLR    C
        RRC    A
        MOV    6FH, A
        SETB   C
        SUBB   A, #14H
        JC     L0861H
        MOV    6FH, #09H
L0861H:
        LCALL  L1EA2H
        SETB   09H
        MOV    R7, 6FH
        LCALL  L15F4H
L086BH:
        LCALL  L1E29H
        MOV    6EH, R7
        MOV    A, 6EH
        DEC    A
        JZ     L08DEH
        ADD    A, #0FDH
        JNZ    L087CH
        LJMP   L0903H
L087CH:
        ADD    A, #0FCH
        JZ     L08B9H
        ADD    A, #0F8H
        JNZ    L0887H
        LJMP   L092DH
L0887H:
        ADD    A, #0F0H
        JNZ    L088EH
        LJMP   L092DH
L088EH:
        ADD    A, #1EH
        JZ     L0895H
        LJMP   L0939H
L0895H:
        MOV    6FH, 34H
        MOV    A, 6FH
        CLR    C
        RRC    A
        MOV    6FH, A
        MOV    A, 70H
        JB     ACC.0, L08AFH
        INC    6FH
        MOV    A, 6FH
        SETB   C
        SUBB   A, #13H
        JC     L08AFH
        MOV    6FH, #01H
L08AFH:
        MOV    70H, #0FEH
        LCALL  L1EA2H
        SETB   09H
        SJMP   L0926H
L08B9H:
        MOV    6FH, 36H
        MOV    A, 6FH
        CLR    C
        RRC    A
        MOV    6FH, A
        MOV    A, 70H
        JB     ACC.1, L08CEH
        MOV    R7, 6FH
        LCALL  L1EDDH
        MOV    6FH, R7
L08CEH:
        MOV    70H, #0FDH
        MOV    A, 6FH
        ADD    A, ACC
        MOV    36H, A
        LCALL  L1EA8H
        SETB   0BH
        SJMP   L0926H
L08DEH:
        MOV    6FH, 37H
        MOV    A, 6FH
        CLR    C
        RRC    A
        MOV    6FH, A
        MOV    A, 70H
        JB     ACC.2, L08F3H
        MOV    R7, 6FH
        LCALL  L1EDDH
        MOV    6FH, R7
L08F3H:
        MOV    70H, #0FBH
        MOV    A, 6FH
        ADD    A, ACC
        MOV    37H, A
        LCALL  L1EA8H
        SETB   08H
        SJMP   L0926H
L0903H:
        MOV    6FH, 35H
        MOV    A, 6FH
        CLR    C
        RRC    A
        MOV    6FH, A
        MOV    A, 70H
        JB     ACC.3, L0918H
        MOV    R7, 6FH
        LCALL  L1EDDH
        MOV    6FH, R7
L0918H:

⌨️ 快捷键说明

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