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

📄 ps2key.asm

📁 用C51加1602实现键盘测试
💻 ASM
📖 第 1 页 / 共 2 页
字号:
                   INC   DPTR                         ;0269   A3
                   XCH   A,R0                         ;026A   C8
                   XCH   A,DPL                        ;026B   C5 82
                   XCH   A,R0                         ;026D   C8
                   XCH   A,R2                         ;026E   CA
                   XCH   A,DPH                        ;026F   C5 83
                   XCH   A,R2                         ;0271   CA
                   MOVX  @DPTR,A                      ;0272   F0
                   INC   DPTR                         ;0273   A3
                   XCH   A,R0                         ;0274   C8
                   XCH   A,DPL                        ;0275   C5 82
                   XCH   A,R0                         ;0277   C8
                   XCH   A,R2                         ;0278   CA
                   XCH   A,DPH                        ;0279   C5 83
                   XCH   A,R2                         ;027B   CA
Q027C:             DJNZ  R7,Q0267                     ;027C   DF E9
                   DJNZ  R6,Q0267                     ;027E   DE E7
                   SJMP  Q0240                        ;0280   80 BE
Q0282:             LCALL Q03C1                        ;0282   12 03 C1
                   LCALL Q02C6                        ;0285   12 02 C6
                   LCALL Q0402                        ;0288   12 04 02
                   MOV   R2,#01H                      ;028B   7A 01
                   MOV   R3,#02H                      ;028D   7B 02
                   CLR   A                            ;028F   E4
                   MOV   R5,A                         ;0290   FD
                   MOV   R7,A                         ;0291   FF
                   LCALL Q0310                        ;0292   12 03 10
                   MOV   R2,#01H                      ;0295   7A 01
                   MOV   R3,#13H                      ;0297   7B 13
                   LCALL Q030C                        ;0299   12 03 0C
                   LCALL Q0411                        ;029C   12 04 11
                   CLR   A                            ;029F   E4
                   MOV   08H,A                        ;02A0   F5 08
Q02A2:             LCALL Q03C1                        ;02A2   12 03 C1
                   INC   08H                          ;02A5   05 08
                   MOV   A,08H                        ;02A7   E5 08
                   CLR   C                            ;02A9   C3
                   SUBB  A,#0AH                       ;02AA   94 0A
                   JC    Q02A2                        ;02AC   40 F4
                   LCALL Q0308                        ;02AE   12 03 08
                   CLR   IT1                          ;02B1   C2 8A
                   SETB  EA                           ;02B3   D2 AF
                   SETB  EX1                          ;02B5   D2 AA
Q02B7:             MOV   A,14H                        ;02B7   E5 14
                   JZ    Q02C2                        ;02B9   60 07
                   MOV   R7,13H                       ;02BB   AF 13
                   LCALL Q0134                        ;02BD   12 01 34
                   SJMP  Q02B7                        ;02C0   80 F5
Q02C2:             SETB  EA                           ;02C2   D2 AF
                   SJMP  Q02B7                        ;02C4   80 F1
Q02C6:             CLR   A                            ;02C6   E4
                   MOV   P2,A                         ;02C7   F5 A0
                   LCALL Q03A6                        ;02C9   12 03 A6
                   LCALL Q0402                        ;02CC   12 04 02
                   LCALL Q03A5                        ;02CF   12 03 A5
                   LCALL Q0402                        ;02D2   12 04 02
                   LCALL Q03A5                        ;02D5   12 03 A5
                   LCALL Q0402                        ;02D8   12 04 02
                   MOV   R5,#01H                      ;02DB   7D 01
                   MOV   R4,#00H                      ;02DD   7C 00
                   MOV   R7,#38H                      ;02DF   7F 38
                   LCALL Q03AA                        ;02E1   12 03 AA
                   MOV   R5,#01H                      ;02E4   7D 01
                   MOV   R4,#00H                      ;02E6   7C 00
                   MOV   R7,#08H                      ;02E8   7F 08
                   LCALL Q03AA                        ;02EA   12 03 AA
                   MOV   R5,#01H                      ;02ED   7D 01
                   MOV   R4,#00H                      ;02EF   7C 00
                   MOV   R7,#01H                      ;02F1   7F 01
                   LCALL Q03AA                        ;02F3   12 03 AA
                   MOV   R5,#01H                      ;02F6   7D 01
                   MOV   R4,#00H                      ;02F8   7C 00
                   MOV   R7,#06H                      ;02FA   7F 06
                   LCALL Q03AA                        ;02FC   12 03 AA
                   MOV   R5,#01H                      ;02FF   7D 01
                   MOV   R4,#00H                      ;0301   7C 00
                   MOV   R7,#0FH                      ;0303   7F 0F
                   LJMP  Q03AA                        ;0305   02 03 AA
;==========================================================================
Q0308:             MOV   R2,#01H                      ;0308   7A 01
                   MOV   R3,#23H                      ;030A   7B 23
Q030C:             MOV   R5,#01H                      ;030C   7D 01
                   CLR   A                            ;030E   E4
                   MOV   R7,A                         ;030F   FF
Q0310:             MOV   0BH,R7                       ;0310   8F 0B
                   MOV   0CH,R5                       ;0312   8D 0C
                   MOV   0DH,R2                       ;0314   8A 0D
                   MOV   0EH,R3                       ;0316   8B 0E
                   CLR   A                            ;0318   E4
                   MOV   0FH,A                        ;0319   F5 0F
                   ANL   0CH,#01H                     ;031B   53 0C 01
                   ANL   0BH,#0FH                     ;031E   53 0B 0F
Q0321:             MOV   A,0EH                        ;0321   E5 0E
                   ADD   A,0FH                        ;0323   25 0F
                   MOV   DPL,A                        ;0325   F5 82
                   CLR   A                            ;0327   E4
                   ADDC  A,0DH                        ;0328   35 0D
                   MOV   DPH,A                        ;032A   F5 83
                   CLR   A                            ;032C   E4
                   MOVC  A,@A+DPTR                    ;032D   93
                   MOV   R3,A                         ;032E   FB
                   SETB  C                            ;032F   D3
                   SUBB  A,#19H                       ;0330   94 19
                   JC    Q0348                        ;0332   40 14
                   MOV   A,0BH                        ;0334   E5 0B
                   SETB  C                            ;0336   D3
                   SUBB  A,#0FH                       ;0337   94 0F
                   JNC   Q0321                        ;0339   50 E6
                   MOV   R5,0CH                       ;033B   AD 0C
                   MOV   R7,0BH                       ;033D   AF 0B
                   LCALL Q0388                        ;033F   12 03 88
                   INC   0FH                          ;0342   05 0F
                   INC   0BH                          ;0344   05 0B
                   SJMP  Q0321                        ;0346   80 D9
Q0348:             RET                                ;0348   22
;==========================================================================
Q037F:             MOV   DPH,A                        ;037F   F5 83
                   CLR   A                            ;0381   E4
                   MOVC  A,@A+DPTR                    ;0382   93
                   MOV   R3,A                         ;0383   FB
                   MOV   R5,#01H                      ;0384   7D 01
                   MOV   R7,16H                       ;0386   AF 16
Q0388:             MOV   10H,R3                       ;0388   8B 10
                   ANL   05H,#01H                     ;038A   53 05 01
                   ANL   07H,#0FH                     ;038D   53 07 0F
                   MOV   A,R5                         ;0390   ED
                   JZ    Q0396                        ;0391   60 03
                   ORL   07H,#40H                     ;0393   43 07 40
Q0396:             ORL   07H,#80H                     ;0396   43 07 80
                   MOV   R5,#01H                      ;0399   7D 01
                   MOV   R4,#00H                      ;039B   7C 00
                   LCALL Q03AA                        ;039D   12 03 AA
                   MOV   R7,10H                       ;03A0   AF 10
                   LJMP  Q03EF                        ;03A2   02 03 EF
;==========================================================================
Q03A5:             CLR   A                            ;03A5   E4
Q03A6:             MOV   R5,A                         ;03A6   FD
                   MOV   R4,A                         ;03A7   FC
                   MOV   R7,#38H                      ;03A8   7F 38
Q03AA:             MOV   11H,R7                       ;03AA   8F 11
                   MOV   A,R5                         ;03AC   ED
                   ORL   A,R4                         ;03AD   4C
                   JZ    Q03B3                        ;03AE   60 03
                   LCALL Q03DA                        ;03B0   12 03 DA
Q03B3:             MOV   P2,11H                       ;03B3   85 11 A0
                   CLR   P3.2                         ;03B6   C2 B2
                   CLR   P3.7                         ;03B8   C2 B7
                   CLR   P3.6                         ;03BA   C2 B6
                   CLR   P3.6                         ;03BC   C2 B6
                   SETB  P3.6                         ;03BE   D2 B6
                   RET                                ;03C0   22
;==========================================================================
Q03C1:             MOV   R5,#05H                      ;03C1   7D 05
Q03C3:             MOV   R4,05H                       ;03C3   AC 05
                   DEC   R5                           ;03C5   1D
                   MOV   A,R4                         ;03C6   EC
                   JZ    Q03D9                        ;03C7   60 10
                   MOV   R6,#1CH                      ;03C9   7E 1C
                   MOV   R7,#65H                      ;03CB   7F 65
Q03CD:             MOV   A,R7                         ;03CD   EF
                   DEC   R7                           ;03CE   1F
                   MOV   R2,06H                       ;03CF   AA 06
                   JNZ   Q03D4                        ;03D1   70 01
                   DEC   R6                           ;03D3   1E
Q03D4:             ORL   A,R2                         ;03D4   4A
                   JZ    Q03C3                        ;03D5   60 EC
                   SJMP  Q03CD                        ;03D7   80 F4
Q03D9:             RET                                ;03D9   22
;==========================================================================
Q03DA:             MOV   P2,#0FFH                     ;03DA   75 A0 FF
                   CLR   P3.2                         ;03DD   C2 B2
                   SETB  P3.7                         ;03DF   D2 B7
                   CLR   P3.6                         ;03E1   C2 B6
                   CLR   P3.6                         ;03E3   C2 B6
                   SETB  P3.6                         ;03E5   D2 B6
Q03E7:             MOV   A,P2                         ;03E7   E5 A0
                   JB    ACC.7,Q03E7                  ;03E9   20 E7 FB
                   MOV   R7,P2                        ;03EC   AF A0
                   RET                                ;03EE   22
;==========================================================================
Q03EF:             MOV   11H,R7                       ;03EF   8F 11
                   LCALL Q03DA                        ;03F1   12 03 DA
                   MOV   P2,11H                       ;03F4   85 11 A0
                   SETB  P3.2                         ;03F7   D2 B2
                   CLR   P3.7                         ;03F9   C2 B7
                   CLR   P3.6                         ;03FB   C2 B6
                   CLR   P3.6                         ;03FD   C2 B6
                   SETB  P3.6                         ;03FF   D2 B6
                   RET                                ;0401   22
;==========================================================================
Q0402:             MOV   R7,#0B0H                     ;0402   7F B0
                   MOV   R6,#15H                      ;0404   7E 15
Q0406:             MOV   A,R7                         ;0406   EF
                   DEC   R7                           ;0407   1F
                   MOV   R4,06H                       ;0408   AC 06
                   JNZ   Q040D                        ;040A   70 01
                   DEC   R6                           ;040C   1E
Q040D:             ORL   A,R4                         ;040D   4C
                   JNZ   Q0406                        ;040E   70 F6
                   RET                                ;0410   22
;==========================================================================
Q0411:             SETB  P3.2                         ;0411   D2 B2
                   SETB  P3.7                         ;0413   D2 B7
                   CLR   P3.6                         ;0415   C2 B6
                   CLR   P3.6                         ;0417   C2 B6
                   SETB  P3.6                         ;0419   D2 B6
                   MOV   R7,P2                        ;041B   AF A0
                   RET                                ;041D   22
;===============================================================
						END

⌨️ 快捷键说明

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