标题: 单片机4*4键盘汇编语言控制示例 计算器 带proteus仿真及源程序 [打印本页]
作者: 黄新义    时间: 2016-10-15 12:13
标题: 单片机4*4键盘汇编语言控制示例 计算器 带proteus仿真及源程序
之前一直想做个4*4键盘，终于成功了，分享出来，有需要的可以参考一下。图片是自制的多功能多模式高速度电路通断器，有需要的可联系我，QQ503978598.


51单片机控制的4*4矩阵键盘的proteus原理图：



所有资料打包下载：
4X4键盘显示.zip (114.67 KB, 下载次数: 129)


4X4键盘和显示.ASM：
  1. ;占用单元30H~3CH,40H,A,B,DPTR,R0,R1,R2,R3,R4,R6,R7
  2.   KEYBUF EQU 40H          ;键号存放单元
  3.          ORG 0000H
  4.          LJMP MAIN
  5.          ORG 0030H
  6. MAIN:    MOV KEYBUF,#0    ;初始键号设位0，也可以为任意值
  7.          MOV R0,#30H      ;显示首地址
  8.          MOV R2,#0CH      ;计算数据存放单元个数
  9.          CLR A
  10. QING:    MOV @R0,A        ;将数据存放单元清零
  11.          INC R0
  12.          DJNZ R2,QING
  13.          MOV P0,#8FH      ;关闭显示
  14.          MOV R1,#30H      ;将显示首地址存放R1里
  15. ;===============================================
  16. ;五位无符号显示子程序
  17. DIS1:    MOV R0,#30H      ;把显示数据第一位放在R0里
  18.          MOV R2,#04H      ;把显示的位码放在R2里
  19.          MOV R3,#05H      ;把显示的长度放在R3里
  20. DIS2:    MOV A,@R0
  21.          ANL A,#0FH       ;屏蔽显示数据的高四位
  22.          MOV B,A
  23.          MOV A,R2
  24.          ANL A,#0FH       ;屏蔽位码的高四位
  25.          SWAP A
  26.          ORL A,B
  27.          MOV P0,A         ;送总显示数据到P0显示
  28.          LCALL DELY4ms    ;调用延时4ms
  29.          INC R0           ;取下一个显示数据
  30.          DEC R2
  31.          DJNZ R3,DIS2     ;四位显示晚后重新开始显示
  32. ;===================================================
  33. ;键盘扫描子程序
  34. WAIT:    MOV P1,#0FFH        ;P1口送高电平
  35.          CLR P1.0            ;第一行清零
  36.          MOV A,P1            ;读P1口
  37.          ANL A,#0F0H         ;低位屏蔽
  38.          XRL A,#0F0H         ;判断低位是否有低电平 ,即判断是否有按键按下
  39.          JZ NOKEY1           ;地位有低电平继续扫描,否者跳到第而行去扫描
  40.          LCALL DELY10ms      ;延时10ms去抖在进行判断是否有按键按下
  41.          MOV A,P1            ;继续读P1口
  42.          ANL A,#0F0H         ;判断低位是否有低电平
  43.          CJNE A,#0E0H,NK1    ;如果扫描数据不为0E0H就转到NK1
  44.          MOV KEYBUF,#0       ;否者判断为0号键
  45.          AJMP DK             ;转DK1查表程序
  46. NK1:     CJNE A,#0D0H,NK2    ;如果扫描数据不为0D0H就转到NK2
  47.          MOV KEYBUF,#1       ;否者判断为1号键
  48.          AJMP DK             ;转DK2查表程序
  49. NK2:     CJNE A,#0B0H,NK3    ;如果扫描数据不为0B0H就转到NK3
  50.          MOV KEYBUF,#2       ;否者判断为2号键
  51.          AJMP DK             ;转DK3查表程序
  52. NK3:     CJNE A,#70H,NK4     ;如果扫描数据不为70H就转到NK4
  53.          AJMP SAN_CHU
  54. NK4:     NOP

  56. NOKEY1:  MOV P1,#0FFH        ;和上面相同
  57.          CLR P1.1
  58.          MOV A,P1
  59.          ANL A,#0F0H
  60.          XRL A,#0F0H
  61.          JZ NOKEY2
  62.          LCALL DELY10MS
  63.          MOV A,p1
  64.          ANL A,#0F0H
  65.          XRL A,#0F0H
  66.          JZ NOKEY2
  67.          MOV A,P1
  68.          ANL A,#0F0H
  69.          CJNE A,#0E0H,NK5
  70.          MOV KEYBUF,#3
  71.          AJMP DK
  72. NK5:     CJNE A,#0D0H,NK6
  73.          MOV KEYBUF,#4
  74.          AJMP DK
  75. NK6:     CJNE A,#0B0H,NK7
  76.          MOV KEYBUF,#5
  77.          AJMP DK
  78. NK7:     CJNE A,#70H,NK8
  79.          MOV KEYBUF,#10
  80.          AJMP DK
  81. NK8:     NOP

  83. NOKEY2:  MOV P1,#0FFH
  84.          CLR P1.2
  85.          MOV A,P1
  86.          ANL A,#0F0H
  87.          XRL A,#0F0H
  88.          JZ NOKEY3
  89.          LCALL DELY10MS
  90.          MOV A,P1
  91.          ANL A,#0F0H
  92.          XRL A,#0F0H
  93.          JZ NOKEY3
  94.          MOV A,P1
  95.          ANL A,#0F0H
  96.          CJNE A,#0E0H,NK9
  97.          MOV KEYBUF,#6
  98.          AJMP DK
  99. NK9:     CJNE A,#0D0H,NK10
  100.          MOV KEYBUF,#7
  101.          AJMP DK
  102. NK10:    CJNE A,#0B0H,NK11
  103.          MOV KEYBUF,#8
  104.          AJMP DK
  105. NK11:    CJNE A,#70H,NK12
  106.          AJMP DENG_HAO
  107. NK12:    NOP

  109. NOKEY3:  MOV P1,#0FFH
  110.          CLR P1.3
  111.          MOV A,P1
  112.          ANL A,#0F0H
  113.          XRL A,#0F0H
  114.          JZ NOKEY4
  115.          LCALL DELY10MS
  116.          MOV A,P1
  117.          ANL A,#0F0H
  118.          XRL A,#0F0H
  119.          JZ NOKEY4
  120.          MOV A,P1
  121.          ANL A,#0F0H
  122.          CJNE A,#0E0H,NK13
  123.          AJMP CHU
  124. NK13:    CJNE A,#0D0H,NK14
  125.          AJMP CHENG
  126. NK14:    CJNE A,#0B0H,NK15
  127.          AJMP JIAN
  128. NK15:    CJNE A,#70H,NK16
  129.          AJMP JIA
  130. NK16:    NOP

  132. ;=======================================================
  133. ;查表求键值程序
  134. ;查表求键值程序
  135. DK:      MOV B,#00H
  136.          MOV A,KEYBUF         ;查表程序 查对应的键号数据
  137.          MOV DPTR,#TABLE      ;把表头地址放入DPTR
  138.          MOVC A,@A+DPTR       ;A里面存放的为键号,利用A和表头地址找到对应的键号数据
  139.          MOV B,A              ;把查到的数据送往显示单元
  140.          INC R1               ;取下一个显示单元
  141.          MOV A,R1
  142.          CJNE A,#36H,DKA1     ;判断显示单元是否已满
  143.          MOV R1,#35H          ;35H,36H单元用于更好的控制五位显示
  144.          AJMP DKA

  146. DKA1:    MOV 34H,33H          ;按键代码按左移显示，先按先显示
  147.          MOV 33H,32H
  148.          MOV 32H,31H
  149.          MOV 31H,30H
  150.          MOV 30H,B
  151. DKA:     MOV A,P1             ;读P1口
  152.          ANL A,#0F0H          ;屏蔽高四位
  153.          XRL A,#0F0H          ;地位是有低电平
  154.          JNZ DKA              ;如果有低电平继续读P1口,否者向下执行,查找第二行
  155. NOKEY4:  LJMP DIS1
  156. ;===================================
  157. ;功能按键功能设定
  158. DENG_HAO:MOV DPTR,#JI_SUAN    ;等号键功能通过加、减、乘、除设定的偏移量来调用子程序
  159.          MOV A,3CH            ;3CH存放的为功能程序入口地址偏移量
  160.          JMP @A+DPTR          ;转移到按键功能程序

  162. JI_SUAN: AJMP JIA1            ;加计算子程序
  163.          AJMP JIAN1           ;减计算子程序
  164.          AJMP CHENG1          ;乘计算子程序
  165.          AJMP CHU             ;除计算子程序
  166. ;=======删除键功能
  167. SAN_CHU: ACALL QING_DIS
  168.          AJMP DKA
  169. ;=======加键功能
  170. JIA:     MOV 3CH,#00H
  171.          ACALL CUN_SHU
  172.          ACALL QING_DIS
  173.          AJMP DKA
  174. ;=======减键功能
  175. JIAN:    MOV 3CH,#02H
  176.          ACALL CUN_SHU
  177.          ACALL QING_DIS
  178.          AJMP DKA
  179. ;=======乘键功能
  180. CHENG:   MOV 3CH,#04H
  181.          ACALL CUN_SHU
  182.          ACALL QING_DIS
  183.          AJMP DKA
  184. ;=======除键功能
  185. CHU:     MOV 3DH,#06H
  186.          ACALL CUN_SHU
  187.          ACALL QING_DIS
  188.          AJMP DKA

  190. ;=================================
  191. ;存被加（减、乘、除）数，存放在37H~3BH里
  192. CUN_SHU: MOV 37H,30H    ;36H存放的为最低位
  193.          MOV 38H,31H
  194.          MOV 39H,32H
  195.          MOV 3AH,33H
  196.          MOV 3BH,34H    ;3AH存放的为最高位
  197.          RET
  198. ;================================
  199. ;清除显示单元
  200. QING_DIS: MOV R1,#30H
  201. QING1:    MOV @R1,#00H
  202.           INC R1
  203.           MOV A,R1
  204.           CJNE A,#36H,QING1
  205.           MOV R1,#30H
  206. LOP1:     RET
  207. ;================================
  208. ;十进制加法子程序
  209. JIA1:    ;??????
  210.          AJMP DKA
  211. ;================================
  212. ;十进制减法子程序
  213. JIAN1:   ;??????
  214.          AJMP DKA
  215. ;================================
  216. ;十进制乘法子程序
  217. CHENG1:  ;??????
  218.          AJMP DKA
  219. ;================================
  220. ;十进制除法子程序
  221. CHU1:    ;??????
  222.          AJMP DKA
  223. ;=============================================
  224. ;延时程序和查表表格
  225. DELY4ms: MOV R6,#8        ;延时4毫秒
  226. D1:      MOV R7,#248
  227.          DJNZ R7,$
  228.          DJNZ R6,D1
  229.          RET

  231. DELY10ms:MOV R6,#20       ;延时10毫秒
  232. D2:      MOV R7,#248
  233.          DJNZ R7,$
  234.          DJNZ R6,D2
  235.          RET

  237. TABLE:   DB 07H, 04H, 01H  ; /   本表格是以键盘为参考   7   8   9   /
  238.          DB 08H, 05H, 02H  ; *                          4   5   6   *
  239.          DB 09H, 06H, 03H  ; -                          1   2   3   -
  240.          DB 00H, 00H ;=      +                         清除 0   =   +
  241.          END
复制代码

简易的计算器.ASM
  1. KEYBUF   EQU   40H   ;键号存放单元
  2.          ORG 0000H
  3.          LJMP MAIN
  4.          ORG 0030H
  5. MAIN:    MOV KEYBUF,#0    ;初始键号设位0，也可以为任意值
  6.          MOV R0,#30H      ;显示首地址
  7.          MOV R2,#0CH      ;计算数据存放单元个数
  8.          CLR A
  9. QING:    MOV @R0,A        ;将数据存放单元清零
  10.          INC R0
  11.          DJNZ R2,QING
  12.          MOV P0,#8FH      ;关闭显示
  13.          MOV R1,#30H      ;将显示首地址存放R1里
  14. ;===============================================
  15. ;五位无符号显示子程序
  16. DIS1:    MOV R0,#30H      ;把显示数据第一位放在R0里
  17.          MOV R2,#04H      ;把显示的位码放在R2里
  18.          MOV R3,#05H      ;把显示的长度放在R3里
  19. DIS2:    MOV A,@R0
  20.          ANL A,#0FH       ;屏蔽显示数据的高四位
  21.          MOV B,A
  22.          MOV A,R2
  23.          ANL A,#0FH       ;屏蔽位码的高四位
  24.          SWAP A
  25.          ORL A,B
  26.          MOV P0,A         ;送总显示数据到P0显示
  27.          LCALL DELY4ms    ;调用延时4ms
  28.          INC R0           ;取下一个显示数据
  29.          DEC R2
  30.          DJNZ R3,DIS2     ;四位显示晚后重新开始显示
  31. ;===================================================
  32. ;键盘扫描子程序
  33. WAIT:    MOV P1,#0FFH        ;P1口送高电平
  34.          CLR P1.0            ;第一行清零
  35.          MOV A,P1            ;读P1口
  36.          ANL A,#0F0H         ;低位屏蔽
  37.          XRL A,#0F0H         ;判断低位是否有低电平 ,即判断是否有按键按下
  38.          JZ NOKEY1           ;地位有低电平继续扫描,否者跳到第而行去扫描
  39.          LCALL DELY10ms      ;延时10ms去抖在进行判断是否有按键按下
  40.          MOV A,P1            ;继续读P1口
  41.          ANL A,#0F0H         ;判断低位是否有低电平
  42.          CJNE A,#0E0H,NK1    ;如果扫描数据不为0E0H就转到NK1
  43.          MOV KEYBUF,#0       ;否者判断为0号键
  44.          AJMP DK             ;转DK1查表程序
  45. NK1:     CJNE A,#0D0H,NK2    ;如果扫描数据不为0D0H就转到NK2
  46.          MOV KEYBUF,#1       ;否者判断为1号键
  47.          AJMP DK             ;转DK2查表程序
  48. NK2:     CJNE A,#0B0H,NK3    ;如果扫描数据不为0B0H就转到NK3
  49.          MOV KEYBUF,#2       ;否者判断为2号键
  50.          AJMP DK             ;转DK3查表程序
  51. NK3:     CJNE A,#70H,NK4     ;如果扫描数据不为70H就转到NK4
  52.          LJMP SAN_CHU
  53. NK4:     NOP

  55. NOKEY1:  MOV P1,#0FFH        ;和上面相同
  56.          CLR P1.1
  57.          MOV A,P1
  58.          ANL A,#0F0H
  59.          XRL A,#0F0H
  60.          JZ NOKEY2
  61.          LCALL DELY10MS
  62.          MOV A,p1
  63.          ANL A,#0F0H
  64.          XRL A,#0F0H
  65.          JZ NOKEY2
  66.          MOV A,P1
  67.          ANL A,#0F0H
  68.          CJNE A,#0E0H,NK5
  69.          MOV KEYBUF,#3
  70.          AJMP DK
  71. NK5:     CJNE A,#0D0H,NK6
  72.          MOV KEYBUF,#4
  73.          AJMP DK
  74. NK6:     CJNE A,#0B0H,NK7
  75.          MOV KEYBUF,#5
  76.          AJMP DK
  77. NK7:     CJNE A,#70H,NK8
  78.          MOV KEYBUF,#10       ;否者判断为3号键
  79.          AJMP DK             ;转DK4查表程序
  80. NK8:     NOP

  82. NOKEY2:  MOV P1,#0FFH
  83.          CLR P1.2
  84.          MOV A,P1
  85.          ANL A,#0F0H
  86.          XRL A,#0F0H
  87.          JZ NOKEY3
  88.          LCALL DELY10MS
  89.          MOV A,P1
  90.          ANL A,#0F0H
  91.          XRL A,#0F0H
  92.          JZ NOKEY3
  93.          MOV A,P1
  94.          ANL A,#0F0H
  95.          CJNE A,#0E0H,NK9
  96.          MOV KEYBUF,#6
  97.          AJMP DK
  98. NK9:     CJNE A,#0D0H,NK10
  99.          MOV KEYBUF,#7
  100.          AJMP DK
  101. NK10:    CJNE A,#0B0H,NK11
  102.          MOV KEYBUF,#8
  103.          AJMP DK
  104. NK11:    CJNE A,#70H,NK12
  105.          LJMP DENG_HAO
  106. NK12:    NOP

  108. NOKEY3:  MOV P1,#0FFH
  109.          CLR P1.3
  110.          MOV A,P1
  111.          ANL A,#0F0H
  112.          XRL A,#0F0H
  113.          JZ NOKEY4
  114.          LCALL DELY10MS
  115.          MOV A,P1
  116.          ANL A,#0F0H
  117.          XRL A,#0F0H
  118.          JZ NOKEY4
  119.          MOV A,P1
  120.          ANL A,#0F0H
  121.          CJNE A,#0E0H,NK13
  122.          LJMP CHU
  123. NK13:    CJNE A,#0D0H,NK14
  124.          LJMP CHENG
  125. NK14:    CJNE A,#0B0H,NK15
  126.          LJMP JIAN
  127. NK15:    CJNE A,#70H,NK16
  128.          LJMP JIA
  129. NK16:    NOP

  131. ;=======================================================
  132. ;查表求键值程序
  133. DK:      MOV B,#00H
  134.          MOV A,KEYBUF         ;查表程序 查对应的键号数据
  135.          MOV DPTR,#TABLE      ;把表头地址放入DPTR
  136.          MOVC A,@A+DPTR       ;A里面存放的为键号,利用A和表头地址找到对应的键号数据
  137.          MOV B,A              ;把查到的数据送往显示单元
  138.          INC R1               ;取下一个显示单元
  139.          MOV A,R1
  140.          CJNE A,#36H,DKA1     ;判断显示单元是否已满
  141.          MOV R1,#35H          ;35H,36H单元用于更好的控制五位显示
  142.          AJMP DKA

  144. DKA1:    MOV 34H,33H          ;按键代码按左移显示，先按先显示
  145.          MOV 33H,32H
  146.          MOV 32H,31H
  147.          MOV 31H,30H
  148.          MOV 30H,B
  149. DKA:     MOV A,P1             ;读P1口
  150.          ANL A,#0F0H          ;屏蔽高四位
  151.          XRL A,#0F0H          ;地位是有低电平
  152.          JNZ DKA              ;如果有低电平继续读P1口,否者向下执行,查找第二行
  153. NOKEY4:  LJMP DIS1
  154. ;===================================
  155. ;功能按键功能设定
  156. DENG_HAO:MOV DPTR,#JI_SUAN    ;等号键功能通过加、减、乘、除设定的偏移量来调用子程序
  157.          MOV A,3CH            ;3CH存放的为功能程序入口地址偏移量
  158.          JMP @A+DPTR          ;转移到按键功能程序

  160. JI_SUAN: AJMP JIA1            ;加计算子程序
  161.          AJMP JIAN1           ;减计算子程序
  162.          AJMP CHENG1          ;乘计算子程序
  163.          AJMP CHU             ;除计算子程序
  164. ;=======删除键功能
  165. SAN_CHU: ACALL QING_DIS
  166.          AJMP DKA
  167. ;=======加键功能
  168. JIA:     MOV 3CH,#00H
  169.          ACALL CUN_SHU
  170.          ACALL QING_DIS
  171.          AJMP DKA
  172. ;=======减键功能
  173. JIAN:    MOV 3CH,#02H
  174.          ACALL CUN_SHU
  175.          ACALL QING_DIS
  176.          AJMP DKA
  177. ;=======乘键功能
  178. CHENG:   MOV 3CH,#04H
  179.          ACALL CUN_SHU
  180.          ACALL QING_DIS
  181.          AJMP DKA
  182. ;=======除键功能
  183. CHU:     MOV 3DH,#06H
  184.          ACALL CUN_SHU
  185.          ACALL QING_DIS
  186.          AJMP DKA


  189. ;=================================
  190. ;存被加（减、乘、除）数，存放在37H~3BH里
  191. CUN_SHU: MOV 37H,30H    ;36H存放的为最低位
  192.          MOV 38H,31H
  193.          MOV 39H,32H
  194.          MOV 3AH,33H
  195.          MOV 3BH,34H    ;3AH存放的为最高位
  196.          RET
  197. ;================================
  198. ;清除显示单元
  199. QING_DIS: MOV R1,#30H
  200. QING1:    MOV @R1,#00H
  201.           INC R1
  202.           MOV A,R1
  203.           CJNE A,#36H,QING1
  204.           MOV R1,#30H
  205. LOP1:     RET
  206. ;================================
  207. ;十进制加法子程序
  208. JIA1:
  209.          MOV A,37H      ;个位被加数
  210.          ADD A,30H      ;个位被加数+加数
  211.          MOV B,#10      ;十六进制除10转换成BCD码
  212.          DIV AB
  213.          MOV 30H,B      ;余数即个位存放在30H
  214.          MOV 37H,A      ;商存放在37H

  216.          MOV A,38H      ;十位被加数
  217.          ADD A,31H      ;十位被加数+加数
  218.          ADD A,37H      ;加上个位之和的进位
  219.          MOV 37H,#00H   ;清除37H
  220.          MOV B,#10      ;十六进制除10转换成BCD码
  221.          DIV AB
  222.          MOV 31H,B      ;余数即十位存放在31H
  223.          MOV 38H,A      ;商存放在38H

  225.          MOV A,39H      ;百位计算同十位
  226.          ADD A,32H
  227.          ADD A,38H
  228.          MOV 38H,#00H
  229.          MOV B,#10
  230.          DIV AB
  231.          MOV 32H,B
  232.          MOV 39H,A

  234.          MOV A,3AH      ;千位计算同十位
  235.          ADD A,33H
  236.          ADD A,39H
  237.          MOV 39H,#00H
  238.          MOV B,#10
  239.          DIV AB
  240.          MOV 33H,B
  241.          MOV 3AH,A

  243.          MOV A,3BH      ;万位计算同十位
  244.          ADD A,34H
  245.          ADD A,3AH
  246.          MOV 3AH,#00H
  247.          MOV B,#10
  248.          DIV AB
  249.          MOV 34H,B
  250.          MOV 3BH,#00H
  251.          AJMP DKA
  252. ;=====================
  253. JIAN1:   AJMP DKA
  254. CHENG1:  AJMP DKA
  255. CHU1:    AJMP DKA
  256. ;=============================================
  257. ;延时程序和查表表格
  258. DELY4ms: MOV R6,#8        ;延时4毫秒
  259. D1:      MOV R7,#248
  260.          DJNZ R7,$
  261.          DJNZ R6,D1
  262.          RET

  264. DELY10ms:MOV R6,#20       ;延时10毫秒
  265. D2:      MOV R7,#248
  266.          DJNZ R7,$
  267.          DJNZ R6,D2
  268.          RET

  270. TABLE:   DB 07H, 04H, 01H  ; /   本表格是以键盘为参考   7   8   9   /
  271.          DB 08H, 05H, 02H  ; *                          4   5   6   *
  272.          DB 09H, 06H, 03H  ; -                          1   2   3   -
  273.          DB 00H, 00H ;=      +                         清除 0   =   +
  274.          END
复制代码
作者: 小大人    时间: 2017-4-26 11:22
您好，这个仿真有C语言的源程序吗
作者: 18105735773    时间: 2018-6-25 23:32
这个我仿真试了下  只有加法有效 是出了什么问题吗
作者: 18105735773    时间: 2018-6-25 23:33
= =只写了加法程序
作者: 买醉的minguk    时间: 2019-6-9 15:41
你好，请问能将乘除的代码上传吗?谢谢
作者: 51张肆    时间: 2019-6-9 21:42
买醉的minguk 发表于 2019-6-9 15:41
你好，请问能将乘除的代码上传吗?谢谢

不能哦
作者: 蛇蛇蛇    时间: 2019-6-26 09:18
我买了  没有减乘除的啊
作者: 金七仁    时间: 2019-12-15 12:28
求问：数码管上不能显示出加减乘除号吗
作者: 周宇萍9898    时间: 2019-12-18 17:38
有没有仿真
作者: dsdsd2222    时间: 2020-5-2 11:04
是只有加是嘛
作者: 惫懒货    时间: 2021-12-16 13:42
大佬有没有按键音程序？



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1