资源简介

基于单片机脉搏计心率计设计,采用红外对管采集血液冲放频率,利用单片机中断计数,lcd显示数据,记过多人测试决定稳定准确,可以根据不同人调灵敏度!含有源代码,原理图和pcb图,仿真图,参考论文。

资源截图

代码片段和文件信息

#include
#include
#include
#include“lcd1602.H“
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long 
unsigned int incidd[11]jjjktmp;
bit w=0;
uchar bh;
ulong time;
sbit spd = P2^0;


external0() interrupt 0//外部中断服务程序

   w=~w;
if(w==0)
{
  EX0=0; 
  ET0=1;
  TH0=0x0;
      TL0=0x0;
  n=0;
}
else 
{
time=n*65536+TH0*256+TL0;
dd[jj]=30000000/time;
jj++;
if(jj>10)
{
   jj=0;
   for(j=0;j<11;j++)
      for(k=0;k<11-j;k++)
     {
     if(dd[k]>dd[k+1])
  {
    tmp=dd[k];
   dd[k]=dd[k+1];
 dd[k+1]=tmp;
 
  }
    

 
 }
   if(dd[5]>50&&dd[5]<200)ci=((dd[4]+dd[5]+dd[6])/3)+11;

}
TH0=0x0;
        TL0=0x0;
n=0;

}
}
void timer0(void) interrupt 1
{
 n++;

}

void delay(void)   //误差 0us
{
   unsigned char abc;
    for(c=123;c>0;c--)
        for(b=116;b>0;b--)
            for(a=9;a>0;a--);


/////////////////////////////////////////////////////////////////
void main(void)
{
InitLcd();//
DelayMs(15);
IT0=1;     //INT0下降沿中断
EX0=1;     //允许INT1中断
TMOD=0x1;
TH0=0x0;
TL0=0x0; 
TR0=1;
ET0=1;
EA=1;

while(1)
{
 if(n>10)
 {
 n=0;  
 jj=0;
 ci=0;
         TimeNum[0]=‘N‘; 
         TimeNum[1]=‘O‘ ;
     TimeNum[2]=‘ ‘ ;
     TimeNum[3]=‘I‘ ;
     TimeNum[4]=‘N‘ ;
 TimeNum[5]=‘P‘ ;
 TimeNum[6]=‘U‘ ;
 TimeNum[7]=‘T‘ ;
 TimeNum[8]=‘ ‘ ;
   ShowString(0TimeNum);
     ShowString(1Test1);
  }
  else
  {
  if(w==0&&EX0==0)
    {
  delay();
  EX0=1;
}  

  TimeNum[0]=‘ ‘; 
         TimeNum[1]=‘ ‘ ;
     TimeNum[2]=‘ ‘ ;
     TimeNum[3]=‘ ‘ ;
     TimeNum[4]=‘ ‘ ;  
 TimeNum[5]=‘ ‘ ; 
  
  if(ci/100>0)TimeNum[6]=ci/100+‘0‘ ; else TimeNum[6]=‘ ‘ ; 
  if(ci/100==0&&ci%100/10>0)TimeNum[7]=ci%100/10+‘0‘ ; else TimeNum[7]=‘ ‘ ; 
  TimeNum[8]=ci%10+‘0‘ ;
  ShowString(0TimeNum);
  ShowString(1Test1);
  if(ci>100)spd=0;else spd=1;
     }
  
   }
;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     108395  2013-01-11 14:22  散件--发送资料\PCB1.PCB

     文件    3230208  2012-10-27 12:34  散件--发送资料\健康管家参考论文2.doc

     文件      11264  2013-01-11 14:23  散件--发送资料\元件清单.xls

     文件      19859  2013-01-11 14:22  散件--发送资料\原理图.Sch

     文件     353280  2013-01-11 12:30  散件--发送资料\参考论文一 基于单片机设计的脉搏测量仪(周静).doc

     文件    1651712  2013-01-11 12:30  散件--发送资料\参考论文二 基于C51单片机的脉搏测量仪设计.doc

     文件     108395  2013-01-11 14:22  散件--发送资料\散件--发送资料\PCB1.PCB

     文件    3230208  2012-10-27 12:34  散件--发送资料\散件--发送资料\健康管家参考论文2.doc

     文件      11264  2013-01-11 14:23  散件--发送资料\散件--发送资料\元件清单.xls

     文件      19859  2013-01-11 14:22  散件--发送资料\散件--发送资料\原理图.Sch

     文件     353280  2013-01-11 12:30  散件--发送资料\散件--发送资料\参考论文一 基于单片机设计的脉搏测量仪(周静).doc

     文件        742  2009-05-02 18:23  散件--发送资料\程序\1602.PWI

     文件      84495  2009-04-01 16:16  散件--发送资料\程序\Last Loaded 1602.DBK

     文件      10904  2013-01-11 14:41  散件--发送资料\程序\lcd1602

     文件       2112  2013-01-11 14:33  散件--发送资料\程序\lcd1602.c

     文件       2146  2012-12-19 00:28  散件--发送资料\程序\lcd1602.H

     文件       4326  2013-01-11 14:41  散件--发送资料\程序\lcd1602.hex

     文件         46  2013-01-11 14:41  散件--发送资料\程序\lcd1602.lnp

     文件       5943  2013-01-11 14:41  散件--发送资料\程序\lcd1602.LST

     文件      14386  2013-01-11 14:41  散件--发送资料\程序\lcd1602.M51

     文件      12544  2013-01-11 14:41  散件--发送资料\程序\lcd1602.OBJ

     文件       1222  2013-01-11 16:04  散件--发送资料\程序\lcd1602.Opt

     文件        388  2013-01-11 16:04  散件--发送资料\程序\lcd1602.plg

     文件       2122  2012-10-29 19:22  散件--发送资料\程序\lcd1602.Uv2

    .......      1066  2013-01-11 14:34  散件--发送资料\程序\lcd1602_Opt.Bak

     文件       2118  2009-04-01 16:37  散件--发送资料\程序\lcd1602_Uv2.Bak

     文件      35072  2013-01-14 20:33  散件--发送资料\程序.rar

     文件     589824  2008-01-10 13:59  散件--发送资料\脉搏测量心率测量仪.DDB

     文件     481792  2008-01-15 22:12  散件--发送资料\脉搏测量电路(参考).SchDoc

     目录          0  2008-01-10 09:29  散件--发送资料\散件--发送资料

............此处省略5个文件信息

评论

共有 条评论