找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2177|回復(fù): 0
收起左側(cè)

基于51單片機(jī)的脈搏檢測器+LCD1602+DS1302+記錄查詢

[復(fù)制鏈接]
ID:683358 發(fā)表于 2020-2-19 10:17 | 顯示全部樓層 |閱讀模式
自己做的,基于51單片機(jī)的脈搏檢測器,通過lcd1602顯示脈搏而且可以顯示當(dāng)前時間,程序通過中斷功能還可以查看脈搏測量的歷史記錄。有詳細(xì)注釋。

#include <reg52.h>             //調(diào)用單片機(jī)頭文件
#include <intrins.h>
#define uchar unsigned char  //無符號字符型 宏定義    變量范圍0~255
#define uint  unsigned int     //無符號整型 宏定義    變量范圍0~65535
uchar code READ[]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d}; //秒分時日月周年
uchar code WRITE[]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c};
extern uchar TIMEL[]={0x10,0x12,0x20,0x25,0x02,0x00,0x18};
uchar code table1[]="Rate";
uchar code table2[]="000/min";   
    uchar n;
sbit k1=P2^3;      //k2  記錄心率時間
sbit k2=P2^4;    //  k1   下一組數(shù)據(jù)      k4啟動中斷
sbit DSIO=P3^4;
sbit RST=P3^5;           //RST即CE
sbit SCLK=P3^6;
//uchar code table_num[]="0123456789abcdefg";
//sbit led=P1^5;
//sbit led2=P1^6;
sbit rs=P1^0;     //寄存器選擇信號 H:數(shù)據(jù)寄存器      L:指令寄存器
sbit rw=P1^1;     //寄存器選擇信號 H:數(shù)據(jù)寄存器      L:指令寄存器
sbit e =P1^2;     //片選信號   下降沿觸發(fā)

unsigned char i=0,timecount=0,displayOK=0,rate,aa=0,temp;
unsigned int time[6]={0},xinlu[5],nian[5],yue[5],ri[5],shi[5],fen[5],miao[5];


/***********************1ms延時函數(shù)*****************************/
void delay_1ms(uint q)
{
    uint i,j;
    for(i=0;i<q;i++)
        for(j=0;j<110;j++);
}


/********************************************************************
* 名稱 : delay_uint()
* 功能 : 小延時。
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void delay_uint(uint q)
{
    while(q--);
}

/********************************************************************
* 名稱 : write_com(uchar com)
* 功能 : 1602命令函數(shù)
* 輸入 : 輸入的命令值
* 輸出 : 無
***********************************************************************/
void write_com(uchar com)
{
    e=0;
    rs=0;
    rw=0;
    P0=com;
    delay_uint(25);
    e=1;
    delay_uint(100);
    e=0;
}

/********************************************************************
* 名稱 : write_data(uchar dat)
* 功能 : 1602寫數(shù)據(jù)函數(shù)
* 輸入 : 需要寫入1602的數(shù)據(jù)
* 輸出 : 無
***********************************************************************/
void write_data(uchar dat)
{
    e=0;
    rs=1;
    rw=0;
    P0=dat;
    delay_uint(25);
    e=1;
    delay_uint(100);
    e=0;   
}

/********************************************************************
* 名稱 : write_string(uchar hang,uchar add,uchar *p)
* 功能 : 改變液晶中某位的值,如果要讓第一行,第五個字符開始顯示"ab cd ef" ,調(diào)用該函數(shù)如下
          write_string(1,5,"ab cd ef;")
* 輸入 : 行,列,需要輸入1602的數(shù)據(jù)
* 輸出 : 無
***********************************************************************/
//void write_string(uchar hang,uchar add,uchar *p)
//{
//    if(hang==1)   
//        write_com(0x80+add);    //第一行加第幾位
//    else
//        write_com(0x80+0x40+add);
//    while(1)
//    {
//        if(*p == '\0')  break;
//        write_data(*p);
//        p++;
//    }   
//}

/***********************lcd1602上顯示兩位十進(jìn)制數(shù)************************/
void write_sfm3(uchar hang,uchar add,uint date)
{
    if(hang==1)   
        write_com(0x80+add);
    else
        write_com(0x80+0x40+add);
    write_data(0x30+date/100%10);
    write_data(0x30+date/10%10);
    write_data(0x30+date%10);   
}


全部資料51hei下載地址:
單片機(jī)脈搏計(jì).zip (46.08 KB, 下載次數(shù): 52)


評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表