找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3288|回复: 4
收起左侧

基于51单片机的人体反应速度测试仪程序与Proteus仿真

[复制链接]
ID:966093 发表于 2021-10-24 21:28 | 显示全部楼层 |阅读模式
基于AT89C52的人体反应速度测试仪我把仿真图和程序文件分享到下面了,需要的可以去看看。
先按住按钮,等待led亮起后再松开按钮 测得的时间及反应速度的时间.
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
51hei.gif
51hei.gif

仿真图

仿真图


单片机源程序如下:
  1. #include<stdlib.h>
  2. #include<stdio.h>
  3. #include<intrins.h>
  4. #include<reg52.h>
  5. sbit key=P1^0;
  6. sbit led=P1^1;
  7. typedef unsigned char byte;
  8. typedef unsigned int word;
  9. static byte disp[5];
  10. code byte table[11]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};
  11. byte bot(void)
  12. {
  13.         if(key==0)return 0;
  14.         else return 1;
  15. }
  16. void display(word ms)
  17. {
  18.         byte posi=0x01,i,j,temp;
  19.         disp[3]=ms/1000;
  20.         disp[2]=(ms%1000)/100;
  21.         disp[1]=(ms%100)/10;
  22.         disp[0]=ms%10;
  23.              for(i=0;i<4;i++)             //数码管显示   
  24.     {
  25.         temp=disp[i];     
  26.         temp=table[temp];
  27.        for(j=0;j<200;j++)         //延时   
  28.         {
  29.               P2=posi;             //显示xxxx秒形式        
  30.               P0=temp;     
  31.         }
  32.          posi*=2;   
  33.      }
  34. }

  35.         unsigned long random(void)          //生成随机数
  36. {   
  37.     word rt;   byte k=0;
  38.     srand (50000);                       //种下随机数种子,范围0-50000  
  39.     rt=rand();                           //生成随机熟
  40.     rt=rt*rand();                        //使随机数足够大,能够延时足够时间  
  41.     return rt;  
  42. }

  43. void INIT_TMR1(void)
  44. {
  45.      TMOD=0x11;  
  46.      TH1=0xfc;  
  47.      TL1=0x66;  
  48.      TR1=1;
  49. }  
  50. void delaylms(void)                    //延时1ms
  51. {
  52.       INIT_TMR1();  
  53.      while(1)   
  54.     {
  55.        if(TF1==1)     
  56.        break;
  57.      }   
  58. }

  59. void main(void)
  60. {
  61.           byte k=0;
  62.       k=bot();                         //获取按键情况
  63.       P1=0xff;                         //输入前先把P1口都加高电平  
  64.   while(1)            //主循环开始   
  65. {                                       
  66.   word mstime=0,j;   
  67.   word r;
  68. while(bot());                  //等待按键按下,否则始终等待      
  69. led=0;                          //按键被按下后,灯亮     
  70. r=random();
  71. for (j=r;j>0;--j)                //延时一段随机时间,为1马上的随机倍数         
  72. {
  73.     delaylms();            
  74.     k=bot();
  75.    if (k==1)             //如果在灯灭前谈起按键,显示最长时间作为惩罚
  76.     {
  77.      mstime=9999;                 
  78.      goto loop;               
  79.     }         
  80. }
  81.     led=1;                 //灯灭
  82.     INIT_TMR1();            //初始定时状态
  83.    while(1)                //如果按键弹起,反复进入定时状态,没1ms计时器
  84.     {
  85.            if(TF1==1)           
  86.        {
  87.             TH1=0xfc;            
  88.             TL1=0x18;              
  89.             TR1=1;              
  90.             TF1=0;
  91.             ++mstime;              
  92.        }   
  93.          if(k=bot())   
  94.         break;
  95.    }  
  96.    loop: led=1;
  97.    while(1)   
  98. {
  99.        if(k==1)            //按键弹开后始终显示时间            
  100.       {
  101.        k=bot();               
  102.        display(mstime);            
  103.       }
  104.        else                //若按键按下,重新开始测试            
  105.        {
  106.         while(1)   
  107.        {
  108.         if(k==1)            //按键弹开后始终显示时间            
  109.         {
  110.          k=bot();               
  111.          display(mstime);            
  112.         }
  113.        else                //若按键按下,重新开始测试            
  114.         {
  115.          mstime=0;               
  116.          P2=0xff;               
  117.          break;            
  118.         }     
  119.       }
  120.      }
  121. }
  122. }
  123. }
复制代码
1.png
51hei.png
Keil代码与Proteus8.8; 7.5仿真下载:
人体反应速度测试仪项目.7z (70.8 KB, 下载次数: 64)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

ID:1034966 发表于 2022-6-15 18:20 | 显示全部楼层
请问楼主,您分享的hex仿真没有问题但是写进单片机后不能运行,需要如何调试我的实物电路呢?
回复

使用道具 举报

ID:1035505 发表于 2022-6-23 16:03 来自手机 | 显示全部楼层
需要先按住按钮,等待led亮起后再松开按钮
回复

使用道具 举报

ID:1035505 发表于 2022-6-24 05:18 来自手机 | 显示全部楼层
用protues8.9仿不起来,是吗?
回复

使用道具 举报

ID:1035505 发表于 2022-6-28 16:30 来自手机 | 显示全部楼层
用8.9仿的就是不亮
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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