老年人用藥助記神器單片機源程序

ID:568756 · 發表于 2019-9-6 19:40

為了幫助老年人在用藥時比較容易忘記的難題，本人特結合用藥特點，設計了本程序。本程序特點：
程序有四個按鍵，其功能分別為：
1、用藥一次，即可按此鍵，以便總用藥次數加1；
2、用藥次數有誤時，可按此鍵，讓用藥次數減1；
3、用藥次數置零；
3、用藥次數及時間清零，并啟用時間計時器，計時器自00-00-00，時-分-秒格式計時計數

本程序功能有:
1、程序硬件有AT24C02存儲器，以便對每次用藥的參數進行存儲，關閉電源后，相關數據不會丟失；
2、程序硬件有時間芯片DS1302，可通過按鍵，啟用時間計時，方便記錄類似于熱敷、浸泡類事項的時間；
3、相關信息，通過液晶1602顯示出來。
4、本程序是單片機愛好者的練習之作，亦可為家里老人盡一份孝心的小物件。

單片機源程序如下:

#include<reg51.h>
#include"lcd.h"
#include"ds1302.h"
#include "i2c.h"
#include "delay.h"
#include "string.h" /*利用C語言庫函數memcpy可以整體復制。memcpy聲明與string.h中，形式為:
void * memcpy(void *dst, void *src, int length);
其功能為將src地址上長度為length字節的數據，復制到dst上。 */
void LcdDisplay(unsigned char addr);
void Scan_KEY();
void num_display(void);
sbit KEY1=P1^3; //加1 四個按鍵共了，其再與74LS21與門并聯，相與后聯接P3.2口，實現INT0中斷
sbit KEY2=P1^4; //減1
sbit KEY3=P1^5; //次數置0
sbit KEY4=P1^6; //次數與時間均置0
sbit LED1=P2^5; //按鍵1存儲指示燈
bit KeyPressFlag; //定義按鍵標志位
//---存儲順序是秒分時日月周年, 存儲格式是用BCD碼---//
//uchar TIME2[7] = {10, 20, 0x00, 0x07, 0x07, 0x07, 0x68};
//uchar *jxhj[]= {"Mon","Tues","Wed","Thur","Fri","Sat","Sun"};
unsigned char num=0; //用于記錄次數
void main()
{
IRcvStr(0xae,0,&num,1); //&符號的作用是取一個變量的地址。
LcdInit();
Ds1302Init();
EA=1; //中斷總開關
EX0=1; //外部中斷INT0使能
IT0=1; //下降沿觸發 IT0=0為低電平觸發
while(1)
{
if(KeyPressFlag==1)
{
KeyPressFlag=0; //按鍵標志清零，以便下次檢測
Scan_KEY();
}
else
{
Ds1302ReadTime(); //讀取時間參數
LcdDisplay(0x00); //第一行地址是0x00,第二行是0x40;
LcdWriteCom(0xC0);
LcdWriteData('F');
LcdWriteData('R');
LcdWriteData('E');
LcdWriteData('Q');
LcdWriteData('U');
LcdWriteData('E');
LcdWriteData('N');
LcdWriteData('C');
LcdWriteData('Y');
LcdWriteData(':');
LcdWriteCom(0xC0+13); //移動光標指令，0x80是固定指令值，后面是移動的絕對值
LcdWriteData(num/10%10+0x30);
LcdWriteData(num%10+0x30); //+0x30就是把個位數值轉換成字符0~9的ASCII碼
}
}
}
/*******************************************************************************
* 函數名 : LcdDisplay()
* 函數功能 : 顯示函數
* 輸入 : 無
* 輸出 : 無
*******************************************************************************/
void LcdDisplay(unsigned char addr)
{
// LcdWriteCom(0x80); //第一行地址
/* LcdWriteData('1'); //確定日期的年代轉換
LcdWriteData('9');
LcdWriteData('0'+TIME[6]/16); //年
LcdWriteData('0'+(TIME[6]&0x0f));
LcdWriteData('-');
LcdWriteData('0'+TIME[4]/16); //月
LcdWriteData('0'+(TIME[4]&0x0f));
LcdWriteData('-');
LcdWriteData('0'+TIME[3]/16); //日
LcdWriteData('0'+(TIME[3]&0x0f));
LcdWriteCom(0x80+13); //移動光標指令，前面是固定的，后面是移動的數值
LcdWriteData('0'+(TIME[5]&0x07)); //星期
*/
LcdWriteCom(addr+0X80); //書寫的位置
LcdWriteData('S');
LcdWriteData('T');
LcdWriteData('A');
LcdWriteData('R');
LcdWriteData('T');
LcdWriteData(':');
LcdWriteCom(0x80+7);
LcdWriteData('0'+TIME[2]/16); //時 ds1302輸出的是壓縮BCD碼，除16就得到十位數的10進制數
LcdWriteData('0'+(TIME[2]&0x0f)); //8位壓縮BCD碼，即高四位是一個0-9的BCD碼，低四位亦同樣是一個BCD碼
LcdWriteData('-');
LcdWriteData('0'+TIME[1]/16); //分
LcdWriteData('0'+(TIME[1]&0x0f)); //相與后保留低四位，即個位
LcdWriteData('-');
LcdWriteData('0'+TIME[0]/16); //秒
LcdWriteData('0'+(TIME[0]&0x0f)); //數值同0x0f相與后就是個位數了，這只對BCD碼有效。
}
void Scan_KEY()
{
unsigned char i;
if(KEY1==0) //按鍵按下
{
DelayMs(20); //延時，去抖
if(KEY1==0) //確認按鍵按下
{
for(i=0;i<100;i++) //此處消抖程序非常經典，怎么按都絕對不會產生抖動。
{
if(KEY1==0) i=0;
} //自下面開始寫程序
if(num<100) //加操作次數控制在99以內
{
num++;
ISendStr(0xa0,0,&num,1); //寫入24c02
DelayMs(10);
num_display();
}
}
}
if(KEY2==0) //按鍵按下
{
DelayMs(20); //延時，去抖
if(KEY2==0) // //確認按鍵按下
{
for(i=0;i<100;i++) //此處消抖程序非常經典，怎么按都絕對不會產生抖動。而且直到松手后再執行后面程序
{
if(KEY2==0) i=0;
}
if(num>0) //減操作
{
num--;
ISendStr(0xa0,0,&num,1); //寫入24c02
DelayMs(10);
num_display();
}
}
}
if(KEY3==0) //按鍵按下
{
DelayMs(20); //延時，去抖
if(KEY3==0) // //確認按鍵按下
{
for(i=0;i<100;i++) //此處消抖程序非常經典，怎么按都絕對不會產生抖動。
{
if(KEY3==0) i=0;
}
Ds1302Init();
LcdDisplay(0x40); //第一行地址是0x00,第二行是0x40;
}
}
if(KEY4==0) //按鍵按下
{
DelayMs(20); //延時，去抖
if(KEY4==0) // //確認按鍵按下
{
for(i=0;i<100;i++) //此處消抖程序非常經典，怎么按都絕對不會產生抖動。
{
if(KEY4==0)i=0;
}
Ds1302Init();
LcdDisplay(0x40); //第一行地址是0x00,第二行是0x40;
num=0;
ISendStr(0xa0,0,&num,1); //寫入24c02
num_display();
}
}
}
void num_display(void) //專門用來顯示num值的
{
LcdDisplay(0x40); //第一行地址是0x00,第二行是0x40;
LcdWriteCom(0xC0+13); //移動光標指令，0x80是固定指令值，后面是移動的絕對值
LcdWriteData(num/10%10+0x30);
LcdWriteData(num%10+0x30); //+0x30就是把個位數值轉換成字符了
}
/*INT0中斷函數 */
void counter0(void) interrupt 0 //INT0 是四個按鍵接入74LS21四與門輸入，然后輸出口接入P3.2口
{
EX0=0; //關閉中斷
KeyPressFlag=1; //表明按鍵有動作，可以進行按鍵掃描
EX0=1; //再次打開中斷
}
/*------------------------------------------------
定時器中斷子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1 //定時對液晶屏數值進行更新
{
TH0=(65536-12000)/256; //重新賦值 2ms
TL0=(65536-2000)%256;
LcdDisplay(0x00); //第一行地址是0x00,第二行是0x40;
LcdWriteCom(0x80+11); //移動光標指令，后面是移動的絕對值
LcdWriteData(num%10+0x30); //+0x30就是把個位數值轉換成字符了
}