51單片機+TM1638驅(qū)動數(shù)碼管測試程序

ID:351504 · 發(fā)表于 2018-6-13 23:44

某寶上買的TM1638模塊測試程序根據(jù)數(shù)據(jù)手冊搞出來的
騎遠飛TM1638 按鍵數(shù)碼管模塊
電路原理圖如下：

單片機源程序如下:

#ifndef _TM1638_H
#define _TM1638_H
#include <REGX51.H>
#define DATA_COMMAND 0X40
#define DISP_COMMAND 0x80
#define ADDR_COMMAND 0XC0
//TM1638模塊引腳定義
sbit DIO=P1^0;
sbit CLK=P1^1;
sbit STB=P1^2;
//共陰數(shù)碼管顯示代碼
unsigned char code tab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,
0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71};
void TM1638_Write(unsigned char DATA) //寫數(shù)據(jù)函數(shù)
{
unsigned char i;
for(i=0;i<8;i++)
{
CLK=0;
if(DATA&0X01)
DIO=1;
else
DIO=0;
DATA>>=1;
CLK=1;
}
}
unsigned char TM1638_Read(void) //讀數(shù)據(jù)函數(shù)
{
unsigned char i;
unsigned char temp=0;
DIO=1; //設(shè)置為輸入
for(i=0;i<8;i++)
{
temp>>=1;
CLK=0;
if(DIO)
temp|=0x80;
CLK=1;
}
return temp;
}
void Write_COM(unsigned char cmd) //發(fā)送命令字
{
STB=0;
TM1638_Write(cmd);
STB=1;
}
unsigned char Read_key(void)
{
unsigned char c[4],i,key_value=0;
STB=0;
TM1638_Write(0x42); //讀鍵掃數(shù)據(jù) 命令
for(i=0;i<4;i++)
c[i]=TM1638_Read();
STB=1; //4個字節(jié)數(shù)據(jù)合成一個字節(jié)
for(i=0;i<4;i++)
key_value|=c[i]<<i;
for(i=0;i<8;i++)
if((0x01<<i)==key_value)
break;
return i;
}
void Write_DATA(unsigned char add,unsigned char DATA) //指定地址寫入數(shù)據(jù)
{
Write_COM(0x44);
STB=0;
TM1638_Write(0xc0|add);
TM1638_Write(DATA);
STB=1;
}
/*
void Write_oneLED(unsigned char num,unsigned char flag) //單獨控制一個LED函數(shù)，num為需要控制的led序號，flag為0時熄滅，不為0時點亮
{
if(flag)
Write_DATA(2*num+1,1);
else
Write_DATA(2*num+1,0);
} */
void Write_allLED(unsigned char LED_flag) //控制全部LED函數(shù)，LED_flag表示各個LED狀態(tài)
{
unsigned char i;
for(i=0;i<8;i++)
{
if(LED_flag&(1<<i))
//Write_DATA(2*i+1,3);
Write_DATA(2*i+1,1);
else
Write_DATA(2*i+1,0);
}
}
//TM1638初始化函數(shù)
void init_TM1638(void)
{
unsigned char i;
Write_COM(0x8b); //亮度 (0x88-0x8f)8級亮度可調(diào)
Write_COM(0x40); //采用地址自動加1
STB=0; //
TM1638_Write(0xc0); //設(shè)置起始地址
for(i=0;i<16;i++) //傳送16個字節(jié)的數(shù)據(jù)
TM1638_Write(0x00);
STB=1;
}
#endif

復制代碼

#include <REGX51.H>
#include <tm1638.h>
unsigned char num[8]; //各個數(shù)碼管顯示的值
int main(void)
{
unsigned char i;
init_TM1638(); //初始化TM1638
for(i=0;i<8;i++)
Write_DATA(i<<1,tab[0]); //初始化寄存器
while(1)
{
i=Read_key(); //讀按鍵值
if(i<8)
{
num[i]++;
while(Read_key()==i); //等待按鍵釋放
if(num[i]>15)
num[i]=0;
Write_DATA(i*2,tab[num[i]]);
Write_allLED(1<<i);
}
}
}

復制代碼

所有資料51hei提供下載:

TM1638 按鍵數(shù)碼管模塊.zip (802.45 KB, 下載次數(shù): 398)

ID:95542 · 發(fā)表于 2018-8-3 17:50

下載來學習一下

ID:583100 · 發(fā)表于 2019-7-17 20:19

很好，可以直接用。

ID:361722 · 發(fā)表于 2019-8-12 13:35

新手進來學習下

ID:361722 · 發(fā)表于 2019-8-12 13:35

新手進來學習

ID:383374 · 發(fā)表于 2019-8-14 08:27

寫的還不錯

ID:98880 · 發(fā)表于 2019-8-14 10:55

TM1638的代碼，我下載看下，

ID:410680 · 發(fā)表于 2020-1-31 23:34

好文章，正好需要

ID:148715 · 發(fā)表于 2020-2-1 11:21

新手過來學習一i下。感覺非常不錯

ID:410680 · 發(fā)表于 2020-2-1 12:38

下載測試很好用，謝謝分享

ID:398504 · 發(fā)表于 2020-2-28 00:15

非常感謝,下載來試試看

ID:462827 · 發(fā)表于 2020-2-28 10:01

這個不就是TM1638自帶的例程？！

ID:372579 · 發(fā)表于 2020-3-12 10:13

非常感謝，剛好再找呢，謝謝

ID:198286 · 發(fā)表于 2020-3-14 15:00

模塊早買了，商家程序也給了，就是不會點

ID:518869 · 發(fā)表于 2020-6-28 14:15

這個讀函數(shù) DIO=1設(shè)置為輸入，是啥意思呢?
unsigned char TM1638_Read(void)                                     //讀數(shù)據(jù)函數(shù)
{
      unsigned char i;
      unsigned char temp=0;
      DIO=1;       //設(shè)置為輸入
      for(i=0;i<8;i++)
      {
            temp>>=1;
            CLK=0;
            if(DIO)
                     temp|=0x80;
            CLK=1;
      }
      return temp;
}

ID:593106 · 發(fā)表于 2021-3-13 00:03

12MHZ晶振，跑在1T的單片機會有錯誤，跑在12T單片機正常

ID:593106 · 發(fā)表于 2021-3-13 00:06

lastreg 發(fā)表于 2020-6-28 14:15
這個讀函數(shù) DIO=1設(shè)置為輸入，是啥意思呢?
unsigned char TM1638_Read(void) ...

單片機把DIO拉高，就是說對應管腳是單片機內(nèi)部電阻在拉高，如果TM1638的DIO管腳輸出電平為低，單片機對應bit為0，反之是1

ID:5501 · 發(fā)表于 2021-4-14 23:39

51單片機IO 讀一般設(shè)置1 為輸入

ID:187802 · 發(fā)表于 2021-9-17 10:04

不錯，剛好手上有個這片子的表頭。

ID:42615 · 發(fā)表于 2022-5-6 10:07

Write_oneLED(unsigned char num,unsigned char flag)；
Write_allLED(unsigned char LED_flag) ；

這兩個函數(shù)沒有用吧？

ID:1011444 · 發(fā)表于 2022-5-8 21:25

資料很有用，已下載看過了，謝謝分享！

ID:884711 · 發(fā)表于 2022-8-6 13:51

zxy2266 發(fā)表于 2020-3-14 15:00
模塊早買了，商家程序也給了，就是不會點

俺也是，反復的都是一樣的全程，總是學到實際應用的技術(shù)，只想把每一個按鍵應用到各自的功能，LED發(fā)光管也能對應的顯示不同的IO口狀態(tài)。

ID:884711 · 發(fā)表于 2022-8-21 07:44

void Write_allLED(unsigned char LED_flag)                                     //控制全部LED函數(shù)，LED_flag表示各個LED狀態(tài)
{
      unsigned char i;
      for(i=0;i<8;i++)
            {
                     if(LED_flag&(1<<i))
                              //Write_DATA(2*i+1,3);
                              Write_DATA(2*i+1,1);
                     else
                              Write_DATA(2*i+1,0);
            }
}
看了N多全程，這個LED顯示都這么寫的，總不會靈活應用

ID:1081040 · 發(fā)表于 2023-8-1 20:37

void Write_allLED(u8 LED_flag) //控制全部LED函數(shù)，LED_flag表示各個LED狀態(tài)
{
u8 i;
for(i=0;i<8;i++)
{
if(LED_flag&(1<<i))
{
//Write_DATA(2*i+1,3);
Write_DATA(2*i+1,1);
}
else
Write_DATA(2*i+1,0);
}
}

這里報下面的警告要怎么解決吶

main.c(32): warning C188: 'parameter 1': value truncated

ID:433219 · 發(fā)表于 2023-8-3 19:37

1638 驅(qū)動10個數(shù)碼管+3x8個按鍵，最優(yōu)綜合ic

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

51單片機+TM1638驅(qū)動數(shù)碼管測試程序

評分