设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › 12864时钟 图形温度计 ds1302 ds18b20 矩阵键盘仿真
返回列表 发新帖
查看: 4643|回复: 1
收起左侧

12864时钟 图形温度计 ds1302 ds18b20 矩阵键盘仿真

[复制链接]
ID:137190 发表于 2016-8-20 21:45 | 显示全部楼层 |阅读模式
不过按键反应比较慢点~！里面有一个图形温度计还有时钟可调等等！
我个人感觉很经典。
0.png

0.png
12864时钟 图形温度计的全部资料下载：
12864 图形温度计 ds1302 ds18b20 矩阵键盘.rar (81.58 KB, 下载次数: 137)


部分程序源码预览：
  1. //南阳理工学院
  2. //12864+图形温度计+ds1302+ds18b20+矩阵键盘
  3. //此程序如果要在硬件电路上实现要改一些地方！
  4. //不曾努力，就没有资格说失败！
  5. #include "ds18b20.h"
  6. #include "12864.h"
  7. #include "1302.h"
  8. #include "key.h"
  9. #include "zifu.h"
  10. bit flagg=0;
  11. uchar ip;
  12. main()
  13. {
  14.   uchar i;
  15.   systemtime realtime;
  16.   choose12864(2);
  17.   init12864();
  18.   clear12864();
  19.   play8(0,0,0,shu2);                 //屏，列，页，地址
  20.   play8(0,1,0,shu0);
  21.   play16(0,4,0,nian);
  22.   play16(1,0,0,yue);
  23.   play16(1,4,0,ri);
  24.   play16(0,2,1,shi);
  25.   play16(0,6,1,fen);
  26.   play16(1,2,1,miao);
  27.   
  28.   play16(1,0,2,xing);
  29.   play16(1,2,2,qi);
  30.   vertical(3,63,63);
  31.   vertical(3,63,62);
  32.   vertical(3,63,58);
  33.   vertical(3,63,57);
  34.   for(i=0;i<7;i++)
  35.   {
  36.     dot(57+i,3);
  37.         dot(57+i,63);
  38.   }
  39.   for(i=0;i<12;i++)
  40.   {
  41.     dot(59,8+5*i);
  42.   }
  43.   for(i=0;i<7;i++)
  44.   {
  45.     if(i<4)
  46.         {
  47.           play16(0,i*2,3,ming+i*32);
  48.         }
  49.         if(i>=4)
  50.         {
  51.           play16(1,(i-4)*2,3,ming+i*32);
  52.         }
  53.   }
  54.   init_ds1302();
  55.   init_time();
  56.   do
  57.   {
  58.      gettime(&realtime);
  59.          play8(0,2,0,(shu0+16*datastring[0]));
  60.          play8(0,3,0,(shu0+16*datastring[1]));
  61.          play8(0,6,0,(shu0+16*datastring[2]));
  62.          play8(0,7,0,(shu0+16*datastring[3]));
  63.          play8(1,2,0,(shu0+16*datastring[4]));
  64.          play8(1,3,0,(shu0+16*datastring[5]));
  65.          play8(0,0,1,(shu0+16*datastring[6]));
  66.          play8(0,1,1,(shu0+16*datastring[7]));
  67.          play8(0,4,1,(shu0+16*datastring[8]));
  68.          play8(0,5,1,(shu0+16*datastring[9]));
  69.          play8(1,0,1,(shu0+16*datastring[10]));
  70.          play8(1,1,1,(shu0+16*datastring[11]));
  71.          play16(1,4,2,(yi+32*(datastring[12]-1)));
  72.          gettemperature();
  73.          if(flag)
  74.          {
  75.            play8(0,0,2,fu);
  76.            play8(1,6,3,fu);
  77.          }
  78.          else
  79.           {
  80.             clear8(6,4,0);
  81.                 play8(1,6,3,zheng);
  82.           }
  83.          play8(0,4+flag,2,dian);
  84.      play8(0,5+flag,2,C);
  85.          play8(0,0+flag,2,(shu0+16*temp[0]));
  86.          play8(0,1+flag,2,(shu0+16*temp[1]));
  87.          play8(0,2+flag,2,xiao);
  88.          play8(0,3+flag,2,(shu0+16*temp[2]));
  89.          change();
  90.          keyscan();
  91.          switch(sum)
  92.          {
  93.           case 0:ip=ds1302_year;flagg=1;break;
  94.           case 1:ip=ds1302_month;flagg=1;break;
  95.           case 2:ip=ds1302_week;flagg=1;break;
  96.           case 3:ip=ds1302_day;flagg=1;break;
  97.           case 4:ip=ds1302_hour;flagg=1;break;
  98.           case 5:ip=ds1302_minute;flagg=1;break;
  99.           case 6:ip=ds1302_second;flag=1;break;
  100.           default:break;
  101.          }
  102.          if(flagg==1)
  103.          {
  104.            keyscan();
  105.            if(sum==7)
  106.            {
  107.              set(ip,1);
  108.                  sum=0xff;;
  109.            }
  110.            else if(sum==8)
  111.            {
  112.              set(ip,0);
  113.                  sum=0xff;
  114.            }
  115.          }
  116.   }
  117.   while(1);
  118. }
复制代码



温度计, 键盘, 经典

相关帖子
回复

使用道具 举报

ID:19315 发表于 2019-1-23 16:50 | 显示全部楼层
这个程序很有参考价值
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表