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

📄 main11.asm

📁 (1)完成键盘
💻 ASM
📖 第 1 页 / 共 3 页
字号:
sel7:              clr p2.7
                   setb p2.6
                   setb p2.5
                   ret
sel8:              setb p2.7
                   setb p2.6
                   setb p2.5

                   ret
 ;************************END******************************
;HHHHHHHHHHHHHHHHHHH--KEY_TEST---HHHHHHHHHHHHHHHHHHHHHHHHHHH
;************************ KEY_TEST0**********************
KEY_TEST0:        LCALL   L_TESTKEY0
                   ACALL   CHULITESTKEY
                   RET
;************************ KEY_TEST1**********************
KEY_TEST1:        LCALL   L_TESTKEY1
                   ACALL   CHULITESTKEY
                   RET
;************************ KEY_TEST2**********************
KEY_TEST2:        LCALL   L_TESTKEY2
                   ACALL   CHULITESTKEY
                   RET
;************************ KEY_TEST3**********************
KEY_TEST3:        LCALL   L_TESTKEY3
                   ACALL   CHULITESTKEY
                   RET
;************************ KEY_TEST4**********************
KEY_TEST4:         LCALL   L_TESTKEY4
                   ACALL   CHULITESTKEY
                   RET
;************************ KEY_TEST5**********************
KEY_TEST5:         LCALL   L_TESTKEY5
                   ACALL   CHULITESTKEY
                   RET
;***********************KEY TEST***********************
 KEY_TEST:
                   LCALL   L_TESTKEY
CHULITESTKEY:      ANL    A,#0FH
KEY_TEST9:         JNB    ACC.0,KEY_TEST01
                   JNB    ACC.1,KEY_TEST02
                   JNB    ACC.2,KEY_TEST03
                   JNB    ACC.3,KEY_TEST04
                   AJMP   KEY_TEST
KEY_TEST01:         MOV A,#1H
                   RET
KEY_TEST02:         MOV A,#2H
                   RET
KEY_TEST03:         MOV A,#3H
                   RET
KEY_TEST04:         MOV A,#4H
                    RET

;************************END***********************************
;************************L_PLAY5__*****************************
L_PLAY5__:
                MOV LED1,#80H
                MOV LED2,#80H
                MOV LED3,#80H
                MOV LED4,#80H
                MOV LED5,#80H
L_PLAY5LED:     ACALL L_PLAY1
                ACALL L_DELAY2MS
                ACALL L_PLAY2
                ACALL L_DELAY2MS
                ACALL L_PLAY3
                ACALL L_DELAY2MS
                ACALL L_PLAY4
                ACALL L_DELAY2MS
                ACALL L_PLAY5
                ACALL L_DELAY2MS
                RET
;OOOOOOOOOOOOOOOOOOOOOOOOOL_TESTKEY00000000000000000000000000
;************************L_TESTKEY  PLAY ---**************888
L_TESTKEY:            LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST0
                   LCALL   L_PLAY5__
                   AJMP    L_TESTKEY
LKEY_TEST0:        MOV     R5,#2H
                   MOV     35H,A
LKEY_TEST1:        LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST1
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY
                   RET
;***********************L_TESTKEY   END**************88
 ;************************L_TESTKEY0  PLAY **************888
L_TESTKEY0:        MOV B,@R0
L_TESTKEYD:        MOV @R0,B
                   SETB RS1
                   SETB RS0
                   MOV R1,#10H
L_TESTKEYC:
                   LCALL  SEL8
                   MOV    A,P1
                   LCALL   L_PLAY5LED
                   CJNE   A,#0FFH,LKEY_TEST00
                   DJNZ   R1,L_TESTKEYC
                   CLR RS1
                   CLR RS0
                   MOV @R0,#0H
                   SETB RS1
                   SETB RS0
                   MOV R1,#10H
L_TESTKEYC1:
                   LCALL  SEL8
                   MOV    A,P1
                   LCALL   L_PLAY5LED
                   CJNE   A,#0FFH,LKEY_TEST00
                   DJNZ   R1,L_TESTKEYC1
                   CLR RS1
                   CLR RS0
                   AJMP    L_TESTKEYD
LKEY_TEST00:       CLR RS1
                   CLR RS0
                   MOV     R5,#2H
                   MOV     @R0,B
                   MOV    35H,A
LKEY_TEST01:       LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST01
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEYD
NOKEY0A:           LCALL   SEL8
NOKEY0:            MOV     A,P1
                   LCALL   L_PLAY5LED
                   CJNE    A,#0FFH,NOKEY0A
                   MOV     R5,#2H
NOKEY0B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY0B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY0A
                   MOV  A,35H
                   RET
;***********************L_TESTKEY0 END**************88
;************************L_TESTKEY1  PLAY INPUT**************888
L_TESTKEY1:        LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST10
                   LCALL   L_PLAYINPUT
                   AJMP    L_TESTKEY1
LKEY_TEST10:       MOV     R5,#2H
                   MOV    35H,A
LKEY_TEST11:       LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST11
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY1
NOKEY1A:           LCALL   SEL8
NOKEY1:            MOV     A,P1
                   LCALL   L_PLAYINPUT
                   CJNE    A,#0FFH,NOKEY1A
                   MOV     R5,#2H
NOKEY1B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY1B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY1A
                   MOV  A,35H
                   RET
;***********************L_TESTKEY1   END************************
;************************L_TESTKEY2 PLAY USER *****************
L_TESTKEY2:         LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST20
                   LCALL   L_PLAYUSER
                   AJMP    L_TESTKEY2
LKEY_TEST20:        MOV     R5,#2H
                    MOV    35H,A
LKEY_TEST21:        LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST21
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY2
NOKEY2A:            LCALL   SEL8
NOKEY2:           MOV     A,P1
                   LCALL   L_PLAYUSER
                   CJNE    A,#0FFH,NOKEY2A
                   MOV     R5,#2H
NOKEY2B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY2B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY2A
                   MOV  A,35H
                    RET
;***********************L_TESTKEY2   END***********************
;************************L_TESTKEY3 PLAY STOR *****************
L_TESTKEY3:         LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST30
                   LCALL   L_PLAYSTOR
                   AJMP    L_TESTKEY3
LKEY_TEST30:        MOV     R5,#2H
                    MOV    35H,A
LKEY_TEST31:        LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST31
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY3
NOKEY3A:            LCALL   SEL8
NOKEY3:            MOV     A,P1
                   LCALL   L_PLAYSTOR
                   CJNE    A,#0FFH,NOKEY3A
                   MOV     R5,#2H
NOKEY3B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY3B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY3A
                   MOV  A,35H
                    RET
;***********************L_TESTKEY3   END***********************
;************************L_TESTKEY4 PLAY FIND *****************
L_TESTKEY4:        LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST40
                   LCALL   L_PLAYFIND
                   AJMP    L_TESTKEY4
LKEY_TEST40:        MOV     R5,#2H
                    MOV    35H,A
LKEY_TEST41:        LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST41
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY4
NOKEY4A:            LCALL   SEL8
NOKEY4:           MOV     A,P1
                   LCALL   L_PLAYFIND
                   CJNE    A,#0FFH,NOKEY4A
                   MOV     R5,#2H
NOKEY4B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY4B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY4A
                   MOV  A,35H
                    RET
;***********************L_TESTKEY4   END***********************
 ;************************L_TESTKEY5 PLAY SET *****************
L_TESTKEY5:         LCALL  SEL8
                   MOV    A,P1
                   CJNE   A,#0FFH,LKEY_TEST50
                   LCALL   L_PLAYSET
                   AJMP    L_TESTKEY5
LKEY_TEST50:        MOV     R5,#2H
                    MOV    35H,A
LKEY_TEST51:        LCALL   L_DELAY2MS
                   DJNZ    R5,LKEY_TEST51
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,35H,L_TESTKEY5
NOKEY5A:            LCALL   SEL8
NOKEY5:           MOV     A,P1
                   LCALL   L_PLAYSET
                   CJNE    A,#0FFH,NOKEY5A
                   MOV     R5,#2H
NOKEY5B:           LCALL   L_DELAY2MS
                   DJNZ    R5,NOKEY5B
                   LCALL   SEL8
                   MOV     A,P1
                   CJNE    A,#0FFH,NOKEY5A
                   MOV  A,35H
                    RET
;***********************L_TESTKEY5  END***********************

;***************L_PLAYERRO*************************************
L_PLAYERRO:     MOV LED1,#0H
                MOV LED2,#0F2H
                MOV LED3,#62H
                MOV LED4,#62H
                MOV LED5,#7EH
                LCALL L_PLAY5LED
                RET

;*****************L_PLAYERRO END*****************************
;******************L_PLAYUSER********************************
L_PLAYUSER:     MOV LED1,#0H
                MOV LED2,#7CH
                MOV LED3,#0DAH
                MOV LED4,#0F2H
                MOV LED5,#62H
                LCALL L_PLAY5LED
                RET
;************ L_PLAYUSER END *********************************
;******************L_PLAYINPUT********************************
L_PLAYINPUT:    MOV LED1,#0CH
                MOV LED2,#6EH
                MOV LED3,#0E6H
                MOV LED4,#07CH
                MOV LED5,#0EH
                LCALL L_PLAY5LED
                RET
;************ L_PLAYINPUT END ********************************
;******************L_PLAYSTOR********************************
L_PLAYSTOR:    MOV LED1, #00H
                MOV LED2,#0DAH
                MOV LED3,#0EH
                MOV LED4,#07EH
                MOV LED5,#062H
                LCALL L_PLAY5LED
                RET
;************ L_PLAYSTORE END ********************************
;******************L_PLAYFIND********************************
L_PLAYFIND:    MOV LED1,#0H
                MOV LED2,#0E2H
                MOV LED3,#0CH
                MOV LED4,#06EH
                MOV LED5,#0BCH
                LCALL L_PLAY5LED
                RET
;************ L_PLAYFIND END ********************************
;******************L_PLAYSET********************************
L_PLAYSET:      MOV LED1,#0H
                MOV LED2,#0DAH
                MOV LED3,#0F2H
                MOV LED4,#0EH
                MOV LED5,#0H
                LCALL L_PLAY5LED
                RET
;************ L_PLAYSET END ********************************
;000000000000000000000000000000000000000000000000000000000000
;***********************END***********************************
L_TAB:
        DB 7EH,0CH,0B6H,9EH,0CCH,0DAH,0FAH,0EH
        DB 0FEH,0DEH,0EEH,0F8H,72H,0BCH,0F2H,0E2H
;************************************************************

⌨️ 快捷键说明

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