打印

单片机“矩阵键盘”汇编程序的思路

[复制链接]
4397|6
手机看帖
扫描二维码
随时随地手机跟帖
跳转到指定楼层
楼主
liuren098|  楼主 | 2010-3-24 20:31 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
/* 实验目的:1.掌握键盘扫描的原理以及十/十六进制的转换
  *         2.了解单片机输入和输出的过程,以及如何对数据进行采集的
  * 实验内容:键盘上对应有16个按键,从0到F,按下相应的键会在数码管上显示相应的数字,
  *           其中K0到K15是采用4*4的方式连接的
  */
;******************************************************************
;  0   1   2   3  ---P20
;  4   5   6   7  ---P21
;  8   9   A   B  ---P22
;  C   D   E   F  ---P23
;  |   |   |   |
; P24 P25 P26 P27
;******************************************************************
ORG 0000h
LJMP MAIN
ORG 0030h
MAIN:
MOV DPTR,#TAB  ;将表头放入DPTR
LCALL KEY   ;调用键盘扫描程序
MOVC A,@A+DPTR               ;查表后将键值送入ACC
MOV P0,A                    ;将Acc值送入P0口
CLR P1.3                        ;开显示
LJMP MAIN                    ;返回调用子程序反复循环显示
KEY: LCALL KS                           ;调用检测按键子程序
     JNZ K1                             ;有键按下继续
     LCALL DELAY2                       ;无键按下调用延时去抖动程序
     AJMP KEY                           ;返回继续检测有无按键按下
K1:  LCALL DELAY2
     LCALL DELAY2                       ;有键按下继续延时去抖动
     LCALL KS                           ;再一次调用检测按键程序
     JNZ K2                             ;确认有按下进行下一步
     AJMP KEY                           ;无键按下返回继续检测
K2: MOV R2,#0EFH                    ;将扫描值送入 R2暂存
     MOV R4,#00H                        ;将第一列的列值00H送入R4暂存,R4用于存放列值。
K3: MOV P2,R2                       ;将R2的值送入P2口
L6: JB P2.0,L1                      ;P2.0等于1跳转到L1
     MOV A,#00H                         ;将第一行的行值00H送入ACC
     AJMP LK                            ;跳转到键值处理程序
L1: JB P2.1,L2                      ;P2.1等于1跳转到L2
     MOV A,#04H                         ;将第二行的行值送入ACC
     AJMP LK                            ;跳转到键值理程序进行键值处理
L2: JB P2.2,L3                          ;P1.2等于1跳转到L3
     MOV A,#08H                         ;将第三行的行值送入ACC
     AJMP LK                            ;跳转到键值处理程序
L3: JB P2.3,NEXT                    ;P2.3等于1跳转到NEXT处
     MOV A,#0cH                         ;将第四行的行值送入ACC
LK: ADD A,R4                        ;行值与列值相加后的键值送入A
     PUSH ACC                           ;将A中的值送入堆栈暂存
K4:  LCALL DELAY2                       ;调用延时去抖动程序
     LCALL KS                           ;调用按键检测程序
     JNZ K4                             ;按键没有松开继续返回检测
     POP ACC                            ;将堆栈的值送入ACC
     RET
NEXT:
    INC  R4                             ;将列值加一
    MOV A,R2                            ;将R2的值送入A
    JNB ACC.7,KEY                       ;扫描完成跳至KEY处进行下一回合的扫描
    RL A                                ;扫描未完成将A中的值右移一位进行下一列的扫描
    MOV R2,A                            ;将ACC的值送入R2暂存
    AJMP K3                             ;跳转到K3继续
KS: MOV P2,#0FH                         ;将P2口高四位置0低四位值1
     MOV A,P2                           ;读P2口
     XRL A,#0FH                         ;将A中的值与A中的值相异或
     RET                                ;子程序返回
DELAY2:                                 ;40ms延时去抖动子程序8*FA*2=40ms
      MOV R5,#08H
L7: MOV R6,#0FAH
L8: DJNZ R6,L8
     DJNZ R5,L7
     RET
TAB:
        DB        0C0H;0
        DB        0F9H;1
        DB        0A4H;2
        DB        0B0H;3
        DB        099H;4
        DB        092H;5
        DB        082H;6
        DB        0F8H;7
        DB        080H;8
        DB        090H;9
        DB        088H;A
        DB        083H;b
        DB        0C6H;C
        DB        0A1H;d
        DB        086H;E
        DB        08EH;F
       END
请教这个程序的大体思路,谢谢!!!!!!!

相关帖子

沙发
NE5532| | 2010-3-24 20:57 | 只看该作者
有注释,拒绝回答。提示你,这个程序写复杂了,可以简化3倍。最后那个表是查表取键值,键盘是4X4的。

使用特权

评论回复
板凳
liuren098|  楼主 | 2010-3-24 21:04 | 只看该作者
可以简化三倍,可以告诉我大概思路吗?或者是在哪个网站看看??谢谢 2# NE5532

使用特权

评论回复
地板
NE5532| | 2010-3-24 21:07 | 只看该作者
自己想出来的,直接看你有多少个键就想出来了。
提示:
1.一个字节有几个位?
2.键值是什么?不就是给每个键一个不同的数据吗?

使用特权

评论回复
5
NE5532| | 2010-3-24 21:08 | 只看该作者
你贴的这个程序很经典,不过只是教科书上糊弄学生的教学级代码罢了。

使用特权

评论回复
6
teddeng| | 2010-3-25 02:11 | 只看该作者
我猜你是不理解的关键是当P2口的高4位任意一位置0时,如果有键按下,读低4位的话必然有一位是0;如果没有键按下,读低4位结果总为1。
所以,依次把高4位其中一位置0,读低4位,这样读4次,就知道有无键按下,是哪一个键按下。但愿能帮到你。

关于键盘的软硬件,论坛有很多讨论,如果你愿意的话,会大开眼界的,自然会知道这段教学代码的不好,但是,做为教学也不好多说什么。

使用特权

评论回复
7
NE5532| | 2010-3-25 10:33 | 只看该作者
呵呵,再让楼主动下脑筋,稍晚公布答案。

使用特权

评论回复
发新帖 我要提问
您需要登录后才可以回帖 登录 | 注册

本版积分规则

0

主题

3

帖子

1

粉丝