51單片機+TM1638驅動數碼管測試程序

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




單片機源程序如下:

1. #ifndef        _TM1638_H
   
2. #define        _TM1638_H
   
3. 
   
4. #include        <REGX51.H>
   
5. 
   
6. #define        DATA_COMMAND        0X40
   
7. #define        DISP_COMMAND        0x80
   
8. #define        ADDR_COMMAND        0XC0
   
9. 
   
10. //TM1638模塊引腳定義
    
11. sbit        DIO=P1^0;
    
12. sbit        CLK=P1^1;
    
13. sbit        STB=P1^2;
    
14. 
    
15. //共陰數碼管顯示代碼
    
16. unsigned char code tab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,
    
17.                            0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71};
    
18. 
    
19. 
    
20. void TM1638_Write(unsigned char        DATA)                        //寫數據函數
    
21. {
    
22.         unsigned char i;
    
23.         for(i=0;i<8;i++)
    
24.         {
    
25.                 CLK=0;
    
26.                 if(DATA&0X01)
    
27.                         DIO=1;
    
28.                 else
    
29.                         DIO=0;
    
30.                 DATA>>=1;
    
31.                 CLK=1;
    
32.         }
    
33. }
    
34. unsigned char TM1638_Read(void)                                        //讀數據函數
    
35. {
    
36.         unsigned char i;
    
37.         unsigned char temp=0;
    
38.         DIO=1;        //設置為輸入
    
39.         for(i=0;i<8;i++)
    
40.         {
    
41.                 temp>>=1;
    
42.                 CLK=0;
    
43.                 if(DIO)
    
44.                         temp|=0x80;
    
45.                 CLK=1;
    
46.         }
    
47.         return temp;
    
48. }
    
49. void Write_COM(unsigned char cmd)                //發送命令字
    
50. {
    
51.         STB=0;
    
52.         TM1638_Write(cmd);
    
53.         STB=1;
    
54. }
    
55. unsigned char Read_key(void)
    
56. {
    
57.         unsigned char c[4],i,key_value=0;
    
58.         STB=0;
    
59.         TM1638_Write(0x42);                           //讀鍵掃數據 命令
    
60.         for(i=0;i<4;i++)               
    
61.                 c[i]=TM1638_Read();
    
62.         STB=1;                                                   //4個字節數據合成一個字節
    
63.         for(i=0;i<4;i++)
    
64.                 key_value|=c[i]<<i;
    
65.         for(i=0;i<8;i++)
    
66.                 if((0x01<<i)==key_value)
    
67.                         break;
    
68.         return i;
    
69. }
    
70. void Write_DATA(unsigned char add,unsigned char DATA)                //指定地址寫入數據
    
71. {
    
72.         Write_COM(0x44);
    
73.         STB=0;
    
74.         TM1638_Write(0xc0|add);
    
75.         TM1638_Write(DATA);
    
76.         STB=1;
    
77. }
    
78. /*
    
79. void Write_oneLED(unsigned char num,unsigned char flag)        //單獨控制一個LED函數，num為需要控制的led序號，flag為0時熄滅，不為0時點亮
    
80. {
    
81.         if(flag)
    
82.                 Write_DATA(2*num+1,1);
    
83.         else
    
84.                 Write_DATA(2*num+1,0);
    
85. }          */
    
86. void Write_allLED(unsigned char LED_flag)                                        //控制全部LED函數，LED_flag表示各個LED狀態
    
87. {
    
88.         unsigned char i;
    
89.         for(i=0;i<8;i++)
    
90.                 {
    
91.                         if(LED_flag&(1<<i))
    
92.                                 //Write_DATA(2*i+1,3);
    
93.                                 Write_DATA(2*i+1,1);
    
94.                         else
    
95.                                 Write_DATA(2*i+1,0);
    
96.                 }
    
97. }
    
98. 
    
99. //TM1638初始化函數
    
100. void init_TM1638(void)
     
101. {
     
102.         unsigned char i;
     
103.         Write_COM(0x8b);       //亮度 (0x88-0x8f)8級亮度可調
     
104.         Write_COM(0x40);       //采用地址自動加1
     
105.         STB=0;                           //
     
106.         TM1638_Write(0xc0);    //設置起始地址
     
107. 
     
108.         for(i=0;i<16;i++)           //傳送16個字節的數據
     
109.                 TM1638_Write(0x00);
     
110.         STB=1;
     
111. }
     
112. #endif
     

復制代碼

1. #include        <REGX51.H>
   
2. #include        <tm1638.h>
   
3. 
   
4. unsigned char num[8];                //各個數碼管顯示的值
   
5. 
   
6. int main(void)
   
7. {
   
8.         unsigned char i;
   
9.         init_TM1638();                                   //初始化TM1638
   
10.         for(i=0;i<8;i++)
    
11.         Write_DATA(i<<1,tab[0]);                       //初始化寄存器
    
12.         
    
13.         while(1)
    
14.         {
    
15.                 i=Read_key();                          //讀按鍵值
    
16.                 if(i<8)
    
17.                 {
    
18.                         num[i]++;
    
19.                         while(Read_key()==i);                       //等待按鍵釋放
    
20.                         if(num[i]>15)
    
21.                         num[i]=0;
    
22.                         Write_DATA(i*2,tab[num[i]]);
    
23.                         Write_allLED(1<<i);
    
24.                 }
    
25.         }
    
26. }
    
27. 
    

復制代碼

所有資料51hei提供下載:
TM1638 按鍵數碼管模塊.zip (802.45 KB, 下載次數: 398)

2018-6-13 23:40 上傳

點擊文件名下載附件
STM8 TM1638測試程序stm8
下載積分: 黑幣 -5

下載來學習一下

很好，可以直接用。

新手進來學習下

新手進來學習

寫的還不錯

TM1638的代碼，我下載看下，

好文章，正好需要

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

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

非常感謝,下載來試試看

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

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

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

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

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

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

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

51單片機IO 讀 一般設置1 為輸入

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

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

這兩個函數沒有用吧？

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

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

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

void Write_allLED(unsigned char LED_flag)                                        //控制全部LED函數，LED_flag表示各個LED狀態
{
        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顯示都這么寫的，總不會靈活應用

void Write_allLED(u8 LED_flag)                                        //控制全部LED函數，LED_flag表示各個LED狀態
{
        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

1638 驅動10個數碼管+3x8個按鍵，最優綜合ic