標(biāo)題: 老年人用藥助記神器 單片機(jī)源程序 [打印本頁]
作者: myhj    時(shí)間: 2019-9-6 19:40
標(biāo)題: 老年人用藥助記神器 單片機(jī)源程序
為了幫助老年人在用藥時(shí)比較容易忘記的難題，本人特結(jié)合用藥特點(diǎn)，設(shè)計(jì)了本程序。本程序特點(diǎn)：
程序有四個(gè)按鍵，其功能分別為：
1、用藥一次，即可按此鍵，以便總用藥次數(shù)加1；
2、用藥次數(shù)有誤時(shí)，可按此鍵，讓用藥次數(shù)減1；
3、用藥次數(shù)置零；
3、用藥次數(shù)及時(shí)間清零，并啟用時(shí)間計(jì)時(shí)器，計(jì)時(shí)器自00-00-00，時(shí)-分-秒格式計(jì)時(shí)計(jì)數(shù)

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

單片機(jī)源程序如下:
  1. #include<reg51.h>
  2. #include"lcd.h"
  3. #include"ds1302.h"
  4. #include "i2c.h"
  5. #include "delay.h"
  6. #include "string.h"                 /*利用C語言庫函數(shù)memcpy可以整體復(fù)制。memcpy聲明與string.h中，形式為:
  7.                                                 void * memcpy(void *dst, void *src, int length);
  8.                                                 其功能為將src地址上長度為length字節(jié)的數(shù)據(jù)，復(fù)制到dst上。                 */

  10. void LcdDisplay(unsigned char addr);
  11. void Scan_KEY();
  12. void num_display(void);

  14. sbit KEY1=P1^3;                                 //加1 四個(gè)按鍵共了，其再與74LS21與門并聯(lián)，相與后聯(lián)接P3.2口，實(shí)現(xiàn)INT0中斷
  15. sbit KEY2=P1^4;                                 //減1
  16. sbit KEY3=P1^5;                                 //次數(shù)置0
  17. sbit KEY4=P1^6;                                 //次數(shù)與時(shí)間均置0

  19. sbit LED1=P2^5;                                 //按鍵1存儲指示燈
  20. bit KeyPressFlag;                         //定義按鍵標(biāo)志位
  21. //---存儲順序是  秒  分  時(shí)    日    月    周    年,  存儲格式是用BCD碼---//
  22. //uchar TIME2[7] = {10, 20, 0x00, 0x07, 0x07, 0x07, 0x68};
  23. //uchar *jxhj[]= {"Mon","Tues","Wed","Thur","Fri","Sat","Sun"};

  25. unsigned char num=0;                  //用于記錄次數(shù)
  26.                                                          
  27. void main()
  28. {
  29.         IRcvStr(0xae,0,&num,1);        //&符號的作用是取一個(gè)變量的地址。                 
  30.         LcdInit();
  31.         Ds1302Init();

  33.         EA=1;                 //中斷總開關(guān)
  34.            EX0=1;                 //外部中斷INT0使能
  35.         IT0=1;       //下降沿觸發(fā)  IT0=0為低電平觸發(fā)

  37.         while(1)
  38.         {       
  39.                 if(KeyPressFlag==1)
  40.                 {
  41.                           KeyPressFlag=0;  //按鍵標(biāo)志清零，以便下次檢測
  42.                         Scan_KEY();
  43.                 }       
  44.                 else
  45.                 {
  46.                         Ds1302ReadTime();                                                        //讀取時(shí)間參數(shù)
  47.                         LcdDisplay(0x00);                                                        //第一行地址是0x00,第二行是0x40;       
  48.                         LcdWriteCom(0xC0);               
  49.                         LcdWriteData('F');
  50.                         LcdWriteData('R');
  51.                         LcdWriteData('E');
  52.                         LcdWriteData('Q');
  53.                         LcdWriteData('U');
  54.                         LcdWriteData('E');
  55.                         LcdWriteData('N');
  56.                         LcdWriteData('C');
  57.                         LcdWriteData('Y');
  58.                         LcdWriteData(':');
  59.                            LcdWriteCom(0xC0+13);                                                //移動(dòng)光標(biāo)指令，0x80是固定指令值，后面是移動(dòng)的絕對值
  60.                         LcdWriteData(num/10%10+0x30);
  61.                         LcdWriteData(num%10+0x30);                                        //+0x30就是把個(gè)位數(shù)值轉(zhuǎn)換成 字符0~9的ASCII碼
  62.                 }                           
  63.         }
  64.        
  65. }


  68. /*******************************************************************************
  69. * 函數(shù)名         : LcdDisplay()
  70. * 函數(shù)功能                   : 顯示函數(shù)
  71. * 輸入           : 無
  72. * 輸出                  : 無
  73. *******************************************************************************/
  74. void LcdDisplay(unsigned char addr)
  75. {
  76. //        LcdWriteCom(0x80);                                                    //第一行地址
  77. /*        LcdWriteData('1');                                                        //確定日期的年代轉(zhuǎn)換
  78.         LcdWriteData('9');
  79.         LcdWriteData('0'+TIME[6]/16);                                //年
  80.         LcdWriteData('0'+(TIME[6]&0x0f));
  81.         LcdWriteData('-');
  82.         LcdWriteData('0'+TIME[4]/16);                                //月
  83.         LcdWriteData('0'+(TIME[4]&0x0f));
  84.         LcdWriteData('-');
  85.         LcdWriteData('0'+TIME[3]/16);                                //日
  86.         LcdWriteData('0'+(TIME[3]&0x0f));
  87.         LcdWriteCom(0x80+13);                                                //移動(dòng)光標(biāo)指令，前面是固定的，后面是移動(dòng)的數(shù)值
  88.         LcdWriteData('0'+(TIME[5]&0x07));                           //星期                         
  89. */
  90.         LcdWriteCom(addr+0X80);                                                //書寫的位置
  91.         LcdWriteData('S');
  92.         LcdWriteData('T');
  93.         LcdWriteData('A');
  94.         LcdWriteData('R');
  95.         LcdWriteData('T');
  96.         LcdWriteData(':');
  97.         LcdWriteCom(0x80+7);
  98.         LcdWriteData('0'+TIME[2]/16);                                //時(shí) ds1302輸出的是壓縮BCD碼，除16就得到十位數(shù)的10進(jìn)制數(shù)
  99.         LcdWriteData('0'+(TIME[2]&0x0f));                        //8位壓縮BCD碼，即高四位是一個(gè)0-9的BCD碼，低四位亦同樣是一個(gè)BCD碼         
  100.         LcdWriteData('-');
  101.         LcdWriteData('0'+TIME[1]/16);                                //分
  102.         LcdWriteData('0'+(TIME[1]&0x0f));                        //相與后保留低四位，即個(gè)位
  103.         LcdWriteData('-');
  104.         LcdWriteData('0'+TIME[0]/16);                                //秒  
  105.         LcdWriteData('0'+(TIME[0]&0x0f));                        //數(shù)值同0x0f相與后就是個(gè)位數(shù)了，這只對BCD碼有效。                                  
  106. }


  109. void Scan_KEY()                                                     
  110. {
  111.         unsigned char i;
  112.         if(KEY1==0)                                                   //按鍵按下
  113.         {
  114.                 DelayMs(20);                                     //延時(shí)，去抖
  115.                 if(KEY1==0)                                       //確認(rèn)按鍵按下
  116.                 {
  117.                  for(i=0;i<100;i++)             //此處消抖程序非常經(jīng)典，怎么按都絕對不會產(chǎn)生抖動(dòng)。
  118.             {
  119.                     if(KEY1==0) i=0;
  120.             }                                                        //自下面開始寫程序

  122.                    if(num<100)                                    //加操作 次數(shù)控制在99以內(nèi)
  123.             {
  124.                   num++;
  125.               ISendStr(0xa0,0,&num,1);  //寫入24c02
  126.               DelayMs(10);
  127.                           num_display();
  128.             }
  129.          }
  130.      }

  132.         if(KEY2==0)                                                   //按鍵按下
  133.         {
  134.                 DelayMs(20);                                     //延時(shí)，去抖
  135.                 if(KEY2==0)    //                           //確認(rèn)按鍵按下
  136.                 {
  137.                  for(i=0;i<100;i++)             //此處消抖程序非常經(jīng)典，怎么按都絕對不會產(chǎn)生抖動(dòng)。而且直到松手后再執(zhí)行后面程序
  138.             {
  139.                     if(KEY2==0) i=0;
  140.             }
  141.                       if(num>0)  //減操作
  142.                  {
  143.                   num--;
  144.               ISendStr(0xa0,0,&num,1);  //寫入24c02
  145.               DelayMs(10);
  146.                           num_display();
  147.              }
  148.          }
  149.      }

  151.         if(KEY3==0)                                                   //按鍵按下
  152.         {
  153.                 DelayMs(20);                                     //延時(shí)，去抖
  154.                 if(KEY3==0)    //                           //確認(rèn)按鍵按下
  155.                 {
  156.                  for(i=0;i<100;i++)             //此處消抖程序非常經(jīng)典，怎么按都絕對不會產(chǎn)生抖動(dòng)。
  157.             {
  158.                     if(KEY3==0)        i=0;
  159.              }
  160.                         Ds1302Init();                                          
  161.                         LcdDisplay(0x40);                                                        //第一行地址是0x00,第二行是0x40;       
  162.          }
  163.      }


  166.         if(KEY4==0)                                                   //按鍵按下
  167.         {
  168.                 DelayMs(20);                                     //延時(shí)，去抖
  169.                 if(KEY4==0)    //                           //確認(rèn)按鍵按下
  170.                 {
  171.                  for(i=0;i<100;i++)             //此處消抖程序非常經(jīng)典，怎么按都絕對不會產(chǎn)生抖動(dòng)。
  172.             {
  173.                     if(KEY4==0)i=0;
  174.             }
  175.                         Ds1302Init();                                          
  176.                         LcdDisplay(0x40);                                                        //第一行地址是0x00,第二行是0x40;       
  177.                         num=0;
  178.             ISendStr(0xa0,0,&num,1);  //寫入24c02
  179.                         num_display();
  180.          }
  181.      }
  182. }

  184. void num_display(void)                                                          //專門用來顯示num值的
  185. {
  186.         LcdDisplay(0x40);                                                        //第一行地址是0x00,第二行是0x40;       
  187.            LcdWriteCom(0xC0+13);                                                //移動(dòng)光標(biāo)指令，0x80是固定指令值，后面是移動(dòng)的絕對值
  188.         LcdWriteData(num/10%10+0x30);
  189.         LcdWriteData(num%10+0x30);                                        //+0x30就是把個(gè)位數(shù)值轉(zhuǎn)換成字符了
  190. }
  191. /*INT0中斷函數(shù) */
  192. void  counter0(void) interrupt 0                     //INT0 是四個(gè)按鍵接入74LS21四與門輸入，然后輸出口接入P3.2口
  193. {
  194.         EX0=0;                                                          //關(guān)閉中斷
  195.         KeyPressFlag=1;                                           //表明按鍵有動(dòng)作，可以進(jìn)行按鍵掃描
  196.           EX0=1;                                                                //再次打開中斷
  197. }

  199. /*------------------------------------------------
  200.                  定時(shí)器中斷子程序
  201. ------------------------------------------------*/
  202. void Timer0_isr(void) interrupt 1                                 //定時(shí)對液晶屏數(shù)值進(jìn)行更新
  203. {
  204.         TH0=(65536-12000)/256;                                                  //重新賦值 2ms
  205.         TL0=(65536-2000)%256;
  206.         LcdDisplay(0x00);                                                        //第一行地址是0x00,第二行是0x40;       
  207.         LcdWriteCom(0x80+11);                                                //移動(dòng)光標(biāo)指令，后面是移動(dòng)的絕對值
  208.         LcdWriteData(num%10+0x30);                                        //+0x30就是把個(gè)位數(shù)值轉(zhuǎn)換成字符了
  209. }
復(fù)制代碼

所有代碼51hei提供下載:
老年人用藥助記神器.rar (66.16 KB, 下載次數(shù): 22)

作者: admin    時(shí)間: 2019-9-6 20:08
本帖需要重新編輯補(bǔ)全電路原理圖,源碼,詳細(xì)說明與圖片即可獲得100+黑幣(帖子下方有編輯按鈕)
作者: taotie    時(shí)間: 2019-9-6 20:25
建議加提示音早中晚用藥數(shù)量~~~
作者: myhj    時(shí)間: 2019-9-6 21:09
taotie 發(fā)表于 2019-9-6 20:25
建議加提示音早中晚用藥數(shù)量~~~

好的。謝謝。



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1