标题: 单片机脉搏测量仪仪仿真加程序 [打印本页]
作者: 18必胜    时间: 2017-3-25 13:44
标题: 单片机脉搏测量仪仪仿真加程序
51单片机座的脉搏测量仪proteus仿真加程序分享，带工程文件

仿真原理图：




源程序：


  3. #include <reg51.h>
  4. unsigned char i,j,t,m,DelayTime,DispBuf[3];
  5. //单片机脉搏测量仪源程序
  6. //作者:吴汉清 ntwhq@tom.com
  7. unsigned int n,mb;
  8. unsigned char code
  9. BitTab[3]={0xf7,0xef,0xdf};//位驱动码
  10. unsigned char code
  11. DispTab[10]={0x81,0xcf,0x92,0x86,0xcc,0xa4,0xa0,0x8f,0x80,0x84};//字形码
  12. sbit P3_0=P3^0;
  13. void delay(DelayTime);
  14. main()         //主程序
  15. {        
  16.         TMOD=0x01;        //定时器T0工作于方式1
  17.         TH0=0xec;
  18.         TL0=0x78;        //T0定时时间为5ms
  19.         IE=0X83;         //开中断
  20.         IT0=1;           //外部中断0为边沿触发方式
  21.         TR0=1;           //开定时器T0
  22.         for(;;)          //脉搏指示灯控制
  23.         {        
  24.                 if(P3_0==0)
  25.                 {
  26.                         delay(200);
  27.                         P3_0=1;
  28.                 }
  29.         }
  30. }
  31. external0() interrupt 0//外部中断服务程序
  32. {
  33.         P3_0=0;          //点亮指示灯
  34.         if(n==0)
  35.         mb=0;
  36.         else
  37.         mb=12000/n;      //计算每分钟脉搏数
  38.         DispBuf[2]=mb%10;//取个位数
  39.         mb=mb/10;
  40.         DispBuf[1]=mb%10;//取十位数
  41.         DispBuf[0]=mb/10;//取百位数
  42.         n=0;
  43. }
  44. Timer0() interrupt 1//定时中断服务程序
  45. {        
  46.         TH0=0xec;
  47.         TL0=0x78;
  48.         t=BitTab[j];//取位值
  49.         P3=P3|0x38;//P3.3-P3.5送1
  50.         P3=P3&t;   //P3.3-P3.5输出取出的位值
  51.         t=DispBuf[j];//取出待显示的数
  52.         t=DispTab[t];//取字形码
  53.         P1=t; //字型码由P3输出显示
  54.         j++;  //j作为数码管的计数器,取值0-2,显示程序通过它确认显示哪个数码管
  55.         if(j==3)
  56.         j=0;
  57.         n++;
  58.         if(n==2000)//10秒钟测不到心率,n复位
  59.         n=0;
  60. }
  61. void delay(DelayTime)//延时子程序
  62. {
  63.         for(;DelayTime>0;DelayTime--)
  64.         {
  65.                 for(i=0;i<250;i++)
  66.                         ;
  67.         }
  68. }
复制代码



下载：
单片机脉搏测量仪.rar (76.26 KB, 下载次数: 64)

作者: liu375413212    时间: 2017-4-19 09:58
非常需要，很给力
作者: Hi荒岛先生    时间: 2018-6-20 15:44
楼主，给份资源好吗？



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