【黑金原创教程】【FPGA那些事儿-驱动篇I 】实验五：按键模块④ — 点击，长点击，双击
实验五：按键模块④ — 点击，长点击，双击
实验二至实验四，我们一共完成如下有效按键：
l 点击（按下有效）
l 点击（释放有效）
l 长击（长按下有效）
l 双击（连续按下有效）
然而，不管哪个实验都是只有两项“功能”的按键模块而已，如今我们要创建三项“功能”的按键模块，亦即点击（按下有效），长击，还有双击。实验继续之前，让我们先来复习一下各种有效按键。
图5.1 点击（按下有效）。
如图5.1所示，所谓点击（按下有效）就是按键按下以后，isSClick信号（Single Click）
产生一个高脉冲。
图5.2 长点击。
如图5.2所示，所谓长点击就是按键按下以后，长达3秒不放，isLClick信号（Long Click）
就会产生一个高脉冲。
图5.3 双点击。
如图5.3所示，所谓双点击就是距离第一次“点击（按下有效）”，如果在有效的连击时限内容完成第二次“点击（按下有效）”，那么isDClick信号（Double Click）就会产生一个高脉冲。
话语上，实验五虽然要整合3项按键功能，然而实验五相较实验二至实验四却有一定程度的难度。那是因为仅有两项功能的按键模块，仅需判断一次性的有效按键而已，反之三项功能的按键模块却要分开二次判断，而且判断也要有序。根据实验五，核心操作会优先判断按键是否“长点击”，然后再来判断“点击”还是“双点击”。期间绝对不能搞错判断的次序。
具体内容，我们还是直接来看代码吧：
图5.4 实验五的建模图。
如图5.4所示，那是实验五的按键功能模块，输入端一边是连接至按键资源的KEY信号，输出端另一边则是连接至3位LED资源的LED信号。
key_funcmod.v
1. module key_funcmod
2. (
3. input CLOCK, RESET,
4. input KEY,
5. output [2:0]LED
6. );
以上为相关的出入端声明。
7. parameter T10MS = 28'd500_000;
8. parameter T100MS = 28'd5_000_000;
9. parameter T200MS = 28'd10_000_000;
10. parameter T300MS = 28'd15_000_000;
11. parameter T400MS = 28'd20_000_000;
12. parameter T500MS = 28'd25_000_000;
13. parameter T3S = 28'd150_000_000;
14.
15. /**********************************/ //sub
16.
17. reg F2,F1;
18.
19. always @ ( posedge CLOCK or negedge RESET )
20. if( !RESET )
21. { F2, F1 } <= 2'b11;
22. else
23. { F2, F1 } <= { F1, KEY };
24.
25. /**********************************/ //core
26.
27. wire isH2L = ( F2 == 1 && F1 == 0 );
28. wire isL2H = ( F2 == 0 && F1 == 1 );
以上内容是时间常量声明以及周边操作。第17~23行是检测电平状态的周边操作，第27~28行则是按下事件还有释放事件的声明。
29. reg [3:0]i;
30. reg isLClick, isDClick,isSClick;
31. reg [1:0]isTag;
32. reg [27:0]C1;
33.
34. always @ ( posedge CLOCK or negedge RESET )
35. if( !RESET )
36. begin
37. i <= 4'd0;
38. isLClick <= 1'b0;
39. isDClick <= 1'b0;
40. isSClick <= 1'b0;
41. isTag <= 2'd0;
42. C1 <= 28'd0;
43. end
44. else
以上内容为相关的寄存器声明以及复位操作。i指向步骤，寄存器isLClick，寄存器isDClick，还有寄存器isSClick则是相关的“有效按键”标志。isTag表示“有效按键”的标签，1为“点击”，2为“双点击”，3为“长点击”。C1用来计数。第35~43行则是相关的复位操作。
45. case(i)
46.
47. 0: // Wait H2L
48. if( isH2L ) begin i <= i + 1'b1; end
49.
50. 1: // H2L debounce
51. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= i + 1'b1; end
52. else C1 <= C1 + 1'b1;
53.
54. 2: // Key Tag Check 1
55. if( isL2H ) begin C1 <= 28'd0; i <= i + 1'b1; end
56. else if( {F2,F1} == 2'b00 && C1 >= T3S -1 ) begin isTag <= 2'd3; C1 <= 28'd0; i <= 4'd5; end
57. else C1 <= C1 + 1'b1;
58.
59. 3: // L2H debounce
60. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= i + 1'b1; end
61. else C1 <= C1 + 1'b1;
62.
63. 4: // Key Tag Check 2
64. if( isH2L && C1 <= T100MS -1 ) begin isTag <= 2'd2; C1 <= 28'd0; i <= i + 1'b1; end
65. else if( C1 >= T100MS -1) begin isTag <= 2'd1; C1 <= 28'd0; i <= i + 1'b1; end
66. else C1 <= C1 + 1'b1;
67.
68. 5: // Key trigger press up
69. if( isTag == 2'd3 ) begin isLClick <= 1'b1; i <= i + 1'b1; end
70. else if( isTag == 2'd2 ) begin isDClick <= 1'b1; i <= i + 1'b1; end
71. else if( isTag == 2'd1 ) begin isSClick <= 1'b1; i <= i + 1'b1; end
72.
73. 6: // Key trigger pree down
74. begin { isLClick, isSClick, isDClick } <= 3'b000; i <= i + 1'b1; end
75.
76. 7: // L2H deounce check
77. if( isTag == 2'd1 ) begin isTag <= 2'd0; i <= i + 2'd2; end
78. else if( isTag == 2'd2 ) begin isTag <= 2'd0; i <= i + 1'b1; end
79. else if( isTag == 2'd3 ) begin isTag <= 2'd0; i <= i + 1'b1; end
80.
81. 8: // Wait L2H
82. if( isL2H ) begin i <= i + 1'b1; end
83.
84. 9: // L2H debounce
85. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= 4'd0; end
86. else C1 <= C1 + 1'b1;
87.
88. endcase
第45~88行是核心操作，具体的操作过程如下：
步骤0，等待第一次按下事件；
步骤1，过滤抖动；
步骤2，检测是不是长点击，如果是isTag为3然后出发步骤5，否则等待释放事件；
步骤3，过滤抖动；
步骤4，检测是不是双击，如果是isTag为2，否则S为1；
步骤5~6，根据isTag内容产生高脉冲；
步骤7，根据isTag内容检测是否需要过滤抖动，isTag为1直接返回步骤0，其它需要；
步骤8，等待释放事件；
步骤9，过滤抖动然后返回步骤0.
89.
90. /*************************/ // sub-demo
91.
92. reg [2:0]D1;
93.
94. always @ ( posedge CLOCK or negedge RESET )
95. if( !RESET )
96. D1 <= 2'd0;
97. else if( isLClick )
98. D12] <= ~D1[2];
99. else if( isDClick )
100. D1[1] <= ~D1[1];
101. else if( isSClick )
102. D1[0] <= ~D1[0];
103.
104. /***************************/
105.
106. assign LED = D1;
107.
108. endmodule
以上内容为演示用的周边操作以及输出驱动。它会根据各种“有效按键”翻转D1的内容。第106行则是输出驱动的声明。编译完后下载程序。
如果笔者点击一下 <KEY1> 建，那么LED[0] 会点亮，如果笔者双击 <KEY1> 建，结果 LED[1] 会点亮，再如果笔者长按 <KEY1> 建 3秒不放，那么 LED[2] 则会点亮。总结说，一个按键资源可以执行3种功能，控制3位LED资源。
细节一：完整的个体模块
图5.5 完整的按键功能模块。
如图5.5所示，那是完整的按键功能模块，它有一位输入端KEY连接至按键资源，然后则有3位触发信号，Trig[2]产生“单击”的个高脉冲，Trig[1] 产生“双击”的个高脉冲，Trig[0]产生“长击”的个高脉冲
key_funcmod.v
1. module key_funcmod
2. (
3. input CLOCK, RESET,
4. input KEY,
5. output [2:0]oTrig
6. );
7. parameter T10MS = 28'd500_000;
8. parameter T100MS = 28'd5_000_000;
9. parameter T200MS = 28'd10_000_000;
10. parameter T300MS = 28'd15_000_000;
11. parameter T400MS = 28'd20_000_000;
12. parameter T500MS = 28'd25_000_000;
13. parameter T3S = 28'd150_000_000;
14.
15. /**********************************/ //sub
16.
17. reg F2,F1;
18.
19. always @ ( posedge CLOCK or negedge RESET )
20. if( !RESET )
21. { F2, F1 } <= 2'b11;
22. else
23. { F2, F1 } <= { F1, KEY };
24.
25. /**********************************/ //core
26.
27. wire isH2L = ( F2 == 1 && F1 == 0 );
28. wire isL2H = ( F2 == 0 && F1 == 1 );
29. reg [3:0]i;
30. reg isLClick, isDClick,isSClick;
31. reg [1:0]isTag;
32. reg [27:0]C1;
33.
34. always @ ( posedge CLOCK or negedge RESET )
35. if( !RESET )
36. begin
37. i <= 4'd0;
38. isLClick <= 1'b0;
39. isDClick <= 1'b0;
40. isSClick <= 1'b0;
41. isTag <= 2'd0;
42. C1 <= 28'd0;
43. end
44. else
45. case(i)
46.
47. 0: // Wait H2L
48. if( isH2L ) begin i <= i + 1'b1; end
49.
50. 1: // H2L debounce
51. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= i + 1'b1; end
52. else C1 <= C1 + 1'b1;
53.
54. 2: // Key Tag Check 1
55. if( isL2H ) begin C1 <= 28'd0; i <= i + 1'b1; end
56. else if( {F2,F1} == 2'b00 && C1 >= T3S -1 ) begin isTag <= 2'd3; C1 <= 28'd0; i <= 4'd5; end
57. else C1 <= C1 + 1'b1;
58.
59. 3: // L2H debounce
60. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= i + 1'b1; end
61. else C1 <= C1 + 1'b1;
62.
63. 4: // Key Tag Check 2
64. if( isH2L && C1 <= T100MS -1 ) begin isTag <= 2'd2; C1 <= 28'd0; i <= i + 1'b1; end
65. else if( C1 >= T100MS -1) begin isTag <= 2'd1; C1 <= 28'd0; i <= i + 1'b1; end
66. else C1 <= C1 + 1'b1;
67.
68. 5: // Key trigger press up
69. if( isTag == 2'd3 ) begin isLClick <= 1'b1; i <= i + 1'b1; end
70. else if( isTag == 2'd2 ) begin isDClick <= 1'b1; i <= i + 1'b1; end
71. else if( isTag == 2'd1 ) begin isSClick <= 1'b1; i <= i + 1'b1; end
72.
73. 6: // Key trigger pree down
74. begin { isLClick, isSClick, isDClick } <= 3'b000; i <= i + 1'b1; end
75.
76. 7: // L2H deounce check
77. if( isTag == 2'd1 ) begin isTag <= 2'd0; i <= i + 2'd2; end
78. else if( isTag == 2'd2 ) begin isTag <= 2'd0; i <= i + 1'b1; end
79. else if( isTag == 2'd3 ) begin isTag <= 2'd0; i <= i + 1'b1; end
80.
81. 8: // Wait L2H
82. if( isL2H ) begin i <= i + 1'b1; end
83.
84. 9: // L2H debounce
85. if( C1 == T10MS -1 ) begin C1 <= 28'd0; i <= 4'd0; end
86. else C1 <= C1 + 1'b1;
87.
88. endcase
89.
90. /***************************/
91.
92. assign oTrig = { isSClick,isDClick,isLClick };
93.
94. endmodule
【黑金原创教程】【FPGA那些事儿-驱动篇I 】实验五：按键模块④ — 点击，长点击，双击的更多相关文章
- [黑金原创教程] FPGA那些事儿《设计篇 III》- 图像处理前夕·再续
简介 一本为入门图像处理的入门书,另外还教你徒手搭建平台(片上系统),内容请看目录. 注意 为了达到最好的实验的结果,请准备以下硬件. AX301开发板, OV7670摄像模块, VGA接口显示器, ...
- [黑金原创教程] FPGA那些事儿《设计篇 II》- 图像处理前夕·续
简介 一本为入门图像处理的入门书,另外还教你徒手搭建平台(片上系统),内容请看目录. 注意 为了达到最好的实验的结果,请准备以下硬件. AX301开发板, OV7670摄像模块, VGA接口显示器, ...
- [黑金原创教程] FPGA那些事儿《设计篇 I》- 图像处理前夕
简介 一本为入门图像处理的入门书,另外还教你徒手搭建平台(片上系统),内容请看目录. 注意 为了达到最好的实验的结果,请准备以下硬件. AX301开发板, OV7670摄像模块, VGA接口显示器, ...
- [黑金原创教程] FPGA那些事儿《数学篇》- CORDIC 算法
简介 一本为完善<设计篇>的书,教你CORDIC算法以及定点数等,内容请看目录. 贴士 这本教程难度略高,请先用<时序篇>垫底. 目录 Experiment 01:认识CORD ...
- 【黑金原创教程】【FPGA那些事儿-驱动篇I 】连载导读
前言: 无数昼夜的来回轮替以后,这本<驱动篇I>终于编辑完毕了,笔者真的感动到连鼻涕也流下来.所谓驱动就是认识硬件,还有前期建模.虽然<驱动篇I>的硬件都是我们熟悉的老友记,例 ...
- 【黑金原创教程】【FPGA那些事儿-驱动篇I 】原创教程连载导读【连载完成，共二十九章】
前言: 无数昼夜的来回轮替以后,这本<驱动篇I>终于编辑完毕了,笔者真的感动到连鼻涕也流下来.所谓驱动就是认识硬件,还有前期建模.虽然<驱动篇I>的硬件都是我们熟悉的老友记,例 ...
- 【黑金原创教程】【FPGA那些事儿-驱动篇I 】实验二：按键模块① - 消抖
实验二:按键模块① - 消抖 按键消抖实验可谓是经典中的经典,按键消抖实验虽曾在<建模篇>出现过,而且还惹来一堆麻烦.事实上,笔者这是在刁难各位同学,好让对方的惯性思维短路一下,但是惨遭口 ...
- 【黑金原创教程】【FPGA那些事儿-驱动篇I 】实验十：PS/2模块④ — 普通鼠标
实验十:PS/2模块④ - 普通鼠标 学习PS/2键盘以后,接下来就要学习 PS/2 鼠标.PS/2鼠标相较PS/2键盘,驱动难度稍微高了一点点,因为FPGA(从机)不仅仅是从PS/2鼠标哪里读取数据 ...
- 【黑金原创教程】【FPGA那些事儿-驱动篇I 】实验三：按键模块② — 点击与长点击
实验三:按键模块② - 点击与长点击 实验二我们学过按键功能模块的基础内容,其中我们知道按键功能模块有如下操作: l 电平变化检测: l 过滤抖动: l 产生有效按键. 实验三我们也会z执行同样的事情 ...
随机推荐
- sqlplus 执行 sql 文件
SQL>START file_name or SQL>@ file_name 1 .sqlplus system/system@srv 2. sql>@c:\a.sql (执行此 ...
- javascript中new Date()的浏览器兼容性问题
正确的做法: var time1 = (timestart+' 00:00:00').toString(); var time2 = (timeend+' 23:59:59').toString(); ...
- 这可能是最好的RxJava 2.x 入门教程（一）
这可能是最好的 RxJava 2.x 入门教程系列专栏 文章链接: 这可能是最好的 RxJava 2.x 入门教程(完结版)[重磅推出] 这可能是最好的RxJava 2.x 入门教程(一) 这可能是最 ...
- windows环境下面批量移动文件到指定文件夹里面
move D:批量新建文件夹\upload\20171225173033565_2052.jpg D:批量新建文件夹\1623 move D:批量新建文件夹\upload\20171225174344 ...
- 你真的会用Gson吗?Gson使用指南（2）
注:此系列基于Gson 2.4. 上一篇文章 你真的会用Gson吗?Gson使用指南(1) 我们了解了Gson的基础用法,这次我们继续深入了解Gson的使用方法. 本次的主要内容: Gson的流式反序 ...
- 微软BI 之SSIS 系列 - 通过 ROW_NUMBER 或 Script Component 为数据流输出添加行号的方法
开篇介绍 上午在天善回答看到这个问题 - SSIS 导出数据文件,能否在第一列增加一个行号,很快就帮助解决了,方法就是在 SQL 查询的时候加一个 ROW_NUMBER() 就可以了. 后来想起在两年 ...
- 关于ř与tableau的集成---- k均值聚类
1.利用R内置数据集iris: 2.通过Rserve 包连接tableau,服务器:localhost,默认端口6311: 3.加载数据集iris: 4.编辑字段:Cluster <span s ...
- 【编码题篇】收集整理来自网络上的一些常见的 经典前端、H5面试题 Web前端开发面试题
编写一个方法 求一个字符串的字节长度假设:一个英文字符占用一个字节,一个中文字符占用两个字节 function GetBytes(str){ var len = str.length; var byt ...
- Charles for Mac（HTTP 监视器和网络抓包工具）破解版安装
1.软件简介 Charles 是在 Mac.Linux 或 Windows 下常用的 http 协议网络包截取工具,在平常的测试与调式过程中,掌握此工具就基本可以不用其他抓包工具了.Charle ...
- CentOS 7 安装SVN服务端
CentOS7下安装SVN服务 1. yum命令即可方便的完成安装# sudo yum install subversion 测试安装是否成功:# svnserve --version 更改svn的默 ...