自己做的，基于51单片机的脉搏检测器，通过lcd1602显示脉搏而且可以显示当前时间，程序通过中断功能还可以查看脉搏测量的历史记录。有详细注释。
#include <reg52.h> //调用单片机头文件
#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 下一组数据 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:数据寄存器 L:指令寄存器
sbit rw=P1^1; //寄存器选择信号 H:数据寄存器 L:指令寄存器
sbit e =P1^2; //片选信号 下降沿触发
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延时函数*****************************/
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命令函数
* 输入 : 输入的命令值
* 输出 : 无
***********************************************************************/
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写数据函数
* 输入 : 需要写入1602的数据
* 输出 : 无
***********************************************************************/
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" ，调用该函数如下
write_string(1,5,"ab cd ef;")
* 输入 : 行，列，需要输入1602的数据
* 输出 : 无
***********************************************************************/
//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上显示两位十进制数************************/
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下载地址：
单片机脉搏计.zip
(46.08 KB, 下载次数: 52)
|
