标题: 基于51单片机的人体反应速度测试仪程序与Proteus仿真 [打印本页]
作者: Ricky_DK    时间: 2021-10-24 21:28
标题: 基于51单片机的人体反应速度测试仪程序与Proteus仿真
基于AT89C52的人体反应速度测试仪我把仿真图和程序文件分享到下面了，需要的可以去看看。
先按住按钮,等待led亮起后再松开按钮 测得的时间及反应速度的时间.
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）




单片机源程序如下:
  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. }

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

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

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


Keil代码与Proteus8.8; 7.5仿真下载:
人体反应速度测试仪项目.7z (70.8 KB, 下载次数: 67)
作者: dieinpeace    时间: 2022-6-15 18:20
请问楼主，您分享的hex仿真没有问题但是写进单片机后不能运行,需要如何调试我的实物电路呢?
作者: 2165723703    时间: 2022-6-23 16:03
需要先按住按钮,等待led亮起后再松开按钮
作者: 2165723703    时间: 2022-6-24 05:18
用protues8.9仿不起来，是吗？
作者: 2165723703    时间: 2022-6-28 16:30
用8.9仿的就是不亮



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