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

📄 lc72131.asm

📁 LC72131完整程序
💻 ASM
📖 第 1 页 / 共 5 页
字号:
BBB45:  MOV     42H,#0C8H
BBB48:  RET

AAB49:  JNB     02H,BBB51
        DJNZ    09H,BBB68
        CLR     02H
BBB51:  MOV     09H,#19H
        RET

AAB55:  MOV     A,12H
        CJNE    A,#05H,BBB68
        DJNZ    1DH,BBB68
        MOV     12H,#00H
        JB      04H,BBB68
        LCALL   AA615
        lCALL   AA85C
BBB68:  RET

AAB69:  MOV     A,12H
        CJNE    A,#04H,BBB7C
        DJNZ    16H,BBB68
        MOV     16H,#19H
        CPL     06H
        JB      06H,BBB97
        LJMP    AABC0            ;MUTE
BBB7C:  MOV     16H,#19H
        RET

AAB80:  MOV     A,12H
        CJNE    A,#02H,BBB93
        DJNZ    15H,BBB96
        MOV     15H,#19H
        CPL     06H
        JB      06H,BBB97
        LJMP    AABA9             ;ACOUT
BBB93:  MOV     15H,#19H
BBB96:  RET
BBB97:  lJMP    AAD44

AAB99:  MOV     A,12H
        CJNE    A,#02H,BBBA5
        DJNZ    14H,BBB68
        MOV     12H,#00H
        RET
BBBA5:  MOV     14H,#0F9H
        RET
AABA9:  ORL     33H,#6CH;#0eeh;0DCH    ;MEMOY ACOUT

        MOV     34H,#05H;00h;01H
        ORL     35H,#0F2H;72h;0E4H
        ORL     37H,#6CH;00H;7eh;0FCH
        ORL     38H,#05H
        ORL     39H,#7EH;6CH;7ch;0F8H
        ORL     3AH,#00H;05H
        ORL     3BH,#00H;7EH;0dah;0B4H
        MOV     3CH,#15H;00H;00h;01H
        lJMP    AA85C

AABC0:  ORL     33H,#6ch;0D8H    ;MUTE
        MOV     34H,#05h;0AH
        ORL     35H,#7ch;0F8H
        ORL     37H,#02h;04H
        MOV     38H,#12h;24H
        ORL     39H,#0f2h;0E4H
        ORL     3AH,#00h;01H
        lJMP    AA85C

AABD7:  lCALL   AAD48           ;PRTCD
        ORL     33H,#0e6h;0CCH
        ORL     34H,#00h;01H
        ORL     35H,#0e6h;0CCH
        MOV     36H,#08h;11H
        ORL     37H,#02h;04H
        MOV     38H,#12h;24H
        ORL     39H,#7eh;0FCH
        ORL     3BH,#1eh;3CH
        MOV     3CH,#12h;24H
        lJMP    AA85C

AABF6:  lCALL   AAD48             ;ERROR
        ORL     33H,#0f2h;0E4H
        MOV     34H,#00h;01H
        ORL     35H,#0e6h;0CCH
        MOV     36H,#08h;11H
        ORL     37H,#0e6h;0CCH
        MOV     38H,#08h;11H
        ORL     39H,#7eh;0FCH
        ORL     3BH,#0e6h;0CCH
        MOV     3CH,#08h;11H
        lJMP    AA85C

AAC15:  ORL     33H,#7eh;0FCH     ;OK ON
        ORL     35H,#60h;0C0H
        ORL     36H,#2ch;58H
        ORL     39H,#7eh;0FCH
        ORL     3BH,#6ch;0D8H
        ORL     3CH,#09h;12H
        RET

AAC28:  ORL     33H,#7eh;0FCH     ;OKOFF
        ORL     35H,#60h;0C0H
        ORL     36H,#2ch;58H
        ORL     37H,#7eh;0FCH
        ORL     39H,#0e2h;0C4H
        ORL     3AH,#00h;01H
        ORL     3BH,#0e2h;0C4H
        ORL     3CH,#00h;01H
        RET

AAC41:  ORL     33H,#7eh;0FCH     ;OK
        ORL     35H,#60h;0C0H
        ORL     36H,#2ch;58H
        lJMP    AA85C

AAC4C:  ORL     33H,#72h;0E4H     ;CENTER
        ORL     35H,#0f2h;0E4H
        MOV     36H,#00h;01H
        ORL     37H,#6ch;0D8H
        MOV     38H,#09h;12H
        ORL     39H,#02h;04H
        MOV     3AH,#12h;24H
        ORL     3BH,#0e6h;0CCH
        MOV     3CH,#08h;11H
        JB      04H,BBC70
        ANL     40H,#0fbh;0EFH
        orl     3eh,#02h
       ; ORL     40H,#08H
BBC70:  lJMP    AA85C 
AAC72:  ORL     33H,#0dah;0B4H     ;SURND
        MOV     34H,#00h;01H
        ORL     35H,#7ch;0F8H
        ORL     37H,#0e6h;0CCH
        MOV     38H,#08h;11H
        ORL     39H,#6ch;0D8H
        MOV     3AH,#09h;12H
        ORL     3BH,#1eh;3CH
        MOV     3CH,#12h;24H
        ANL     40H,#0fbh;0EFH
        orl     3eh,#02h
        ;ORL     40H,#08H
        lJMP    AA85C

AAC95:  ORL     33H,#1eh;3CH        ;DELAY
        MOV     34H,#12h;24H
        ORL     35H,#0f2h;0E4H
        MOV     36H,#00h;01H
        ORL     37H,#70h;0E0H
        ORL     39H,#0eeh;0DCH
        MOV     3AH,#00h;01H
        MOV     3CH,#15h;2AH
       ;ANL     40H,#0F7H
        anl     3eh,#0fdh
        ORL     40H,#04h;10H
        lJMP    AA85C

AACB5:  MOV     A,1EH
        CLR     C
        ACALL   AACB8
        lJMP    AA85C
AACB8:  MOV     0F0H,#0AH
        DIV     AB
        MOV     DPTR,#TA00E 
        ANL     3DH,#00h;01h;03H
        MOVC    A,@A+DPTR
        ORL     A,3DH
        MOV     3DH,A
        MOV     DPTR,#TA00E
        MOV     A,0F0H
        MOVC    A,@A+DPTR
        ANL     3FH,#01h;03H
        ORL     A,3FH
        MOV     3FH,A
        RET

AACEE:   ORL     33H,#70h;0E0H        ;L\CH
        orl     35h,#80h
        ORL     36H,#00h;01H
        ORL     37H,#72h;0E4H
        ORL     39H,#0ech;0D8H
        MOV     3AH,#00h;01H
        lJMP    AA85C

AACFF:  ORL     33H,#0e6h;0CCH         ;R\CH
        MOV     34H,#08h;11H
        orl     35h,#80h
        ORL     36H,#00h;01H
        ORL     37H,#72h;0E4H
        ORL     39H,#0ech;0D8H
        ORL     3AH,#00h;01H
        lJMP    AA85C

AAD13:  ORL     33H,#0dah;0B4H          ;SUR\R
        MOV     34H,#00h;01H
        ORL     35H,#7ch;0F8H
        ORL     37H,#0e6h;0CCH
        MOV     38H,#08h;11H
        orl     39h,#80h
        ORL     3AH,#00h;01H
        ORL     3BH,#0e6h;0CCH
        MOV     3CH,#08h;11H
        lJMP    AA85C

AAD2D:  ORL     33H,#0dah;0B4H           ; SUR\L
        MOV     34H,#00h;01H
        ORL     35H,#7ch;0F8H
        ORL     37H,#0e6h;0CCH
        MOV     38H,#08h;11H
        orl     39h,#80h
        ORL     3AH,#00h;01H
        ORL     3BH,#70h;0E0H
        lJMP    AA85C

AAD44:  ACALL   AAD48
        lJMP    AA85C

AAD48:  MOV     R0,#33H
BBD4A:  MOV     A,@R0
        ANL     A,#01h;03H
        MOV     @R0,A
        INC     R0
        MOV     @R0,#00H
        INC     R0
        MOV     A,R0
        CJNE    A,#3DH,BBD4A
        RET

AAD57:  MOV     30H,#00H
        MOV     R0,#30H
        MOV     R1,#48h;78H;28h
        SETB    90H
        CLR     80H
BBD62:  MOV     7dh,@R0 ;4ah
        MOV     R3,#08H
BBD66:  MOV     A,7dh;4AH
        RRC     A
        CLR     90H
        MOV     91H,C
        MOV     7dh,a;4AH,A
        SETB    90H
        MOV     A,R4
        MOV     C,92H
        RRC     A
        MOV     R4,A
        DJNZ    R3,BBD66
        CJNE    R1,#50H,BBD7D;30h
        SJMP    BBD7F
BBD7D:  MOV     @R1,A
        INC     R1      
BBD7F:  INC     R0
        CJNE    R0,#42H,BBD62
        SETB    80H
        MOV     R1,#48h;78H ;28h
        MOV     7eh,#00h;4BH,#00H
        MOV     R3,#08H
BBD8C:  MOV     7fh,#00h;4CH,#00H
        MOV     R2,#04H
        MOV     A,@R1
BBD92:  JB      0E0H,BBDA7
        RR      A
        XCH     A,7fh;4CH
        ADD     A,#08H
        XCH     A,7fh;4CH
        DJNZ    R2,BBD92
        INC     7eh;4BH
        INC     R1
        DJNZ    R3,BBD8C
        CLR     00H
        SJMP    BBDC1
BBDA7:  JNB     00H,BBDAC
        SJMP    BBDC1
BBDAC:  MOV     A,7fh;4CH
        ADD     A,7eh;4BH
        PUSH    83H
        PUSH    82H
        LCALL   AADC2
        MOV     08H,A
        POP     82H
        POP     83H
        SETB    01H
        SETB    00H
BBDC1:  RET
AADC2:  MOV     DPTR,#TADC7
        MOVC    A,@A+DPTR
        RET
TADC7:  DB 10H,17H,11H,12H,16H,18H,24H,20H
        DB 14H,15H,13H,0FH,09H,0AH,1DH,21H
        DB 0DH,0EH,0CH,08H,07H,06H,1EH,22H
        DB 05H,0BH,04H,03H,02H,01H,1FH,23H
        
AADE9:  MOV     0CH,83H    
        MOV     0DH,82H    
        MOV     A,0CH
        RL      A
        MOV     0EH,#0A0H
        ADD     A,0EH
        MOV     0EH,A
        ACALL   AAE4A
        MOV     A,0EH
        ACALL   AAE29
        MOV     A,0DH
        ACALL   AAE29
        RET
AADE7:  CLR     0AFH
        PUSH    00H
        ACALL   AADE9
        ACALL   AAE4A
        INC     0EH
        MOV     A,0EH
        ACALL   AAE29
        ACALL   AAE39
        MOV     0FH,A
        ACALL   AAE57
        POP     00H
        SETB    0AFH
        RET

AAE29:  MOV     R0,#08H
BBE2B:  RLC     A
        MOV     0B6H,C
        NOP
        NOP
        SETB    0B7H
        NOP
        NOP
        CLR     0B7H
        DJNZ    R0,BBE2B
aae1e:  setb    0b6h
        setb    0b7h
bbe22:  jb      0b6h,bbe22
        nop
        clr     0b7h
        RET

AAE39:  MOV     R0,#08H
        SETB    0B6H
BBE3E:  NOP
        SETB    0B7H
        NOP
        MOV     C,0B6H
        RLC     A
        NOP
        CLR     0B7H
        DJNZ    R0,BBE3E
        RET

AAE4A:  SETB    0B6H
        SETB    0B7H
        NOP
        NOP
        CLR     0B6H
        NOP
        NOP
        CLR     0B7H
        RET

AAE57:  CLR     0B6H
        SETB    0B7H
        NOP
        NOP
        SETB    0B6H
        NOP
        NOP
        CLR     0B7H
        RET

AAE64:  MOV     R5,#02H
BBE66:  ACALL   AAE6B
        DJNZ    R5,BBE66
        RET
AAE6B:  MOV     R7,#00H
BBE6D:  MOV     R6,#7FH
BBE6F:  DJNZ    R6,BBE6F
        DJNZ    R7,BBE6D
        RET

AAE74:  MOV     R7,#80H
BBE76:  DJNZ    R7,BBE76
        RET

AAE79:  MOV     R6,#64H
BBE7B:  lCALL   AAE74
        DJNZ    R6,BBE7B
        RET

MAIN:   MOV     SP,#60H                                 ;0E80
        mov     20h,#00h
        mov     23h,#00h
        mov     24h,#00h
        mov     25h,#00h
        mov     26h,#00h
        mov     27h,#00h
        mov     5eh,#0ach
        mov     5fh,#07h
        mov     5ch,#0c4h
        SETB    3BH      ;SETB 3B
        MOV     89H,#51H  ;MOV 89,#51
        MOV     TH0,#0E9H  ;MOV 8C,#E9
        MOV     TL0,#0B3H  ;MOV 8A,#B3
        MOV     TH1,#00H  ;MOV 8D,#00
        MOV     TL1,#00H  ;MOV 8B,#00
        CLR     88H    ;CLR 88
        CLR     8AH    ;CLR 8A
        SETB    8CH    ;SETB 8C
        SETB    8EH    ;SETB 8E
        SETB    0A9H      ;SETB A9
        SETB    88H    ;SETB 88
        SETB    0A8H      ;SETB A8
        SETB    0B8H      ;SETB B8
        SETB    0AFH     ;SETB AF
        SETB    P0.0      ;SETB 80
        MOV     P1,#0B7H  ;MOV 90,#0B7
        SETB    P0.6      ;SETB 86
        SETB    P2.7      ;SETB A7
        CLR     23H      ;CLR  23
        CLR     P2.6      ;CLR  A6
        CLR     P2.5      ;CLR  A5
        CLR     P0.1      ;CLR  81
        CLR     P0.2      ;CLR  82
        CLR     P3.0      ;CLR  B0
        CLR     P3.1      ;CLR  B1
        CLR     04H      ;CLR  04
        CLR     38H      ;CLR  38
        CLR     39H      ;CLR  39
        CLR     P3.5      ;CLR  B5
        CLR     15H      ;CLR  15
        MOV     23H,#00H  ;MOV  23,#00
        lCALL   AA8DE    ;ACALL 08DE           ?08DD
        CLR     14H      ;CLR  14
        SETB    3EH      ;SETB 3E
        MOV     A,#00H
        MOV     R0,#30H
 W0:    MOV     @R0,A
        INC     R0
        CJNE    R0,#41H,W0;CJNE R0,#41,0ED4
        MOV     0AH,#0FFH
        MOV     12H,#01H
        MOV     09H,#19H
        MOV     1CH,#02H
        MOV     1DH,#0C8H
        SETB    07H        ;SETB 07
        CLR     11H        ;CLR  11
        ;MOV     44H,#0AH
        SETB    02H        ;SETB  02
W1:     JB      02H,W1     ;JB 02,0EF1
        LCALL   AA018     ;LCALL 0018
        MOV     46H,#00H  ;48h
        MOV     47H,#00H  ;47h
        MOV     52H,#06H
        MOV     A,#00H
        lCALL   AA936     ;ACALL 0936     ?0935
        MOV     46H,#00H  ;48h
        MOV     47H,#00H  ;49h
        lCALL   AAD48     ;ACALL 0D48
        MOV     50H,#02H
        CLR     01H      ;CLR 01
        CLR     P0.0      ;CLR 80
        MOV     A,#0f9H
        MOV     R0,#08H
W2:     RRC     A
        MOV     P1.1,C    ;MOV 91,C
        CLR     P1.0      ;CLR 90
        NOP
        SETB    P1.0      ;SETB 90
        DJNZ    R0,W2     ;DJNZ R0,F6
        SETB    P0.0      ;SETB 80

wx:     MOV     R1,#60H;#3BH
        MOV     DPTR,#TAF59  ;MOV DPTR,#0F59
        MOV     r6,#00H      ;4dh
W7:     MOV     A,r6         ;4dh
        MOV     B,A          ;MOV F0,A
        MOV     R0,#33H
W3:     MOVC    A,@A+DPTR
        MOV     @R0,A
        MOV     A,B          ;MOV A,F0
        INC     A
        MOV     B,A          ;MOV F0,A
        INC     R0
        CJNE    R0,#3DH,W3   ;CJNE R0,#3DH,0F31
        INC     r6;4DH
        INC     r6;4DH
W4:     DJNZ    R1,BBF44     ;DJNZ R1,02 ;?
        SJMP    wx           ;W5           ;SJMP 0F4E
BBF44:  SETB    02H          ;SETB 02 
W6:     JB      01H,W5       ;JB   01,0F4E           ?
        JB      02H,W6       ;JB   02,0F46
        SJMP    W7           ;SJMP 0F2B
W5:     MOV     DPTR,#0000H  ;MOV  DPTR,#0000
        LCALL   AA043        ;LCALL 0043
W8:     LCALL   AA0BE        ;LCALL 00BE
        SJMP    W8           ;SJMP  0F54          ;0F57
;vfd 0907 display
;TAF59:  DB 00H,00H,00H,00H,00H,00H,00H,00H
;        DB 00H,00H,0FCH,01H,0FCH,00H,00H,5AH,24H
;        DB 24H,0D8H,12H,0F4H,00H,00H,00H,00H
;        DB 00H,0CCH,01H,0D8H,0AH,1CH,00H,00H
;        DB 24H,0H,24H,00H,00H
;        DB 00H,00H,00H,00H,00H,00H,00H,00H
;        DB 0B4H,01H,0F8H,00H,0CCH,11H,0CCH,11H
;        DB 0FCH,00H,0F8H,00H,0D8H,12H,3CH,24H
;        DB 00H,00H,0D8H,0AH,0FCH,00H,3CH,24H
;        DB 0E4H,01H,00H,00H,0E4H,00H,0E4H,01H
;        DB 0D8H,12H,04H,24H,0E4H,01H,0CCH,11H
;        DB 00H,00H,0D8H,0AH,0FCH,00H,3CH,24H
;        DB 0E4H,01H,00H,00H,0DCH,01H,0E4H,00H
;        DB 0FCH,00H,0F8H,00H,0B4H,01H,04H,24H
;        DB 24H,24H,0E4H,00H,00H,00H,00H,00H
;        DB 00H,00H,00H,00H,00H,00H,00H,00H
;        DB 00H,00H,0FFH,0FFH,0FFH,0FFH,0FFH
;        DB 0FFH,0FFH
;        DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
;        DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
;        DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
; vfd 0901 display
TAF59:  DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
        DB 9eH,12H,7EH,00H,00H,2DH,12H,12H,6CH,09H
        DB 0faH,00H,00H,00H,00H,00H                   ;BOXING
        DB 0E6H,00H,6CH,05H,0FEH,00H,00H,12H,00H,12H  ;PM811AV
        DB 0EEH,00H,60H,24H
        DB 00H,00H,00H,00H,00H

⌨️ 快捷键说明

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