找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 6973|回复: 2
打印 上一主题 下一主题
收起左侧

FPGA人体反应速度测试器设计

[复制链接]
跳转到指定楼层
楼主
实验一基于fpga设计的人体反应速度测试器
.实验内容与要求:
在DE2 fpga开发板上实现一个人体反应速度测试电路。
1)测试器复位电路;
2)复位一段时间后红灯点亮(用LED指示灯),计数器开始以毫秒为单位计数(计数值显示在数码管上)。
3) 测试人发现红灯点亮后,迅速按住KEY1键,红灯熄灭。计数器停止计数,得到测试人反映时间。
4)等待时间值要求可设置,由按键或开关设置等待时间。

反映速度测试器所有资料打包下载:
反映速度测试器.rar (2.5 MB, 下载次数: 49)

  1. module respone_time(clk,rst,dataout,en,led,key,key_start);
  2. input clk,rst,key,key_start;
  3. output led;
  4. output[7:0] dataout;   //数码管的段码输出
  5. output[3:0] en;        //数码管的位选使能输出
  6. reg[7:0] dataout;      //各段数据输出
  7. reg[3:0] en;

  8. reg[15:0] cnt_scan;//扫描频率计数器
  9. reg[3:0] dataout_buf;
  10.       
  11. reg[18:0]  cnt; //计数寄存器
  12. always @ (posedge clk  or negedge rst)
  13.     if (!rst) cnt <= 19'd0; //异步复位
  14. //else if(key_an) cnt <=20'd0;//发现按键按下,重新计数
  15.     else if(cnt==19'd500000)
  16.         cnt <= 19'd0;
  17.     else cnt <= cnt + 1'b1;
  18.    
  19. reg[9:0]  postphone; //计数寄存器
  20. always @ (posedge clk  or negedge rst)
  21.     if (!rst)
  22.         postphone <= 10'd0; //异步复位
  23.    else if(cnt==19'd500000)
  24.         postphone <= postphone+1'b1;
  25.    else if (postphone==10'd1000)
  26.         postphone <=10'd0;
  27.    
  28. reg low_sw;
  29. always @(posedge clk  or negedge rst)
  30.     if (!rst) low_sw <= 1'b1;
  31.     else if (cnt == 19'd500000)  //满20ms,将按键值锁存到寄存器low_sw中  cnt == 20'hfffff
  32.       low_sw <= key;
  33.       
  34. reg  low_sw_r;                 //每个时钟周期的上升沿将low_sw信号锁存到low_sw_r中
  35. always @ ( posedge clk  or negedge rst)
  36.     if (!rst) low_sw_r <= 1'b1;
  37.     else low_sw_r <= low_sw;
  38.    
  39. //当寄存器low_sw由1变为0时,led_ctrl的值变为高,维持一个时钟周期
  40. wire led_ctrl = low_sw_r & ( ~low_sw);   


  41. reg key_st;
  42. always @(posedge clk  or negedge rst)
  43.     if (!rst) key_st <= 1'b1;
  44.     else if (cnt == 19'd500000)
  45.     key_st <= key_start;

  46. reg key_st_r;       //每个时钟周期的上升沿将low_sw信号锁存到low_sw_r中
  47. always @ ( posedge clk  or negedge rst )
  48.     if (!rst) key_st_r <= 1'b1;
  49.     else key_st_r <= key_st;

  50. //当寄存器key_rst由1变为0时,led_an的值变为高,维持一个时钟周期
  51. wire key_start_an = key_st_r & ( ~key_st);

  52. reg led1;
  53. //reg flag;
  54. always @ (posedge clk or negedge rst)
  55.     if (!rst)
  56.         begin
  57.            led1 <= 1'b0;
  58.            //flag <= 1'b0;
  59.         end
  60.     else if((postphone==10'd60)||(postphone==10'd190)||(postphone==10'd280)||(postphone==10'd450)||(postphone==10'd650)||(postphone==10'd750)||(postphone==10'd900))//(postphone==9'd150)&&(flag == 1'b0)   
  61.         begin
  62.            led1 <= 1'b1;
  63.            //flag <= 1'b1;
  64.         end                                                      
  65.     else if ( led_ctrl)
  66.         led1 <=1'b0; //led1 <= ~led1  某个按键值变化时,LED将做亮灭翻转

  67. assign led = led1;//assign led = led1 ? 1'b1 : 1'b0; //LED翻转输出
  68.   

  69. reg[12:0] respone;//数值显示
  70. always@(posedge clk or negedge rst)
  71.      if(!rst)
  72.         begin
  73.           respone<=13'd0;
  74.         end
  75.      else if(led1 ==1'b1)
  76.         begin
  77.           if(cnt==19'd500000)
  78.              respone <= respone+1'b1;              
  79.         end
  80.      else if(key_start_an)
  81.         respone<=13'd0;

  82. always@(posedge clk or negedge rst)//数码管扫描模块
  83. begin
  84.         if(!rst)
  85.                 cnt_scan<=16'd0;               
  86.         else
  87.                 cnt_scan<=cnt_scan+1'b1;
  88. end

  89. always @(cnt_scan)
  90. begin
  91.    case(cnt_scan[15:13])
  92.        3'b000 :
  93.           en = 4'b1110;//位选低电平有效
  94.        3'b001 :
  95.           en = 4'b1101;
  96.        3'b010 :
  97.           en = 4'b1011;
  98.        3'b011 :
  99.           en = 4'b0111;
  100.        default :
  101.           en = 4'b1110;
  102.     endcase
  103. end

  104. always@(en) //对应COM信号给出各段数据
  105. begin
  106.         case(en)
  107.                 4'b1110:
  108.                         dataout_buf=20*respone%10000/1000;
  109.                 4'b1101:
  110.                         dataout_buf=20*respone%1000/100;
  111.                 4'b1011:
  112.                         dataout_buf=20*respone%100/10;
  113.                 4'b0111:
  114.                         dataout_buf=20*respone%10;        
  115.                 default:;
  116.          endcase
  117. end

  118. always@(dataout_buf)
  119. begin
  120.         case(dataout_buf)
  121.                 4'b0000:
  122.                         dataout=8'b1100_0000;////共阴0x3f,
  123.                 4'b0001:
  124.                         dataout=8'b1111_1001;//0x06,
  125.                 4'b0010:
  126.                         dataout=8'b1010_0100;//0x5b,
  127.                 4'b0011:
  128.                         dataout=8'b1011_0000;//0x4f,
  129.                 4'b0100:
  130.                         dataout=8'b1001_1001;//0x66,
  131.                 4'b0101:
  132.                         dataout=8'b1001_0010;//0x6d,
  133.                 4'b0110:
  134.                         dataout=8'b1000_0010;//0x7d,
  135.                 4'b0111:
  136.                         dataout=8'b1111_1000;//0x07,
  137.                 4'b1000:
  138.                         dataout=8'b1000_0000;//0x7f,
  139.                 4'b1001:
  140.                         dataout=8'b1001_1000;//0x6f,
  141.                 default:;
  142.          endcase
  143. end

  144. endmodule
复制代码
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:235935 发表于 2017-10-4 21:49 | 只看该作者
感谢楼主无私分享
回复

使用道具 举报

板凳
ID:291855 发表于 2018-6-26 19:19 | 只看该作者
这个程序不能打开啊
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表