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

📄 noname.asm

📁 用51单片机做的4路超声波倒车雷达
💻 ASM
字号:
        ORG    0000H
L0000H:
        LJMP   L0378H
L0003H:
        DEC    R7
        MOV    A, R7
        JNZ    L0003H
        RET    
        MOV    R7, A
        MOV    R7, A
        MOV    R7, A
        AJMP   L0384H
L000DH:
        MOV    A, #2AH
        ADD    A, 3CH
        MOV    R0, A
        MOV    A, @R0
        MOV    R7, A
        INC    3CH
        ANL    3CH, #07H
        MOV    A, 3DH
        CJNE   A, 3CH, L0020H
        SETB   0FH
L0020H:
        CLR    10H
        RET    
        AJMP   L02FFH
L0025H:
        JB     0CH, L002AH
        AJMP   L015CH
L002AH:
        CLR    13H
        MOV    20H, 41H
        MOV    A, 20H
        ANL    A, #60H
        MOV    43H, A
        SWAP   A
        RRC    A
        ANL    A, #07H
        MOV    43H, A
        MOV    A, 3FH
        ANL    A, #0CH
        MOV    R6, A
        RRC    A
        RRC    A
        ANL    A, #3FH
        MOV    R6, A
        MOV    R7, 40H
        CLR    A
        MOV    R5, A
L0049H:
        MOV    A, R5
        CLR    C
        SUBB   A, #04H
        JNC    L00ADH
        MOV    A, R7
        ANL    A, #03H
        MOV    R4, A
        CLR    C
        MOV    A, #03H
        SUBB   A, R5
        ADD    A, ACC
        ADD    A, ACC
        ADD    A, #56H
        MOV    DPL, A
        CLR    A
        ADDC   A, #03H
        MOV    DPH, A
        MOV    A, DPL
        ADD    A, R4
        MOV    DPL, A
        CLR    A
        ADDC   A, DPH
        MOV    DPH, A
        CLR    A
        MOVC   A, @A+DPTR
        MOV    R3, A
        CLR    C
        MOV    A, #03H
        SUBB   A, R5
        ADD    A, #08H
        MOV    R0, A
        MOV    @R0, 03H
        CLR    C
        MOV    A, #03H
        SUBB   A, R5
        XRL    A, R6
        JNZ    L00A4H
        MOV    R3, #38H
        MOV    R2, A
L0084H:
        MOV    A, R2
        XRL    A, R4
        JZ     L008FH
        MOV    A, R3
        ADD    A, ACC
        MOV    R3, A
        INC    R2
        SJMP   L0084H
L008FH:
        MOV    3AH, R3
        MOV    A, 3FH
        CPL    A
        MOV    R3, A
        ANL    03H, #03H
        MOV    A, R3
        ORL    3AH, A
        MOV    29H, R4
        MOV    A, 29H
        CJNE   A, #03H, L00A4H
        SETB   13H
L00A4H:
        MOV    A, R7
        RRC    A
        RRC    A
        ANL    A, #3FH
        MOV    R7, A
        INC    R5
        SJMP   L0049H
L00ADH:
        MOV    A, 08H
        ORL    A, 0AH
        ORL    A, 0BH
        ORL    A, 09H
        MOV    3BH, A
        JNB    13H, L00BFH
        SETB   14H
        CLR    A
        MOV    3EH, A
L00BFH:
        JNB    00H, L00C7H
        MOV    39H, #92H
        SJMP   L00CAH
L00C7H:
        MOV    39H, #0C0H
L00CAH:
        MOV    A, 20H
        CLR    C
        RRC    A
        MOV    20H, A
        ANL    20H, #0FH
        JNB    14H, L00F1H
        MOV    A, 43H
        JNZ    L00E1H
        MOV    A, 20H
        CLR    C
        SUBB   A, #06H
        JC     L0145H
L00E1H:
        INC    3EH
        MOV    A, 3EH
        SETB   C
        SUBB   A, #09H
        JC     L0145H
        CLR    14H
        CLR    A
        MOV    3EH, A
        SJMP   L0145H
L00F1H:
        MOV    A, 43H
        DEC    A
        JZ     L0105H
        DEC    A
        JZ     L010AH
        DEC    A
        JZ     L010FH
        ADD    A, #03H
        JNZ    L0114H
        MOV    37H, #40H
        SJMP   L0117H
L0105H:
        MOV    37H, #79H
        SJMP   L0117H
L010AH:
        MOV    37H, #24H
        SJMP   L0117H
L010FH:
        MOV    37H, #30H
        SJMP   L0117H
L0114H:
        MOV    37H, #0FFH
L0117H:
        MOV    A, 20H
        CJNE   A, #0FH, L0129H
        MOV    37H, #0BFH
        MOV    38H, #0BFH
        MOV    39H, #0BFH
        SETB   09H
        SJMP   L0145H
L0129H:
        MOV    A, 43H
        CLR    C
        SUBB   A, #02H
        JC     L0134H
        SETB   09H
        SJMP   L0136H
L0134H:
        CLR    09H
L0136H:
        MOV    A, 20H
        CLR    C
        SUBB   A, #0AH
        JNC    L0145H
        MOV    A, 20H
        MOV    DPTR, #036EH
        MOVC   A, @A+DPTR
        MOV    38H, A
L0145H:
        JNB    14H, L01A0H
        MOV    37H, #0BFH
        MOV    38H, #8CH
        MOV    39H, #0BFH
        MOV    29H, #03H
        MOV    42H, #32H
        CLR    P3.1
        CLR    09H
        RET    
L015CH:
        MOV    3AH, #0FFH
        MOV    DPTR, #0376H
        CLR    A
        MOVC   A, @A+DPTR
        MOV    37H, A
        CLR    A
        MOVC   A, @A+DPTR
        MOV    38H, A
        CLR    A
        MOVC   A, @A+DPTR
        MOV    39H, A
        MOV    R7, 3FH
        ANL    07H, #0FH
        MOV    29H, #03H
        CLR    09H
        MOV    A, R7
        DEC    A
        JZ     L0191H
        DEC    A
        JZ     L0195H
        ADD    A, #0FEH
        JZ     L0199H
        ADD    A, #0FCH
        JZ     L019DH
        ADD    A, #08H
        JNZ    L01A0H
        MOV    3BH, #55H
        SETB   09H
        RET    
L0191H:
        MOV    3BH, #65H
        RET    
L0195H:
        MOV    3BH, #59H
        RET    
L0199H:
        MOV    3BH, #95H
        RET    
L019DH:
        MOV    3BH, #56H
L01A0H:
        RET    
L01A1H:
        ACALL  L025BH
        SETB   EA
        CLR    A
        MOV    R1, A
        MOV    23H, #01H
        MOV    25H, #02H
        MOV    27H, #03H
L01B0H:
        JNB    0FH, L01B5H
        AJMP   L023BH
L01B5H:
        ACALL  L000DH
        MOV    A, #3FH
        ADD    A, 36H
        MOV    R0, A
        MOV    @R0, 07H
        CLR    12H
        MOV    A, 36H
        JNZ    L01E1H
        CLR    0CH
        MOV    A, R7
        ANL    A, #0F0H
        CJNE   A, #50H, L01D4H
        SETB   0CH
        CLR    08H
        INC    36H
        SJMP   L01F5H
L01D4H:
        CLR    A
        MOV    40H, A
        MOV    41H, A
        SETB   08H
        SETB   12H
        CLR    0CH
        SJMP   L01F5H
L01E1H:
        JNB    0CH, L01F2H
        INC    36H
        MOV    A, 36H
        CJNE   A, #03H, L01F5H
        SETB   12H
        CLR    A
        MOV    36H, A
        SJMP   L01F5H
L01F2H:
        CLR    A
        MOV    36H, A
L01F5H:
        JNB    12H, L023BH
        MOV    A, #23H
        ADD    A, R1
        MOV    R0, A
        MOV    @R0, 41H
        INC    R1
        MOV    A, #23H
        ADD    A, R1
        MOV    R0, A
        MOV    @R0, 40H
        INC    R1
        MOV    A, R1
        CJNE   A, #06H, L020CH
        CLR    A
        MOV    R1, A
L020CH:
        MOV    A, 23H
        CJNE   A, 25H, L021AH
        MOV    41H, A
        MOV    40H, 24H
        SETB   11H
        SJMP   L023BH
L021AH:
        MOV    A, 23H
        CJNE   A, 27H, L0228H
        MOV    41H, A
        MOV    40H, 24H
        SETB   11H
        SJMP   L023BH
L0228H:
        MOV    A, 27H
        CJNE   A, 25H, L0237H
        MOV    41H, 25H
        MOV    40H, 26H
        SETB   11H
        SJMP   L023BH
L0237H:
        CLR    0BH
        CLR    11H
L023BH:
        JNB    11H, L0244H
        ACALL  L0025H
L0240H:
        SETB   0BH
        CLR    11H
L0244H:
        JNB    0DH, L024FH
        CLR    0DH
        ACALL  L0334H
        ACALL  L02BEH
        AJMP   L01B0H
L024FH:
        JB     0BH, L0254H
        AJMP   L01B0H
L0254H:
        CLR    0BH
        ACALL  L02BEH
        AJMP   L01B0H
        RET    
L025BH:
        CLR    EA
        ANL    TMOD, #0FH
        ORL    TMOD, #20H
        ORL    PCON, #80H
        MOV    TH1, #0F4H
        MOV    TL1, TH1
        SETB   TR1
        MOV    SCON, #50H
        SETB   PS
        SETB   ES
        ANL    TMOD, #0F0H
        ORL    TMOD, #01H
        MOV    TL0, #67H
        MOV    TH0, #0FDH
        SETB   TR0
        SETB   ET0
        CLR    A
        MOV    36H, A
        SETB   0CH
        MOV    37H, #0FFH
        MOV    38H, #0FFH
        MOV    39H, #0FFH
        MOV    3AH, #0FFH
        MOV    3BH, #0FFH
        MOV    3FH, A
        MOV    40H, A
        MOV    41H, A
        MOV    3EH, A
        SETB   P3.1
        SETB   09H
        CLR    10H
        CLR    0BH
        CLR    08H
        SETB   0FH
        MOV    3CH, A
        MOV    3DH, A
        SETB   P3.2
        SETB   P3.3
        SETB   P3.4
        SETB   P3.7
        SETB   P3.5
        SETB   0EH
        RET    
L02BEH:
        INC    32H
        MOV    A, 32H
        CJNE   A, #05H, L02C8H
        CLR    A
        MOV    32H, A
L02C8H:
        MOV    A, #37H
        ADD    A, 32H
        MOV    R0, A
        MOV    A, @R0
        MOV    P1, A
        SETB   P3.2
        SETB   P3.3
        SETB   P3.4
        SETB   P3.5
        SETB   P3.7
        MOV    R7, #0AH
        ACALL  L0003H
L02DEH:
        MOV    A, 32H
        DEC    A
        JZ     L02F3H
        DEC    A
        JZ     L02F6H
        DEC    A
        JZ     L02F9H
        DEC    A
        JZ     L02FCH
        ADD    A, #04H
        JNZ    L02FEH
        CLR    P3.2
        RET    
L02F3H:
        CLR    P3.3
        RET    
L02F6H:
        CLR    P3.4
        RET    
L02F9H:
        CLR    P3.5
        RET    
L02FCH:
        CLR    P3.7
L02FEH:
        RET    
L02FFH:
        PUSH   ACC
        PUSH   PSW
        MOV    PSW, #00H
        PUSH   00H
L0308H:
        PUSH   07H
        JNB    RI, L0329H
        CLR    RI
        MOV    R7, SBUF
        JB     10H, L0329H
        MOV    A, #2AH
        ADD    A, 3DH
        MOV    R0, A
        MOV    @R0, 07H
        INC    3DH
        ANL    3DH, #07H
        MOV    A, 3DH
        CJNE   A, 3CH, L0327H
        SETB   10H
L0327H:
        CLR    0FH
L0329H:
        CLR    TI
        POP    07H
        POP    00H
        POP    PSW
        POP    ACC
        RETI   
L0334H:
        JB     09H, L0351H
        DEC    42H
        MOV    A, 42H
        JNZ    L0355H
        JNB    0AH, L0344H
        SETB   P3.1
        SJMP   L0346H
L0344H:
        CLR    P3.1
L0346H:
        MOV    A, 29H
        MOV    DPTR, #036AH
        MOVC   A, @A+DPTR
        MOV    42H, A
        CPL    0AH
        RET    
L0351H:
        SETB   P3.1
        CLR    0AH
L0355H:
        RET    
        AJMP   L0000H
        LJMP   L0240H
        NOP    
        SJMP   L02DEH
        INC    A
L035FH:
        NOP    
        INC    R0
        INC    R0
        JBC    00H, L0385H
        JB     02H, L0370H
        JB     80H.0, L035FH
        MOV    R2, A
        MOV    R5, #32H
        PUSH   0F9H
L0370H:
        MUL    AB
        ANL    C, /TI
        MOV    80H.2, C
        MOV    R0, A
        SJMP   L0308H
L0378H:
        MOV    R0, #7FH
        CLR    A
L037BH:
        MOV    @R0, A
        DJNZ   R0, L037BH
        MOV    SP, #43H
        LJMP   L01A1H
L0384H:
        DB     75H
L0385H:
        MOV    67H, R2
        MOV    TH0, #0FDH
        SETB   0DH
        RETI   

        END

⌨️ 快捷键说明

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