標(biāo)題: 基于AT89c52的脈搏檢測程序 [打印本頁]
作者: 24sada1e1    時間: 2017-6-10 16:29
標(biāo)題: 基于AT89c52的脈搏檢測程序

單片機(jī)脈搏檢測源程序如下:
  1. unsigned char key_value;            //存放鍵盤返回
  2. unsigned char key_flag=0;//定義有鍵按下的標(biāo)志
  3. unsigned char i,j,t,m,DelayTime,DispBuf[3];
  4. unsigned int n,mb;


  7. #include "reg52.h"
  8. #include "lcd.c"
  9. #include "hardware.c"
  10. #include "user.c"
  11. #include "key.c"
  12. #include "string.h"
  13. #include "intrins.h"

  15. void delay(DelayTime);
  16. void main()
  17. {
  18.         EA=0;
  19.         LCD_Initial();
  20.         delay_20ms(10);
  21.         LCD_Write(0,0x01);           //清屏
  22.         LCD_Print(5,0,"Welcome!");
  23.         delay_20ms(10);
  24.         LCD_Print(0,0,"MaiBoCeLiang");
  25.         LCD_Print(0,1,"e Control!");
  26.         delay_20ms(10);
  27.         LCD_Write(0,0x01);           //清屏
  28.         LCD_Print(0,0,"LSTC");
  29.         LCD_Print(0,1,"by LWL&MZL");
  30.         delay_20ms(10);
  31.         LCD_Write(0,0x01);           //清屏
  32.        
  33.         TMOD=0x01;        //定時器T0工作于方式1
  34.         TH0=0xec;
  35.         TL0=0x78;        //T0定時時間為5ms
  36.         IE=0X83;         //開中斷
  37.         IT0=1;           //外部中斷0為邊沿觸發(fā)方式
  38.         TR0=1;           //開定時器T0
  39.         for(;;)          //脈搏指示燈控制
  40.         {       
  41.                 if(P3_0==0)
  42.                 {
  43.                         delay(200);
  44.                         P3_0=1;
  45.                 }
  46.         }

  48. }
  49. external0() interrupt 0//外部中斷服務(wù)程序
  50. {
  51.         P3_0=0;          //點(diǎn)亮指示燈
  52.         if(n==0)
  53.         mb=0;
  54.         else
  55.         mb=12000/n;      //計算每分鐘脈搏數(shù)
  56.         DispBuf[2]=mb%10;//取個位數(shù)
  57.         mb=mb/10;
  58.         DispBuf[1]=mb%10;//取十位數(shù)
  59.         DispBuf[0]=mb/10;//取百位數(shù)
  60.         n=0;
  61. }
  62. Timer0() interrupt 1//定時中斷服務(wù)程序
  63. {       
  64.         TH0=0xec;
  65.         TL0=0x78;
  66.         t=BitTab[j];//取位值
  67.         P3=P3|0x38;//P3.3-P3.5送1
  68.         P3=P3&t;   //P3.3-P3.5輸出取出的位值
  69.         t=DispBuf[j];//取出待顯示的數(shù)
  70.         t=DispTab[t];//取字形碼
  71.         P1=t; //字型碼由P3輸出顯示
  72.         j++;  //j作為數(shù)碼管的計數(shù)器,取值0-2,顯示程序通過它確認(rèn)顯示哪個數(shù)碼管
  73.         if(j==3)
  74.         j=0;
  75.         n++;
  76.         if(n==2000)//10秒鐘測不到心率,n復(fù)位
  77.         n=0;
  78. }
  79. ……………………

  81. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
脈搏程序.rar (22.63 KB, 下載次數(shù): 29)







歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1