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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机DIY制作 › 基于STC12C5604AD+TM1640+DS3231数码管时钟程序
返回列表 发新帖
查看: 2641|回复: 3
收起左侧

基于STC12C5604AD+TM1640+DS3231数码管时钟程序

[复制链接]
ID:39072 发表于 2022-3-24 10:13 | 显示全部楼层 |阅读模式
IMG_20220324_101047.jpg

单片机源程序如下:
  1. #include<reg52.h>
  2. #include<intrins.h>

  4. #define uchar unsigned char
  5. #define uint  unsigned int
  6. #define u8  uint8_t
  7. #define u16 uint16_t
  8. #define u32 uint32_t
  9. typedef unsigned char    uint8_t;
  10. typedef unsigned short   uint16_t;
  11. typedef unsigned long    uint32_t;
  12. #define DS3231_WriteAddress                0xD0   
  13. #define DS3231_ReadAddress                0xD1
  14. #define Delay(us) {_nop_();_nop_();_nop_();_nop_();}
  15. typedef struct
  16. {
  17.         u8        hour;
  18.         u8        min;
  19.         u8        sec;                       
  20.         u32 w_year;
  21.         u8  w_month;
  22.         u8  w_date;
  23.         u8  week;               
  24.         u8        temper_H;
  25.         u8        temper_L;
  26. }Calendar_OBJ;
  27. extern Calendar_OBJ calendar;        //日历结构体
  28. extern u8 const mon_table[12];        //月份日期数据表
  29. //*******GPIO 定义********************************************************
  30. sbit TM1640_DIN=P1^3; //TM1640数据线
  31. sbit TM1640_SCLK=P1^4; //TM1640时钟线
  32. sbit SDA=P3^3; //IIC数据线
  33. sbit SCL=P3^4; //IIC时钟线
  34. sbit SDA_read=P3^3;
  35. sbit SCL_read=P3^4;
  36. //************************************************************************************************
  37. #define TM1640MEDO_ADD  0x44         //地址模式的设置0x40自动加一模式 0x44固定地址模式
  38. #define TM1640MEDO_DISPLAY  0x8C     //设置亮度小：0x88 0x89 0x8a 0x8b 0x8c 0x8d 0x8f最大0x80关闭
  39. #define TM1640MEDO_DISPLAY_OFF  0x80  //宏定义 关亮度设置
  40. //**************************************************************************************************
  41. //功能:延时1毫秒 ,入口参数:x  ,说明:当晶振为12M时，j<112；当晶振为11.0592M时，j<122*/
  42. //***************************************************************************************************
  43. void Delay_xms(uint x)
  44. {
  45.   uint i,j;
  46.   for(i=0;i<x;i++)
  47.     for(j=0;j<112;j++);
  48. }
  49. //功能：12us延时,STC89C52为1T单片机,即1个时钟/机器周期,速度为AT89C52的12倍
  50. void Delay_us(uint t)                                          
  51. {
  52.   for(;t>0;t--)
  53.    {
  54.          _nop_();
  55.    }
  56. }

  58. //*********TM1640驱动函数  START***************
  59. //功能：12us延时
  60. //***************************************************************************************
  61. //通信时序 启始
  62. void TM1640_start()
  63.         {
  64.         TM1640_DIN=1;
  65.         TM1640_SCLK=1;
  66.         Delay_us(1);
  67.         TM1640_DIN=0;
  68.         Delay_us(1);
  69.         TM1640_SCLK=0;
  70.         Delay_us(1);
  71. }
  72. //通信时序 结束       
  73. void TM1640_stop()
  74.         {
  75.         TM1640_DIN=0;
  76.         TM1640_SCLK=1;
  77.         Delay_us(1);
  78.         TM1640_DIN=1;
  79.         Delay_us(1);
  80. }
  81. //写数据       
  82. void TM1640_write(u8 date)
  83.         {       
  84.         u8 i;
  85.         u8 aa;
  86.         aa=date;
  87.         TM1640_DIN=0;
  88.         TM1640_SCLK=0;
  89.         for(i=0;i<8;i++){
  90.                 TM1640_SCLK=0;
  91.                 Delay_us(1);
  92.                 if(aa&0x01){
  93.                         TM1640_DIN=1;
  94.                         Delay_us(1);
  95.                 }else{
  96.                         TM1640_DIN=0;
  97.                         Delay_us(1);
  98.                 }
  99.                 TM1640_SCLK=1;
  100.                 Delay_us(1);
  101.                 aa=aa>>1;
  102.    }
  103.          TM1640_DIN=0;
  104.          TM1640_SCLK=0;
  105. }
  106. //TM1640接口初始化函数//TM1640设置
  107. void TM1640_Init(void)
  108.         {   
  109.           TM1640_start();
  110.           TM1640_write(TM1640MEDO_ADD); //设置工作模式
  111.           TM1640_stop();
  112.           TM1640_start();
  113.           TM1640_write(TM1640MEDO_DISPLAY);//设置显示亮度
  114.           TM1640_stop();                                       
  115. }
  116. //固定地址模式的显示输出函数
  117. void TM1640_display(u8 address,u8 date)
  118.         {
  119.         const u8 buff[12]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40,0x00};//数字0~9及”-“”无”显示段码表
  120.                  //--   0    1    2    3    4    5    6    7    8    9     -   无   
  121.    TM1640_start();
  122.    TM1640_write(0xc0+address);             //传显示数据对应的地址,0-15位数码管
  123.    TM1640_write(buff[date]);                                 //传1BYTE显示数据,对应显示buff[12]数组0-11
  124.    TM1640_stop();
  125. }
  126. //**************************************tm1640函数*end***********************************
  127.   
  128. /**************************************IIC函数************************************  
  129. * 函数名: void I2C_delay(void)
  130. * 描述  : 短暂延时
  131. * 说明  : 内部定义的i可以优化速度，经测试最低到5还能写入
  132. ***************************************************************************/
  133. /*
  134. static void I2C_delay(void)  
  135. {     
  136.     u8 i=5;   
  137.     while(i)   
  138.     {   
  139.         i--;   
  140.     }   
  141. }
  142. */

  144. /**************************************************************************
  145. * 函数名: void I2C_Start(void)
  146. * 描述  : 起始信号
  147. ***************************************************************************/
  148. void I2C_Start(void)
  149. {
  150.         SCL=1;        Delay_us(5);
  151.         SDA=1;        Delay_us(5);
  152.         SDA=0;        Delay_us(5);
  153.         SCL=0;        Delay_us(5);
  154. }
  155. /**************************************************************************
  156. * 函数名: I2C_Stop(void)
  157. * 描述  : 终止信号
  158. ***************************************************************************/
  159. void I2C_Stop(void)
  160. {
  161.         SDA=0;        Delay_us(5);
  162.         SCL=1;        Delay_us(5);
  163.         SDA=1;        Delay_us(5);
  164. }
  165. /**************************************************************************
  166. * 函数名: void I2C_Ack(void)
  167. * 描述  : 应答信号
  168. ***************************************************************************/
  169. void I2C_Ack(void)  
  170. {     
  171.     SCL=0;  Delay_us(5);
  172.     SDA=0;  Delay_us(5);  
  173.     SCL=1;  Delay_us(5);
  174.     SCL=0;  Delay_us(5);
  175. }
  176. /**************************************************************************
  177. * 函数名: void I2C_NoAck(void)
  178. * 描述  : 无应答信号
  179. ***************************************************************************/
  180. void I2C_NoAck(void)  
  181. {     
  182.     SCL=0;  Delay_us(5);  
  183.     SDA=1;  Delay_us(5);  
  184.     SCL=1;  Delay_us(5);  
  185.     SCL=0;  Delay_us(5);
  186. }  
  187. /**************************************************************************
  188. * 函数名: u8 I2C_WaitAck(void)
  189. * 描述  : 等待应答信号
  190. * 输出  : TRUE : 有应答  FALSE : 无应答
  191. ***************************************************************************/
  192. u8 I2C_WaitAck(void)     
  193. {  
  194.         u8 ucErrTime=0;
  195.     SCL=0;  Delay_us(5);
  196.     SDA=1;  Delay_us(5);  
  197.     SCL=1;  Delay_us(5);  
  198.     while(SDA_read)  
  199.     {  
  200.         ucErrTime++;
  201.                 if(ucErrTime>250)
  202.                 {
  203.                         I2C_Stop();
  204.                         return 0;
  205.                 }
  206.     }  
  207.     SCL=0;  
  208.     return 1;  
  209. }  
  210. /**************************************************************************  
  211. * 函数名: void I2C_SendByte(u8 SendByte)  
  212. * 描述  : 发送一个字节
  213. * 输入  : SendByte : 字节数据 ,说明 : 数据从高位到低位
  214. ***************************************************************************/
  215. void I2C_SendByte(u8 SendByte)   
  216. {  
  217.     u8 i=8;  
  218.     while(i--)  
  219.     {  
  220.         SCL=0;  
  221.         Delay_us(5);
  222.                
  223.         if(SendByte & 0x80)  
  224.             SDA=1;   
  225.         else  
  226.             SDA=0;     
  227.         SendByte<<=1;  
  228.         Delay_us(5);
  229.                
  230.         SCL=1;  
  231.         Delay_us(3);  
  232.     }  
  233.     SCL=0;  
  234. }
  235. /**************************************************************************
  236. * 函数名: u8 I2C_ReceiveByte(void)  
  237. * 描述  : 读取一个字节
  238. * 输出  : 字节数据
  239. * 说明  : ReceiveByte : 数据从高位到低位
  240. ***************************************************************************/
  241. u8 I2C_ReceiveByte(void)   
  242. {   
  243.     u8 i=8;  
  244.     u8 ReceiveByte=0;  
  245.            
  246.     SDA=1;               
  247.     while(i--)  
  248.     {  
  249.         ReceiveByte<<=1;        
  250.         SCL=0;  
  251.         Delay_us(5);
  252.         SCL=1;
  253.         Delay_us(5);     
  254.         if(SDA_read)  
  255.         {  
  256.             ReceiveByte|=0x01;  
  257.         }  
  258.     }  
  259.     SCL=0;  
  260.     return ReceiveByte;  
  261. }
  262. //**************************IIC END*****************************************************************

  264. //****************ds3231函数*******************************************************************
  265. Calendar_OBJ calendar;
  266. //bcd转hex
  267. u8 BCD2HEX(u8 val)
  268. {
  269.     u8 i;
  270.     i= val&0x0f;
  271.     val >>= 4;
  272.     val &= 0x0f;
  273.     val *= 10;
  274.     i += val;
  275.    
  276.     return i;
  277. }

  279. u16 B_BCD(u8 val)
  280. {
  281.         u8 i,j,k;
  282.         i=val/10;
  283.         j=val%10;
  284.         k=j+(i<<4);
  285.         return k;
  286. }

  288. void DS3231_WR_Byte(u8 addr,u8 bytedata)
  289. {
  290.         I2C_Start();
  291.         I2C_SendByte(DS3231_WriteAddress);
  292.         I2C_WaitAck();
  293.         I2C_SendByte(addr);
  294.         I2C_WaitAck();
  295.         I2C_SendByte(bytedata);
  296.         I2C_WaitAck();
  297.         I2C_Stop();
  298. }       

  300. u8 DS3231_RD_Byte(u8 addr)
  301. {
  302.         u8 Dat=0;
  303.           I2C_Start();
  304.         I2C_SendByte(DS3231_WriteAddress);
  305.         I2C_WaitAck();
  306.         I2C_SendByte(addr);
  307.         I2C_WaitAck();
  308.         I2C_Start();
  309.         I2C_SendByte(DS3231_ReadAddress);
  310.         I2C_WaitAck();
  311.         Dat=I2C_ReceiveByte();
  312.         I2C_Stop();
  313.         return Dat;
  314. }
  315. //ds3231初始化函数
  316. void DS3231_Init(void)
  317. {
  318.         //I2C_GPIO_Config();
  319.         DS3231_WR_Byte(0x0e,0);
  320.     DS3231_WR_Byte(0x0f,0x0);
  321. }

  323. //DS3231初始化设置函数（ 年 月 日 时 分 秒 周）
  324. void Set_DS3231_Time(u8 yea,u8 mon,u8 da,u8 hou,u8 min,u8 sec,u8 week)
  325. {
  326.         u8 temp=0;
  327.           temp=B_BCD(yea);
  328.         DS3231_WR_Byte(0x06,temp);  
  329.         temp=B_BCD(mon);
  330.         DS3231_WR_Byte(0x05,temp);  
  331.         temp=B_BCD(da);
  332.         DS3231_WR_Byte(0x04,temp);
  333.         temp=B_BCD(hou);
  334.         DS3231_WR_Byte(0x02,temp);
  335.         temp=B_BCD(min);
  336.         DS3231_WR_Byte(0x01,temp);  
  337.         temp=B_BCD(sec);
  338.         DS3231_WR_Byte(0x00,temp);
  339.         temp=B_BCD(week);
  340.         DS3231_WR_Byte(0x03,temp);
  341. }
  342. void Get_DS3231_Time(void)
  343. {
  344.         calendar.w_year=DS3231_RD_Byte(0x06);  
  345.         calendar.w_year=BCD2HEX(calendar.w_year);
  346.         calendar.w_month=DS3231_RD_Byte(0x05);
  347.         calendar.w_month=BCD2HEX(calendar.w_month);
  348.         calendar.w_date=DS3231_RD_Byte(0x04);  
  349.         calendar.w_date=BCD2HEX(calendar.w_date);
  350.          
  351.         calendar.hour=DS3231_RD_Byte(0x02);
  352.         calendar.hour&=0x3f;                  
  353.         calendar.hour=BCD2HEX(calendar.hour);
  354.         calendar.min=DS3231_RD_Byte(0x01);
  355.         calendar.min=BCD2HEX(calendar.min);
  356.         calendar.sec=DS3231_RD_Byte(0x00);
  357.         calendar.sec=BCD2HEX(calendar.sec);

  359.         calendar.week=DS3231_RD_Byte(0x03);
  360.         calendar.week=BCD2HEX(calendar.week);       
  361.         DS3231_WR_Byte(0x0e,0x20);
  362.         calendar.temper_H=DS3231_RD_Byte(0x11);
  363.         calendar.temper_L=(DS3231_RD_Byte(0x12)>>6)*25;
  364. }
  365. //****************ds3231函数*********end*******************************************************************

  367. int main(void)
  368. {       
  369.        
  370.     //Set_DS3231_Time(22,03,24,09,53,00,4);//22年03月23号17点55分00秒周3 .第1次初始化DS3231使用后注销  
  371.         Delay_us(100);
  372.         DS3231_Init();
  373.         TM1640_Init(); //TM1640初始化       
  374.         while(1)
  375.         {
  376.                 Get_DS3231_Time();
  377.                 {                       
  378.                         TM1640_display(0,calendar.hour/10);        //第1个数码管显示时十位
  379.                         TM1640_display(1,calendar.hour%10);        //第2个数码管显示时个位
  380.                         TM1640_display(2,10); //此位数码管显示"-"
  381.                         TM1640_display(3,calendar.min/10);  //第4个数码管显示分十位                               
  382.                         TM1640_display(4,calendar.min%10);  //第5个数码管显示分个位
  383.                         TM1640_display(5,10); //此位数码管显示"-"
  384.                         TM1640_display(6,calendar.sec/10);        //第7个数码管显示秒十位
  385.                         TM1640_display(7,calendar.sec%10);  //第8个数码管显示秒个位       
  386.                 }
  387.         }
  388. }       
复制代码
51hei.png
Keil代码下载: Keil代码.7z (21.58 KB, 下载次数: 80)

评分

参与人数 1黑币 +50 收起 理由
admin + 50

查看全部评分

回复

使用道具 举报

ID:334781 发表于 2022-12-19 14:02 | 显示全部楼层
TM1640这款芯片，用着还可以，用STC单片机驱动的程序是我想要的，谢谢楼主
回复

使用道具 举报

ID:894868 发表于 2023-2-10 15:36 | 显示全部楼层
我都是为了学习一下驱动显示而来··谢谢分享··
回复

使用道具 举报

ID:1112603 发表于 2024-4-16 08:18 | 显示全部楼层
51单片机TM1640驱动数码管，正是我需要的，谢谢！
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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