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

📄 mj.asm

📁 可运行的麻将机控制程序,用C51编译机HEX文件后写入单片机即可
💻 ASM
📖 第 1 页 / 共 5 页
字号:
        ORG    0000H
        LJMP   L12D7H
L0003H:
        CLR    P2.4
        LCALL  L1D7FH
        SETB   P2.4
        RET
        LJMP   L094BH
L000EH:
        MOV    76H, R7
        MOV    75H, R7
        RET
        LJMP   L1EE7H
L0016H:
        LCALL  L16AAH
        MOV    A, 34H
        SETB   C
        SUBB   A, #28H
        JC     L0023H
        MOV    34H, #22H
L0023H:
        LCALL  L1E1BH
        MOV    A, 5AH
        JZ     L0031H
        MOV    A, 4CH
        SETB   C
        SUBB   A, 38H
        JC     L005BH
L0031H:
        MOV    A, 66H
        JZ     L0038H
        LJMP   L02E4H
L0038H:
        CLR    A
        MOV    4CH, A
        MOV    5FH, A
        MOV    50H, A
        MOV    51H, A
        MOV    52H, A
        SETB   43H
        MOV    64H, A
        MOV    A, 4CH
        CPL    A
        MOV    4BH, A
        MOV    A, 37H
        JZ     L0057H
        LCALL  L1DE7H
        SETB   16H
        SETB   14H
L0057H:
        SETB   41H
        SJMP   L0068H
L005BH:
        SETB   41H
        LCALL  L158CH
        LCALL  L0DF3H
        LCALL  L1F27H
        SETB   14H
L0068H:
        MOV    5AH, #01H
        LCALL  L1E1BH
        MOV    C, 25H
        CPL    C
        MOV    40H, C
        MOV    C, 25H
        CPL    C
        MOV    55H, C
        MOV    C, 23H
        MOV    45H, C
        MOV    6AH, #02H
        SETB   59H
        CLR    42H
        CLR    48H
L0085H:
        LCALL  L1F2EH
        MOV    A, 4CH
        XRL    A, 4BH
        JNZ    L009FH
        MOV    A, 64H
        ANL    A, #03H
        XRL    A, #03H
        JZ     L009FH
        MOV    A, 4CH
        XRL    A, 38H
        JZ     L009FH
        LJMP   L0206H
L009FH:
        MOV    4BH, 4CH
        MOV    A, 4CH
        XRL    A, 37H
        JNZ    L0110H
        MOV    A, 5EH
        JNZ    L0110H
        CLR    14H
        CLR    16H
        JNB    10H, L00B5H
        MOV    62H, A
L00B5H:
        MOV    64H, #03H
        SETB   10H
        MOV    A, 37H
        JNZ    L00C2H
        MOV    A, 36H
        JZ     L00D0H
L00C2H:
        LCALL  L1F19H
        LCALL  L1E61H
        DJNZ   61H, L00C2H
        MOV    61H, #78H
        CLR    43H
L00D0H:
        CLR    15H
        LCALL  L1E1BH
        MOV    A, 51H
        JNZ    L00E0H
        MOV    A, 36H
        JZ     L00E0H
        LCALL  L1DE7H
L00E0H:
        CLR    A
        MOV    51H, A
        MOV    64H, #01H
        MOV    A, 36H
        JZ     L00F0H
        SETB   16H
        SETB   14H
        SJMP   L00F9H
L00F0H:
        MOV    64H, #03H
        LCALL  L1DB6H
        MOV    64H, #02H
L00F9H:
        CLR    43H
        MOV    A, 37H
        JNZ    L010DH
        MOV    A, 36H
        JNZ    L010DH
        MOV    64H, #02H
        SETB   43H
        MOV    5EH, #02H
        SJMP   L0110H
L010DH:
        MOV    5EH, #01H
L0110H:
        MOV    A, 37H
        ADD    A, 36H
        MOV    R7, A
        CLR    A
        RLC    A
        MOV    R6, A
        MOV    A, 4CH
        XRL    A, R7
        JNZ    L011EH
        MOV    A, R6
L011EH:
        JNZ    L0145H
        MOV    A, 5EH
        XRL    A, #01H
        JNZ    L0145H
        LCALL  L1E14H
        JNB    10H, L012FH
        CLR    A
        MOV    62H, A
L012FH:
        MOV    A, 36H
        JZ     L0137H
        SETB   10H
        SJMP   L0142H
L0137H:
        MOV    64H, #07H
        LCALL  L1DB6H
        CLR    43H
        MOV    64H, #06H
L0142H:
        MOV    5EH, #02H
L0145H:
        CLR    C
        MOV    A, 38H
        SUBB   A, 34H
        XRL    A, 4CH
        JNZ    L0173H
        MOV    A, 5EH
        XRL    A, #02H
        JNZ    L0173H
        LCALL  L1E14H
        MOV    A, 35H
        JZ     L0165H
        JNB    10H, L0161H
        CLR    A
        MOV    62H, A
L0161H:
        SETB   10H
        SJMP   L0170H
L0165H:
        MOV    64H, #07H
        LCALL  L1DB6H
        CLR    43H
        MOV    64H, #06H
L0170H:
        MOV    5EH, #03H
L0173H:
        MOV    A, 4CH
        CLR    C
        SUBB   A, 38H
        JNC    L017DH
        LJMP   L0206H
L017DH:
        CLR    A
        MOV    62H, A
        LCALL  L1F19H
        JB     22H, L018FH
        MOV    A, 5FH
        JNZ    L018FH
        MOV    66H, #09H
L018DH:
        SJMP   L018DH
L018FH:
        CLR    A
        MOV    5FH, A
        LCALL  L1F19H
        CLR    14H
        CLR    16H
        CLR    17H
        JB     23H, L01A5H
        MOV    A, 54H
        CJNE   A, #01H, L01A5H
        SJMP   L0202H
L01A5H:
        MOV    A, 56H
        JNZ    L01BDH
        SETB   10H
L01ABH:
        LCALL  L1F0BH
        JNB    43H, L01ABH
        MOV    56H, #01H
        SETB   0CH
        MOV    R7, #0C8H
        MOV    R6, #00H
        LCALL  L0003H
L01BDH:
        MOV    A, 52H
        JB     ACC.0, L01C8H
        MOV    A, 3AH
        XRL    A, #01H
        JZ     L01CBH
L01C8H:
        JNB    53H, L01D3H
L01CBH:
        LCALL  L1C1BH
        MOV    52H, #01H
        SJMP   L01D5H
L01D3H:
        CLR    10H
L01D5H:
        CLR    A
        MOV    55H, A
        MOV    A, 52H
        ANL    A, #03H
        XRL    A, #03H
        JZ     L01EBH
        MOV    A, 3AH
        CJNE   A, #01H, L01EBH
        LCALL  L1198H
        MOV    52H, #03H
L01EBH:
        MOV    A, 52H
        XRL    A, #07H
        JZ     L01FCH
        MOV    A, 3AH
        CJNE   A, #01H, L01FCH
        LCALL  L1707H
        MOV    52H, #07H
L01FCH:
        CLR    A
        MOV    52H, A
        LCALL  L1E82H
L0202H:
        CLR    A
        MOV    62H, A
        RET
L0206H:
        JB     42H, L022AH
        LCALL  L1B11H
        MOV    6EH, R7
        MOV    A, 35H
        JZ     L021AH
        MOV    A, 36H
        JZ     L021AH
        MOV    A, 37H
        JNZ    L022AH
L021AH:
        MOV    A, 55H
        CJNE   A, #01H, L022AH
        JB     59H, L022AH
        MOV    R7, 6EH
        LCALL  L1D9CH
        CLR    A
        MOV    6EH, A
L022AH:
        MOV    A, 64H
        ANL    A, #03H
        MOV    R7, A
        CJNE   R7, #01H, L0235H
        MOV    62H, #01H
L0235H:
        MOV    A, R7
        XRL    A, #02H
        JNZ    L02A0H
        JNB    43H, L025EH
        MOV    6BH, A
L023FH:
        LCALL  L1F19H
        LCALL  L1E61H
        DJNZ   61H, L023FH
        MOV    61H, #78H
        MOV    A, 4CH
        JB     ACC.0, L0253H
        LCALL  L1DE7H
L0253H:
        MOV    64H, #05H
        CLR    43H
        SETB   16H
        SETB   14H
        SJMP   L02A0H
L025EH:
        LCALL  L1E61H
        CLR    A
        MOV    45H, A
        MOV    67H, A
        MOV    A, 4CH
        SETB   C
        SUBB   A, 37H
        JNC    L0272H
        CLR    A
        MOV    6BH, A
        SJMP   L0281H
L0272H:
        MOV    A, 6BH
        CLR    C
        SUBB   A, #28H
        JC     L0281H
        MOV    66H, #06H
        MOV    5DH, #01H
L027FH:
        SJMP   L027FH
L0281H:
        JNB    27H, L028DH
        JNB    26H, L028DH
        MOV    R6, #00H
        MOV    R7, #01H
        SJMP   L0291H
L028DH:
        MOV    R6, #00H
        MOV    R7, #00H
L0291H:
        MOV    A, R7
        ORL    A, R6
        JZ     L0298H
        LJMP   L0085H
L0298H:
        CLR    14H
        ANL    4CH, #0FEH
        LJMP   L0085H
L02A0H:
        JB     10H, L02A8H
        CLR    A
        MOV    6BH, A
        SJMP   L02B7H
L02A8H:
        MOV    A, 6BH
        CLR    C
        SUBB   A, #28H
        JC     L02B7H
        MOV    66H, #06H
        MOV    5DH, #01H
L02B5H:
        SJMP   L02B5H
L02B7H:
        JNB    4FH, L02C4H
        MOV    66H, #08H
        SETB   TF0
L02BFH:
        CLR    A
        MOV    3EH, A
        SJMP   L02BFH
L02C4H:
        JB     42H, L02DEH
        LCALL  L145DH
        MOV    R7, 6EH
        LCALL  L1DCFH
        LCALL  L1983H
        LCALL  L1248H
        LCALL  L1CE4H
        MOV    6AH, #02H
        LJMP   L0085H
L02DEH:
        LCALL  L0F1DH
        LJMP   L0085H
L02E4H:
        RET
L02E5H:
        LCALL  L1EAFH
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        MOV    A, 44H
        MOV    R7, A
        CJNE   R7, #01H, L02F8H
        LCALL  L152BH
L02F8H:
        LCALL  L16AAH
        LCALL  L1D04H
        MOV    44H, R7
        LCALL  L1F27H
        MOV    6DH, 3FH
        MOV    A, 44H
        ANL    A, #0FH
        JZ     L033AH
        MOV    A, 6DH
        CLR    C
        SUBB   A, #01H
        JC     L0325H
        MOV    A, 6DH
        SETB   C
        SUBB   A, #08H
        JNC    L0325H
        CLR    54H
        MOV    R7, #32H
        MOV    R6, #00H
        LCALL  L0003H
        SJMP   L0330H
L0325H:
        MOV    A, 39H
        JB     ACC.0, L032EH
        CLR    54H
        SJMP   L0330H
L032EH:
        SETB   54H
L0330H:
        MOV    A, 3BH
        XRL    A, 44H
        JZ     L033EH
        CLR    54H
        SJMP   L033EH
L033AH:
        SETB   53H
        CLR    54H
L033EH:
        LCALL  L158CH
        LCALL  L1D04H
        MOV    44H, R7
        LCALL  L1804H
        SETB   4EH
        JNB    54H, L0358H
        MOV    A, 5CH
        CJNE   A, #01H, L0358H
        LCALL  L13E1H
        SETB   0CH
L0358H:
        MOV    A, 5DH
        CJNE   A, #01H, L0362H
        CLR    54H
        CLR    A
        MOV    5DH, A
L0362H:
        MOV    R7, #01H
        LCALL  L000EH
L0367H:
        MOV    A, 44H
        ANL    A, #0F0H
        ADD    A, #80H
        JZ     L0387H
        ADD    A, #0C0H
        JZ     L0387H
        ADD    A, #0E0H
        JZ     L0387H
        ADD    A, #0F0H
        JZ     L0393H
        ADD    A, #0F0H
        JZ     L0382H
        LJMP   L057BH
L0382H:
        LCALL  L077AH
        SJMP   L0382H
L0387H:
        MOV    A, 4CH
        JZ     L038EH
        JB     54H, L0393H
L038EH:
        MOV    R7, 44H
        LCALL  L0B1BH
L0393H:
        CLR    5AH
        CLR    A
        MOV    6AH, A
        LCALL  L1CA2H
        LCALL  L1F2EH
        CLR    4BH
        MOV    R7, #01H
        LCALL  L10E2H
        MOV    A, 58H
        CJNE   A, #02H, L03ADH
        LCALL  L1E72H
L03ADH:
        CLR    A
        MOV    22H, A
        MOV    23H, A
        JNB    54H, L0400H
        MOV    31H, #0FFH
        LCALL  L1D23H
        MOV    20H, 49H
        MOV    21H, 4AH
        MOV    A, 5AH
        XRL    A, #01H
        JNZ    L03F5H
        MOV    A, 4CH
        SETB   C
        SUBB   A, 38H
        JNC    L03F5H
        LCALL  L0016H
        MOV    A, 66H
        JNZ    L03D8H
        LCALL  L14C9H
L03D8H:
        MOV    A, 31H
        CPL    A
        JZ     L03F5H
        MOV    6AH, #01H
        SETB   56H
        JB     58H, L03F5H
        JNB    20H, L03EBH
        JNB    21H, L03EEH
L03EBH:
        LCALL  L1F20H
L03EEH:
        MOV    A, 31H
        JNB    ACC.0, L03F5H
        SETB   5AH
L03F5H:
        CLR    54H
        CLR    A
        MOV    22H, A
        MOV    23H, A
        CLR    47H
        SJMP   L0413H
L0400H:
        LCALL  L1ED3H
        LCALL  L1B65H
        SETB   0CH
        CLR    A
        MOV    5AH, A
        CLR    4AH
        MOV    4FH, A
        MOV    4EH, A
        SETB   47H
L0413H:
        MOV    61H, #78H
        CLR    A
        MOV    53H, A
        MOV    5EH, A
        MOV    54H, A
        MOV    55H, A
        MOV    56H, A
        MOV    A, 21H
        ANL    A, #1FH
        MOV    65H, A
        MOV    31H, #0FFH
        MOV    6AH, #02H
        SETB   41H
        CLR    A
        MOV    64H, A
        CLR    43H
        CLR    58H
        JNB    56H, L043BH
        SETB   0CH
L043BH:
        MOV    A, 66H
        JNZ    L0442H
        LCALL  L14C9H
L0442H:
        CLR    A
        MOV    45H, A
L0445H:
        JNB    53H, L0453H
        MOV    A, 25H
        ANL    A, #0FH
        JZ     L0453H
        MOV    R7, #01H
        LCALL  L10E2H
L0453H:
        JNB    4FH, L045EH
        MOV    66H, #08H
L0459H:
        CLR    A
        MOV    3EH, A
        SJMP   L0459H
L045EH:
        MOV    A, 34H
        JNZ    L0467H
        MOV    66H, #04H
L0465H:
        SJMP   L0465H
L0467H:
        JB     5AH, L047FH
        LCALL  L1F19H
        JB     13H, L047AH
        LCALL  L1B11H
        MOV    6DH, R7
        LCALL  L1DCFH
        SJMP   L048AH
L047AH:
        CLR    A
        MOV    6DH, A
        SJMP   L048AH
L047FH:
        LCALL  L14C9H
        CLR    A
        MOV    31H, A
        MOV    6AH, #01H
        SETB   56H
L048AH:
        JNB    25H, L0494H
        MOV    A, 67H
        CLR    C
        SUBB   A, #3CH

⌨️ 快捷键说明

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