51單片機(jī)+TM1638驅(qū)動(dòng)數(shù)碼管測(cè)試程序

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

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

單片機(jī)源程序如下:

#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) //寫(xiě)數(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個(gè)字節(jié)數(shù)據(jù)合成一個(gè)字節(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) //指定地址寫(xiě)入數(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) //單獨(dú)控制一個(gè)LED函數(shù)，num為需要控制的led序號(hào)，flag為0時(shí)熄滅，不為0時(shí)點(diǎn)亮
{
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表示各個(gè)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級(jí)亮度可調(diào)
Write_COM(0x40); //采用地址自動(dòng)加1
STB=0; //
TM1638_Write(0xc0); //設(shè)置起始地址
for(i=0;i<16;i++) //傳送16個(gè)字節(jié)的數(shù)據(jù)
TM1638_Write(0x00);
STB=1;
}
#endif

復(fù)制代碼

#include <REGX51.H>
#include <tm1638.h>
unsigned char num[8]; //各個(gè)數(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);
}
}
}

復(fù)制代碼

所有資料51hei提供下載:

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

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

下載來(lái)學(xué)習(xí)一下

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

很好，可以直接用。

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

新手進(jìn)來(lái)學(xué)習(xí)下

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

新手進(jìn)來(lái)學(xué)習(xí)

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

寫(xiě)的還不錯(cuò)

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

新手過(guò)來(lái)學(xué)習(xí)一i下。感覺(jué)非常不錯(cuò)

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

下載測(cè)試很好用，謝謝分享

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

非常感謝,下載來(lái)試試看

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

這個(gè)不就是TM1638自帶的例程？！

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

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

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

模塊早買(mǎi)了，商家程序也給了，就是不會(huì)點(diǎn)

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

這個(gè)讀函數(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的單片機(jī)會(huì)有錯(cuò)誤，跑在12T單片機(jī)正常

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

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

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

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

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

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

不錯(cuò)，剛好手上有個(gè)這片子的表頭。

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

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

這兩個(gè)函數(shù)沒(méi)有用吧？

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

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

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

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

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

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

void Write_allLED(unsigned char LED_flag)                                     //控制全部LED函數(shù)，LED_flag表示各個(gè)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多全程，這個(gè)LED顯示都這么寫(xiě)的，總不會(huì)靈活應(yīng)用

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

void Write_allLED(u8 LED_flag) //控制全部LED函數(shù)，LED_flag表示各個(gè)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);
}
}

這里報(bào)下面的警告要怎么解決吶

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

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

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

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

51單片機(jī)+TM1638驅(qū)動(dòng)數(shù)碼管測(cè)試程序

評(píng)分