使用時把右手食指指肚放在st188反射式紅外傳感器上,放置合適時會看到指示燈隨心跳同時閃動,如果沒有閃爍請適當調節手指壓力,調節完后在測試過程中手指壓力不要變,保持穩定,當指示燈有規律閃爍時表示信號正確。當單片機檢測到大約第五次信號時開始顯示這五次信號算出的平均心率。當超過大約1.5秒沒有檢測到信號,清除心率。
如果手指抖動或者不穩定會看到指示燈亂閃,這樣測得的數據不準,在測試過程中保持穩定!
1:初始化液晶和定時器
2:檢測外部中斷,并記錄中斷時間間隔
3:當有超過5個符合要求的時間記錄,算出5個時間的平均值和對應的60s的心率并顯示
4:當超過1.5s沒有檢測到中斷發生停止顯示
2-3-4循環
電路原理圖如下:
0.png (75.56 KB, 下載次數: 153)
下載附件
2019-4-17 18:44 上傳
單片機源程序如下:
- #include<reg52.h>
- #define uint unsigned int
- #define uchar unsigned char
- sbit rs=P1^0; //數據與命令選擇控制引腳
- sbit rw=P1^1; //讀與寫選擇控制引腳
- sbit en=P1^2; //使能擇控制引腳
- sbit bf=P0^7; //忙標志位
- sbit P32=P3^2;
- unsigned char i=0,timecount=0,displayOK=0,rate=0,aa=0;
- unsigned int time[6]={0};
- /************ 延時函數 *****************/
- void delay(uint z)
- {
- while(z--);
- }
- /************ 忙檢測函數 *****************/
- void jiance()
- {
- P0=0xff;
- rs=0;rw=1;en=1;
- while(bf); //如果BF==1表示液晶在忙
- en=0;
- }
- /************ 寫命令函數 *****************/
- void write_com(uchar com)
- {
- jiance();
- P0=com;
- rs=0;rw=0;en=1;
- delay(2);
- en=0;
- }
- /************ 寫數據函數 *****************/
- void write_dat(uchar dat)
- {
- jiance();
- P0=dat;
- rs=1;rw=0;en=1;
- delay(2);
- en=0;
- }
- /************ 1602液晶初始化函數 *****************/
- void init_lcd()
- {
- write_com(0x38); // 設置16*2顯示,5*7點陣,8位數據接口
- write_com(0x0c); // 開顯示,不顯示光標
- write_com(0x06); // 地址加1,當寫入數據的時候光標右移
- write_com(0x01); //清屏
- }
- /******************************************************************/
- /* 在指定位置寫字符 */
- /******************************************************************/
- void LCD_write_char(unsigned char x,unsigned char y,unsigned char Data)
- {
- if (y == 0)
- write_com(0x80 + x);
- else
- write_com(0xC0 + x);
- write_dat(Data);
- }
- void DelayMs(unsigned int z)
- {
- unsigned int x;
- for(;z>0;z--)
- for(x=110;x>0;x--);
- }
- void main()
- {
- P32=1;
- init_lcd();//lcd初始化
- TCON=0x01;//設置外部中斷0
- EX0=1;
- TMOD=0x01;//定時器0初始化
- TH0=(65536-50000)/256;//實測每50ms中斷的定時值
- TL0=(65536-50000)%256;
- ET0=1;//開定時器中斷
- //顯示基本文字
- LCD_write_char(3,0,'H');
- LCD_write_char(4,0,'e');
- LCD_write_char(5,0,'a');
- LCD_write_char(6,0,'r');
- LCD_write_char(7,0,'t');
- LCD_write_char(8,0,' ');
- LCD_write_char(9,0,'R');
- LCD_write_char(10,0,'a');
- LCD_write_char(11,0,'t');
- LCD_write_char(12,0,'e');
- LCD_write_char(8,1,'/');
- LCD_write_char(9,1,'m');
- LCD_write_char(10,1,'i');
- LCD_write_char(11,1,'n');
- TR0=0;//定時器停止
- EA=1;//開總中斷
- while(1)
- {
-
- if(displayOK==1)
- {
- rate=60000/(time[1]/5+time[2]/5+time[3]/5+time[4]/5+time[5]/5);
- LCD_write_char(5,1,rate/100+48);
- LCD_write_char(6,1,(rate%100)/10+48);
- LCD_write_char(7,1,rate%10+48);
- }
- DelayMs(300);
- }
- }
- void ex0() interrupt 0
- {
- EX0=0;//暫時關外部中斷
- if(timecount<8) //當連續兩次檢測時間間隔小于8*50ms=400ms不處理
- {
- TR0=1;//開定時器
- }
- else
- {
- time[i]=timecount*50+TH0*0.256+TL0/1000;//算出間隔時間
- TL0=(65536-50000)%256;//重新設置定時器
- TH0=(65536-50000)/256;
- timecount=0;//50ms計數清零
- i++;
- if(i==6)//記錄到超過等于6次時間
- {
- i=1;//計數從1開始
- displayOK=1; //測得5次開始顯示
- }
-
- }
- EX0=1;
- }
- void et0() interrupt 1
- {
- TL0=(65536-50000)%256;
- TH0=(65536-50000)/256;
-
- timecount++;//每50ms一次計數
- if(timecount>25) //當超過25*50ms=1.25s沒有檢測到信號停止顯示
- {
- i=0;//數據個數清零
- timecount=0;//50ms計數清零
- displayOK=0;//顯示關
- TR0=0;//定時器關
- TH0=(65536-50000)/256;
- TL0=(65536-50000)%256;
- }
- }
復制代碼
所有資料51hei提供下載:
心率脈搏計源程序.rar
(34.39 KB, 下載次數: 400)
2019-4-17 16:55 上傳
點擊文件名下載附件
51脈搏檢測程序 下載積分: 黑幣 -5
心率脈搏計-51-1602.pdf
(192.9 KB, 下載次數: 268)
2019-4-17 16:57 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|