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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › TM1638模块源单片机程序
返回列表 发新帖
查看: 3785|回复: 1
打印 上一主题 下一主题
收起左侧

TM1638模块源单片机程序

[复制链接]
跳转到指定楼层
楼主
ID:581686 发表于 2019-7-30 22:15 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
TM1638 驱动数码管显示模块

单片机源程序如下:

  2. #include "TM1638.h"

  4. int LED_Buff[8];

  6. void TM1638_writeByte(unsigned char Num)                                //写入数据函数
  7. {
  8.         int i;
  9.         for (i = 0; i < 8; i++)
  10.         {
  11.                 CLK = 0;
  12.                 if(Num & (0x01))
  13.                         DIO = 1;
  14.                 else
  15.                         DIO = 0;
  16.                 CLK = 1;
  17.           Num >>= 1;
  18.         }
  19. }

  21. void TM1638_write_CMD(unsigned char cmd)   //发送控制命令函数
  22. {
  23.         STB = 1;
  24.         STB = 0;
  25.         TM1638_writeByte(cmd);                                       
  26. }



  30. //用于LED显示亮度，开关控制
  31. void TM1638_Disp_Ctl(unsigned char DispCtl)
  32. {
  33.         STB = 0;
  34.         DispCtl |= 0x80;
  35.        
  36.         TM1638_writeByte(DispCtl);
  37.          
  38.         STB = 1;
  39. }


  42. //把buffer里的数据送到TM1638的显示寄存器里面
  43. void TM1638_Refresh()
  44. {
  45.         int i;
  46.         STB = 0;
  47.         TM1638_writeByte(0x40); //设置数据命令
  48.         STB = 1;
  49.         STB = 0;
  50.         TM1638_writeByte(0xC0); //设置显示地址
  51.        
  52.         for(i=0;i<8;i++)
  53.         {
  54.                 switch(LED_Buff[i])
  55.                 {
  56.                         case 0 : TM1638_WriteData(0x00,0x00);break;
  57.                         case 1 : TM1638_WriteData(0x06,0x00);break;
  58.                         case 2 : TM1638_WriteData(0x5b,0x00);break;
  59.                         case 3 : TM1638_WriteData(0x4f,0x00);break;
  60.                         case 4 : TM1638_WriteData(0x66,0x00);break;
  61.                         case 5 : TM1638_WriteData(0x6d,0x00);break;
  62.                         case 6 : TM1638_WriteData(0x7d,0x00);break;
  63.                         case 7 : TM1638_WriteData(0x07,0x00);break;
  64.                         case 8 : TM1638_WriteData(0x7f,0x00);break;
  65.                         case 9 : TM1638_WriteData(0x5f,0x00);break;
  66.                 }
  67.                
  68.         //        TM1638_writeByte(LED_Buff[i]);
  69.         }
  70.        
  71.         STB = 1;
  72.        
  73.         //TM1638_Disp_Ctl( TM1638_DSP_LIGHT07 | TM1638_DSP_ON  );
  74.        
  75. }

  77. void LED_disp(unsigned int num)
  78. {
  79. //        unsigned int num = A / 1000;
  80. //        unsigned int B = A - num*1000;
  81. //        LED_Buff[7] = B % 10;
  82. //        LED_Buff[6] = B / 10 % 10;
  83. //        LED_Buff[5] = B / 100 % 10;
  84.         LED_Buff[4] = num % 10;
  85.         LED_Buff[3] = num / 10 % 10;
  86.         LED_Buff[2] = num / 100 % 10;
  87.         LED_Buff[1] = num / 1000 % 10;
  88.         LED_Buff[0] = num / 10000 % 10;
  89.         TM1638_Refresh();
  90. }

  92. void TM1638_WriteData(unsigned char num1,unsigned char num2)
  93. {
  94.         TM1638_writeByte(num1);
  95.         TM1638_writeByte(num2);
  96. }
复制代码

所有资料51hei提供下载:
TM1638.zip (80.49 KB, 下载次数: 66)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:1 发表于 2019-7-30 23:29 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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