STC12C5A60S2手指心跳检测程序

这里面是我自己制作的红外发射手指心跳检测的程序，里面大概是NRF24L01通信，1602显示，心跳检测，和心率计算。

/*------------------------------------------------
【平    台】星河工作室
【编    写】王建锋
【软件版本】V1.0
【最后更新】2018年4月2日
--------------------------------------------------
【dev.env.】KEIL5.20.
【Target  】STC12C5A60S2
【Crystal 】 11.0592MHZ
【QQ      】 16247155937
--------------------------------------------------*/
#include“1602.h“
/***********************************************************************
*函数名:void Delay_ms（unsigned int n）
*传入数据:n  1 大概为1ms
*返回数据:
*作用:延时函数
*作者:王建锋
*日期:2018/4/4
*QQ:1624155937
************************************************************************/ 
void Delay_ms（unsigned int n）
{
	unsigned int  ij;
	for（i=0;i		for（j=0;j<123;j++）;
}
/***********************************************************************
*函数名:uint8_t GetData（）
*传入数据:void
*返回数据:uint8_t 读取引脚的数据
*作用:因为1602的引脚和P2peye.com口连接，但是，实际连接过程中P2peye.com的高低位反了，所以这里用程序反过来。
*作者:王建锋
*日期:2018/4/4
*QQ:1624155937
************************************************************************/ 
uint8_t GetData（）
{
    uint8_t Byte = 0;
    uint8_t Data = 0;
    uint8_t temp = 0;
    
    Byte = SDA_1602;
    for（temp = 0x01;temp != 0;temp <<= 1）
    { 
        if（temp & Byte）
        {
            Data |= 0x01;
        }
        else
        {
            Data &= ~0x01;
        }
        if（temp == 0x80）
            break;
        Data <<= 1;
    }
    
    return Data;
}
/***********************************************************************
*函数名:void WriteData（uint8_t Byte）
*传入数据:Byte  要写入的数据
*返回数据:void
*作用:因为1602的引脚和P2peye.com口连接，但是，实际连接过程中P2peye.com的高低位反了，所以这里用程序反过来。
*作者:王建锋
*日期:2018/4/4
*QQ:1624155937
************************************************************************/ 
void WriteData（uint8_t Byte）
{
    uint8_t Data = 0;
    uint8_t temp = 0;
    
    for（temp = 0x01;temp != 0;temp <<= 1）
    { 
        if（temp & Byte）
        {
            Data |= 0x01;
        }
        else
        {
            Data &= ~0x01;
        }
        if（temp == 0x80）
            break;
        Data <<= 1;
    }
    
    SDA_1602 = Data;
}
/***********************************************************************
*函数名:void ready（）
*传入数据:void
*返回数据:void
*作用:1602忙检测
*作者:王建锋
*日期:2018/4/4
*QQ:1624155937
************************************************************************/ 
void ready（）
{
	uchar byte;
	RS_1602=0;
	RW_1602=1;
	WriteData（0xff）;
	do
	{
		E_1602 = 1;
		byte = GetData（）;
		E_1602 = 0;
	}while（byte & 0x80）;
    
}
/***********************************************************************
*函数名:void write_com_1602（uchar byte）
*传入数据:byte 写入的数据   
*返回数据:void
*作用:1602写入指令
*作者:王建锋
*日期:2018/4/4
*QQ:1624155937
************************************************************************/ 
void write_com_1602（uchar byte）
{
	ready（）;
	RS_1602=0;
	RW_1602=0;
	WriteData（byte）;
	E_1602=1;
	E_1602=0;
}
/***********************************************************************
*函数名:

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-04-01 22:46  显示接收\
     目录           0  2018-04-02 14:54  显示接收\c\
     目录           0  2018-04-02 14:55  显示接收\c\device\
     目录           0  2018-04-03 11:34  显示接收\c\device\inc\
     文件         775  2018-04-03 10:48  显示接收\c\device\inc\1602.h
     文件        5187  2018-04-03 10:48  显示接收\c\device\inc\24L01.h
     文件         538  2018-04-03 11:34  显示接收\c\device\inc\uart.h
     目录           0  2018-04-03 11:34  显示接收\c\device\src\
     文件        6325  2018-04-03 11:28  显示接收\c\device\src\1602.c
     文件        6488  2018-04-03 10:37  显示接收\c\device\src\24L01.c
     文件        1782  2018-04-03 11:34  显示接收\c\device\src\uart.c
     目录           0  2018-04-02 14:54  显示接收\c\user\
     目录           0  2018-04-03 11:34  显示接收\c\user\inc\
     文件        1230  2018-04-02 20:43  显示接收\c\user\inc\data_type.h
     文件         521  2018-04-03 11:34  显示接收\c\user\inc\main.h
     文件       18744  2018-04-03 10:47  显示接收\c\user\inc\STC12C5A60S2.h
     目录           0  2018-04-03 11:39  显示接收\c\user\src\
     文件        2756  2018-04-03 11:39  显示接收\c\user\src\main.c
     目录           0  2018-04-03 11:39  显示接收\obj\
     文件       11998  2018-04-03 11:39  显示接收\obj\1602.lst
     文件       12053  2018-04-03 11:39  显示接收\obj\24L01.lst
     文件        5211  2018-04-03 11:39  显示接收\obj\main.lst
     文件        3681  2018-04-03 11:39  显示接收\obj\uart.lst
     文件       33592  2018-04-03 11:39  显示接收\obj\uart.m51
     目录           0  2018-04-03 11:39  显示接收\output\
     文件       12379  2018-04-03 11:39  显示接收\output\1602.obj
     文件       14108  2018-04-03 11:39  显示接收\output\24L01.obj
     文件       13054  2018-04-03 11:39  显示接收\output\main.obj
     文件       41229  2018-04-03 11:39  显示接收\output\uart
     文件        1045  2018-04-03 11:39  显示接收\output\uart.build_log.htm
     文件       10146  2018-04-03 11:39  显示接收\output\uart.hex
............此处省略77个文件信息