找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 10884|回复: 13
收起左侧

51单片机脉搏心电测量仪设计 含程序 原理图及仿真文件

  [复制链接]
ID:115111 发表于 2016-4-20 21:24 | 显示全部楼层 |阅读模式

基于51单片机的心电测量仪的实物图:
HeMon1.jpg HeMon2.jpg

脉搏测量仪电路原理图:
图1.gif

0.png

波形:
Pulse1.gif

0.png
脉搏心电测量仪的仿真图


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

0.png

所有资料打包下载(包含c语言和汇编2个版本的脉搏计单片机设计资料):
51单片机脉搏测量仪的电路设计和源码.rar (220.31 KB, 下载次数: 249)

评分

参与人数 2黑币 +13 收起 理由
肖军 + 1 很给力!
练氏 + 12 赞一个!

查看全部评分

回复

使用道具 举报

ID:235588 发表于 2017-10-21 19:51 | 显示全部楼层
楼主好人
回复

使用道具 举报

ID:240522 发表于 2017-10-22 09:30 | 显示全部楼层
留存,有空做来试试!!!!
回复

使用道具 举报

ID:244004 发表于 2017-10-29 20:58 | 显示全部楼层
楼主好人
回复

使用道具 举报

ID:244426 发表于 2017-10-31 00:52 | 显示全部楼层
楼主可以
回复

使用道具 举报

ID:246166 发表于 2017-11-8 18:40 | 显示全部楼层
楼主太强了,学习学习
回复

使用道具 举报

ID:76133 发表于 2017-11-16 14:48 | 显示全部楼层

楼主太强了,学习学习
回复

使用道具 举报

ID:489935 发表于 2019-3-13 14:23 | 显示全部楼层
楼主对我们这种小白来说帮助太大了 谢谢楼主
回复

使用道具 举报

ID:488047 发表于 2019-3-15 10:13 | 显示全部楼层
好东西,学习一下,谢谢!
回复

使用道具 举报

ID:371527 发表于 2019-3-30 09:25 | 显示全部楼层
谢了,学习
回复

使用道具 举报

ID:666407 发表于 2019-12-18 14:24 来自手机 | 显示全部楼层
为啥仿真图没出来啊
回复

使用道具 举报

ID:838382 发表于 2020-11-14 16:56 | 显示全部楼层
进行仿真的时候一直有两个错误是怎么回事啊
回复

使用道具 举报

ID:838382 发表于 2020-11-14 17:21 | 显示全部楼层
想问下楼主为什么仿真的时候一直保持在60不变哪
回复

使用道具 举报

ID:357153 发表于 2020-12-28 14:48 | 显示全部楼层
感谢楼主的分享。收藏、值得学习
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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