找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 14504|回复: 9
收起左侧

TM1638驱动数码管的arduino和51单片机源程序与电路图

  [复制链接]
ID:376624 发表于 2018-7-21 14:47 | 显示全部楼层 |阅读模式
TM1638数码管电路原理图如下:
0.png

单片机源程序如下:


  1. #include        <REGX51.H>
  2. #include        <tm1638.h>

  3. unsigned char num[8];                //各个数码管显示的值

  4. int main(void)
  5. {
  6.         unsigned char i;
  7.         init_TM1638();                                   //初始化TM1638
  8.         for(i=0;i<8;i++)
  9.         Write_DATA(i<<1,tab[0]);                       //初始化寄存器
  10.         
  11.         while(1)
  12.         {
  13.                 i=Read_key();                          //读按键值
  14.                 if(i<8)
  15.                 {
  16.                         num[i]++;
  17.                         while(Read_key()==i);                       //等待按键释放
  18.                         if(num[i]>15)
  19.                         num[i]=0;
  20.                         Write_DATA(i*2,tab[num[i]]);
  21.                         Write_allLED(1<<i);
  22.                 }
  23.         }
  24. }

复制代码

arduino源程序:
  1. #define        DATA_COMMAND        0X40
  2. #define        DISP_COMMAND        0x80
  3. #define        ADDR_COMMAND        0XC0

  4. //TM1638模块引脚定义
  5. int DIO = 2;
  6. int CLK = 1;
  7. int STB = 0; //这里定义了那三个脚
  8. //共阴数码管显示代码
  9. unsigned char tab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,
  10.                            0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71};
  11. unsigned char num[8];                //各个数码管显示的值                     
  12. void setup ()
  13. {
  14.   pinMode(STB,OUTPUT);
  15.   pinMode(CLK,OUTPUT);
  16.   pinMode(DIO,OUTPUT); //让三个脚都是输出状态
  17. }
  18. void loop()
  19.     {
  20.         unsigned char i;
  21.         init_TM1638();                                   //初始化TM1638
  22.         for(i=0;i<8;i++)
  23.         Write_DATA(i<<1,tab[0]);                       //初始化寄存器        
  24.         while(1)
  25.         {
  26.                 i=Read_key();                          //读按键值
  27.                 if(i<8)
  28.                 {
  29.                   num[i]++;
  30.                   while(i==Read_key());                       //等待按键释放
  31.                   if(num[i]>15)
  32.                   num[i]=0;
  33.                   Write_DATA(i*2,tab[num[i]]);
  34.                   Write_allLED(1<<i);
  35.                 }
  36.         }
  37. }



  38. void TM1638_Write(unsigned char        DATA)                        //写数据函数
  39. {
  40.         unsigned char i;
  41.         pinMode(DIO,OUTPUT);
  42.         for(i=0;i<8;i++)
  43.         {
  44.             digitalWrite(CLK,LOW);
  45.             if(DATA&0X01)
  46.                digitalWrite(DIO,HIGH);
  47.             else
  48.                digitalWrite(DIO,LOW);
  49.             DATA>>=1;
  50.             digitalWrite(CLK,HIGH);
  51.         }
  52. }
  53. unsigned char TM1638_Read(void)                                        //读数据函数
  54. {
  55.         unsigned char i;
  56.         unsigned char temp=0;;        
  57.         pinMode(DIO,INPUT);//设置为输入
  58.         for(i=0;i<8;i++)
  59.         {
  60.               temp>>=1;
  61.             digitalWrite(CLK,LOW);
  62.               if(digitalRead(DIO)==HIGH)
  63.                 temp|=0x80;
  64.             digitalWrite(CLK,HIGH);
  65.                
  66.         }
  67.         return temp;
  68. }
  69. void Write_COM(unsigned char cmd)                //发送命令字
  70. {
  71.         digitalWrite(STB,LOW);
  72.         TM1638_Write(cmd);
  73.         digitalWrite(STB,HIGH);
  74. }
  75. unsigned char Read_key(void)
  76. {
  77.         unsigned char c[4],i,key_value=0;
  78.         digitalWrite(STB,LOW);
  79.         TM1638_Write(0x42);                           //读键扫数据 命令
  80.         for(i=0;i<4;i++)               
  81.           {
  82.             c[i]=TM1638_Read();
  83.         }
  84.         digitalWrite(STB,HIGH);                                                   //4个字节数据合成一个字节
  85.         for(i=0;i<4;i++)
  86.         {
  87.             key_value|=c[i]<<i;
  88.         }        
  89.         for(i=0;i<8;i++)
  90.         {
  91.             if((0x01<<i)==key_value)
  92.             break;
  93.         }
  94.         return i;
  95. }
  96. void Write_DATA(unsigned char add,unsigned char DATA)                //指定地址写入数据
  97. {
  98.         Write_COM(0x44);
  99.         digitalWrite(STB,LOW);
  100.         TM1638_Write(0xc0|add);
  101.         TM1638_Write(DATA);
  102.         digitalWrite(STB,HIGH);
  103. }
  104. void Write_allLED(unsigned char LED_flag)                                        //控制全部LED函数,LED_flag表示各个LED状态
  105. {
  106.         unsigned char i;
  107.         for(i=0;i<8;i++)
  108.         {
  109.             if(LED_flag&(1<<i))
  110.               Write_DATA(2*i+1,1);
  111.             else
  112.               Write_DATA(2*i+1,0);
  113.         }
  114. }

  115. //TM1638初始化函数
  116. void init_TM1638(void)
  117. {
  118.         unsigned char i;
  119.         Write_COM(0x8b);       //亮度 (0x88-0x8f)8级亮度可调
  120.         Write_COM(0x40);       //采用地址自动加1
  121.         digitalWrite(STB,LOW);                           //
  122.         TM1638_Write(0xc0);    //设置起始地址
  123.         for(i=0;i<16;i++)           //传送16个字节的数据
  124.           TM1638_Write(0x00);
  125.         digitalWrite(STB,HIGH);
  126. }

复制代码


所有资料51hei提供下载:
TM1638 按键数码管LED显示模块(8位数码管LED按键) 显示模块.zip (961.32 KB, 下载次数: 199)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

ID:590938 发表于 2019-7-26 17:16 | 显示全部楼层
谢谢分享
回复

使用道具 举报

ID:590938 发表于 2019-7-26 17:17 | 显示全部楼层
谢谢分享。。
回复

使用道具 举报

ID:135361 发表于 2019-7-27 09:43 | 显示全部楼层
按键不行啊
回复

使用道具 举报

ID:198286 发表于 2019-7-30 12:20 | 显示全部楼层
我买模块好久了,正需要这程序
回复

使用道具 举报

ID:419332 发表于 2019-7-31 17:24 | 显示全部楼层
学习一下,谢谢分享。
回复

使用道具 举报

ID:91359 发表于 2019-8-21 19:31 | 显示全部楼层
天微的驱动芯片用的人比较多
回复

使用道具 举报

ID:111376 发表于 2019-9-19 08:43 | 显示全部楼层
感谢楼主的贡献!
回复

使用道具 举报

ID:61860 发表于 2020-1-20 16:05 | 显示全部楼层
非常感谢分享~~~~~~~~~~~~~~
回复

使用道具 举报

ID:27161 发表于 2024-4-15 17:07 | 显示全部楼层
谢谢分享,实测可用。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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