找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1988|回复: 2
打印 上一主题 下一主题
收起左侧

STC89C52单片机+老王4位数码管AIP1637程序分享

[复制链接]
跳转到指定楼层
楼主
制作出来的实物效果图如下:



话不多说,上单片机代码
//主函数
  1. #include <intrins.h>
  2. #include <TM1637.H>


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

  15.     }

  16. }
复制代码
1637.c
  1. #include <TM1637.H>



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



  21. void I2C_delay()
  22. {
  23.     nop_();
  24. }


  25. void I2C_start()
  26. {   
  27.     I2C_SCL = 1;
  28.     I2C_SDA = 1;


  29.     I2C_delay();


  30.     I2C_SDA = 0; // 时钟线设置为常态,低电平。
  31. }


  32. /*
  33. I2C 总线写1个字节
  34. 不包含应答位的检测
  35. */
  36. void I2C_write_byte(char byte_to_write)
  37. {
  38.     unsigned char i;


  39.     for(i=0; i<8; i++)
  40.     {
  41.         I2C_SCL = 0;

  42.         I2C_SDA = byte_to_write & 0x01;
  43.         I2C_delay();

  44.         I2C_SCL = 1;
  45.         I2C_delay();


  46.         I2C_SCL = 0;
  47.         I2C_delay();


  48.         byte_to_write >>= 1;
  49.     }

  50.     return;
  51. }


  52. void I2C_check_ack()
  53. {
  54.     // I2C 检查应答位,实际未检查,只发送了应答位时钟,认为TM1637工作正常


  55.     I2C_SCL = 0;
  56.     I2C_delay();//在第八个时钟下降沿之后延时5us,开始判断ACK 信号

  57.     while(I2C_SDA)
  58.     {
  59.         ;
  60.     }


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


  63.     I2C_SCL=0;
  64. }


  65. void I2C_send_ack()
  66. {
  67.     I2C_SDA = 0;
  68.     I2C_delay();


  69.     I2C_SCL = 1;
  70.     I2C_delay();


  71.     I2C_SCL = 0;
  72.     I2C_delay();


  73.     I2C_SDA = 1;
  74.     I2C_delay();
  75. }


  76. void I2C_stop()
  77. {
  78.     I2C_SCL = 0;
  79.     I2C_delay();


  80.     I2C_SDA = 0;
  81.     I2C_delay();


  82.     I2C_SCL = 1;
  83.     I2C_delay();


  84.     I2C_SDA = 1;
  85. }


  86. ///
  87. //
  88. // TM1637模块操作函数
  89. //
  90. //


  91. void TM1637_write_command_byte(unsigned char command)
  92. {
  93.     I2C_start();
  94.     I2C_write_byte(command);
  95.     I2C_check_ack();
  96.     I2C_stop();
  97. }




  98. // bright : 0 - 7
  99. void TM1637_display_switch_and_bright(bit enable_display, unsigned char bright)
  100. {
  101.     TM1637_write_command_byte(0x80 + (enable_display ? 0x08 : 0x00) + bright);
  102. }




  103. void TM1637_write_display_bytes(unsigned char first_addr,
  104.                                 unsigned char bytes_to_write[],
  105.                                 unsigned char num_of_bytes)
  106. {
  107.     unsigned char i;


  108.     I2C_start();
  109.     I2C_write_byte(0x40);
  110.     I2C_check_ack();
  111.     I2C_stop();


  112.     I2C_start();
  113.     I2C_write_byte(0xC0 + first_addr);
  114.     I2C_check_ack();


  115.     for(i=0; i<num_of_bytes; i++)
  116.     {
  117.         I2C_write_byte(bytes_to_write[i]);
  118.         I2C_check_ack();
  119.     }


  120.     I2C_stop();
  121. }



  122. /**
  123.    * @brief  显示数据
  124.    * @param  地址值  addr: 0 - 5
  125.    * @param  数据                  
  126.    * @param
  127.    * @retval None
  128.    */   
  129. void TM1637_write_display_byte(unsigned char addr, unsigned char segments)
  130. {
  131.     I2C_start();
  132.     I2C_write_byte(0x40 + addr);
  133.     I2C_check_ack();
  134.     I2C_stop();


  135.     I2C_start();
  136.     I2C_write_byte(0xC0 + addr);
  137.     I2C_check_ack();


  138.     I2C_write_byte(segments);
  139.     I2C_check_ack();


  140.     I2C_stop();
  141. }







  142. void TM1637_show_digit(unsigned char pos, unsigned char digit, bit with_dot)
  143. {
  144.     TM1637_write_display_byte(pos, TM1637_SEG_TAB[digit] | (with_dot ? 0x80 : 0x00));
  145. }




  146. void TM1637_init()
  147. {
  148.     unsigned char i;


  149.     TM1637_display_switch_and_bright(1, TM1637_BRIGHTNESS);


  150.     for(i=0; i<6; i++)
  151.     {
  152.         TM1637_write_display_byte(i, 0xFF);
  153.     }

  154.     for(i=0; i<6; i++)
  155.     {
  156.         TM1637_write_display_byte(i, 0x00);
  157.     }



  158. }
复制代码

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



  3. #include"reg52.h"
  4. #include"intrins.h"

  5. sbit I2C_SCL = P2^0;   //定义模拟IIC总线的时钟线
  6. sbit I2C_SDA = P2^1;   //定义模拟IIC总线的数据线


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

  8. void TM1637_show_digit(unsigned char pos, unsigned char digit, bit with_dot);
  9. void TM1637_init();

  10. #endif

复制代码

Keil代码下载: AIP1637.zip (40.3 KB, 下载次数: 30)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

沙发
ID:1064915 发表于 2023-6-17 09:55 | 只看该作者
这个比较实用
回复

使用道具 举报

板凳
ID:639666 发表于 2023-12-22 10:29 | 只看该作者
给个电路看看


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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