資源簡介
這里面是我自己制作的紅外發(fā)射手指心跳檢測的程序,里面大概是NRF24L01通信,1602顯示,心跳檢測,和心率計算。

代碼片段和文件信息
/*------------------------------------------------
【平????臺】星河工作室
【編????寫】王建鋒
【軟件版本】V1.0
【最后更新】2018年4月2日
--------------------------------------------------
【dev.env.】KEIL5.20.
【Target??】STC12C5A60S2
【Crystal?】?11.0592MHZ
【QQ??????】?16247155937
--------------------------------------------------*/
#include“1602.h“
/***********************************************************************
*函數(shù)名:void?Delay_ms(unsigned?int?n)
*傳入數(shù)據(jù):n??1?大概為1ms
*返回數(shù)據(jù):
*作用:延時函數(shù)
*作者:王建鋒
*日期:2018/4/4
*QQ:1624155937
************************************************************************/?
void?Delay_ms(unsigned?int?n)
{
unsigned?int??ij;
for(i=0;i for(j=0;j<123;j++);
}
/***********************************************************************
*函數(shù)名:uint8_t?GetData()
*傳入數(shù)據(jù):void
*返回數(shù)據(jù):uint8_t?讀取引腳的數(shù)據(jù)
*作用:因為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;
}
/***********************************************************************
*函數(shù)名:void?WriteData(uint8_t?Byte)
*傳入數(shù)據(jù):Byte??要寫入的數(shù)據(jù)
*返回數(shù)據(jù):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;
}
/***********************************************************************
*函數(shù)名:void?ready()
*傳入數(shù)據(jù):void
*返回數(shù)據(jù):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);
????
}
/***********************************************************************
*函數(shù)名:void?write_com_1602(uchar?byte)
*傳入數(shù)據(jù):byte?寫入的數(shù)據(jù)???
*返回數(shù)據(jù):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;
}
/***********************************************************************
*函數(shù)名:
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????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個文件信息
評論
共有 條評論