標(biāo)題: STC89C52單片機+老王4位數(shù)碼管AIP1637程序分享 [打印本頁]
作者: onc2001    時間: 2023-6-16 14:08
標(biāo)題: STC89C52單片機+老王4位數(shù)碼管AIP1637程序分享
制作出來的實物效果圖如下：



話不多說，上單片機代碼
//主函數(shù)
  1. #include <intrins.h>
  2. #include <TM1637.H>


  5. void main()
  6. {
  7.    
  8.   TM1637_init();
  9.         TM1637_show_digit(0, 1, 0);
  10.         TM1637_show_digit(1, 2, 1);
  11.         TM1637_show_digit(2, 3, 0);
  12.   TM1637_show_digit(3, 4, 0);
  13.         
  14.     while(1)
  15.     {
  16.                

  18.     }

  20. }
復(fù)制代碼
1637.c
  1. #include <TM1637.H>



  5. code unsigned char TM1637_SEG_TAB[] =
  6. {
  7.      0x3F // 00111111 0
  8.     ,0x06 // 00000110 1
  9.     ,0x5B // 01011011 2
  10.     ,0x4F // 01001111 3
  11.     ,0x66 // 01100110 4
  12.     ,0x6d // 01101101 5
  13.     ,0x7d // 01111101 6
  14.     ,0x07 // 00000111 7
  15.     ,0x7F // 01111111 8
  16.     ,0x6F // 01101111 9
  17.     ,0x77 // 01110111 A
  18.     ,0x7C // 01111100 b
  19.     ,0x39 // 00111001 C
  20.     ,0x5E // 01011110 d
  21.     ,0x79 // 01111001 E
  22.     ,0x71 // 01110001 F
  23. };



  27. void I2C_delay()
  28. {
  29.     nop_();
  30. }


  33. void I2C_start()
  34. {   
  35.     I2C_SCL = 1;
  36.     I2C_SDA = 1;


  39.     I2C_delay();


  42.     I2C_SDA = 0; // 時鐘線設(shè)置為常態(tài)，低電平。
  43. }


  46. /*
  47. I2C 總線寫1個字節(jié)
  48. 不包含應(yīng)答位的檢測
  49. */
  50. void I2C_write_byte(char byte_to_write)
  51. {
  52.     unsigned char i;


  55.     for(i=0; i<8; i++)
  56.     {
  57.         I2C_SCL = 0;

  59.         I2C_SDA = byte_to_write & 0x01;
  60.         I2C_delay();

  62.         I2C_SCL = 1;
  63.         I2C_delay();


  66.         I2C_SCL = 0;
  67.         I2C_delay();


  70.         byte_to_write >>= 1;
  71.     }

  73.     return;
  74. }


  77. void I2C_check_ack()
  78. {
  79.     // I2C 檢查應(yīng)答位，實際未檢查，只發(fā)送了應(yīng)答位時鐘，認(rèn)為TM1637工作正常


  82.     I2C_SCL = 0;
  83.     I2C_delay();//在第八個時鐘下降沿之后延時5us，開始判斷ACK 信號

  85.     while(I2C_SDA)
  86.     {
  87.         ;
  88.     }


  91.     I2C_SCL = 1;
  92.     I2C_delay();


  95.     I2C_SCL=0;
  96. }


  99. void I2C_send_ack()
  100. {
  101.     I2C_SDA = 0;
  102.     I2C_delay();


  105.     I2C_SCL = 1;
  106.     I2C_delay();


  109.     I2C_SCL = 0;
  110.     I2C_delay();


  113.     I2C_SDA = 1;
  114.     I2C_delay();
  115. }


  118. void I2C_stop()
  119. {
  120.     I2C_SCL = 0;
  121.     I2C_delay();


  124.     I2C_SDA = 0;
  125.     I2C_delay();


  128.     I2C_SCL = 1;
  129.     I2C_delay();


  132.     I2C_SDA = 1;
  133. }


  136. ///
  137. //
  138. // TM1637模塊操作函數(shù)
  139. //
  140. //


  143. void TM1637_write_command_byte(unsigned char command)
  144. {
  145.     I2C_start();
  146.     I2C_write_byte(command);
  147.     I2C_check_ack();
  148.     I2C_stop();
  149. }




  154. // bright : 0 - 7
  155. void TM1637_display_switch_and_bright(bit enable_display, unsigned char bright)
  156. {
  157.     TM1637_write_command_byte(0x80 + (enable_display ? 0x08 : 0x00) + bright);
  158. }




  163. void TM1637_write_display_bytes(unsigned char first_addr,
  164.                                 unsigned char bytes_to_write[],
  165.                                 unsigned char num_of_bytes)
  166. {
  167.     unsigned char i;


  170.     I2C_start();
  171.     I2C_write_byte(0x40);
  172.     I2C_check_ack();
  173.     I2C_stop();


  176.     I2C_start();
  177.     I2C_write_byte(0xC0 + first_addr);
  178.     I2C_check_ack();


  181.     for(i=0; i<num_of_bytes; i++)
  182.     {
  183.         I2C_write_byte(bytes_to_write[i]);
  184.         I2C_check_ack();
  185.     }


  188.     I2C_stop();
  189. }



  193. /**
  194.    * @brief  顯示數(shù)據(jù)
  195.    * @param  地址值  addr: 0 - 5
  196.    * @param  數(shù)據(jù)                  
  197.    * @param
  198.    * @retval None
  199.    */   
  200. void TM1637_write_display_byte(unsigned char addr, unsigned char segments)
  201. {
  202.     I2C_start();
  203.     I2C_write_byte(0x40 + addr);
  204.     I2C_check_ack();
  205.     I2C_stop();


  208.     I2C_start();
  209.     I2C_write_byte(0xC0 + addr);
  210.     I2C_check_ack();


  213.     I2C_write_byte(segments);
  214.     I2C_check_ack();


  217.     I2C_stop();
  218. }







  226. void TM1637_show_digit(unsigned char pos, unsigned char digit, bit with_dot)
  227. {
  228.     TM1637_write_display_byte(pos, TM1637_SEG_TAB[digit] | (with_dot ? 0x80 : 0x00));
  229. }




  234. void TM1637_init()
  235. {
  236.     unsigned char i;


  239.     TM1637_display_switch_and_bright(1, TM1637_BRIGHTNESS);


  242.     for(i=0; i<6; i++)
  243.     {
  244.         TM1637_write_display_byte(i, 0xFF);
  245.     }

  247.     for(i=0; i<6; i++)
  248.     {
  249.         TM1637_write_display_byte(i, 0x00);
  250.     }



  254. }
復(fù)制代碼

1637.h
  1. #ifndef __TM1637_H__
  2. #define __TM1637_H__



  6. #include"reg52.h"
  7. #include"intrins.h"

  9. sbit I2C_SCL = P2^0;   //定義模擬IIC總線的時鐘線
  10. sbit I2C_SDA = P2^1;   //定義模擬IIC總線的數(shù)據(jù)線


  13. #define TM1637_BRIGHTNESS 4 // 0 - 7 亮度

  15. void TM1637_show_digit(unsigned char pos, unsigned char digit, bit with_dot);
  16. void TM1637_init();

  18. #endif

復(fù)制代碼

Keil代碼下載: AIP1637.zip (40.3 KB, 下載次數(shù): 30)

作者: joyb    時間: 2023-6-17 09:55
這個比較實用
作者: lhxtzlhxtz    時間: 2023-12-22 10:29
給個電路看看






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1