标题: 网上找的1637C H文件做的模块化 TM1637 4LED模块 0--f [打印本页]
作者: zuiqf1978    时间: 2021-10-17 20:19
标题: 网上找的1637C H文件做的模块化 TM1637 4LED模块 0--f
网上找的1637C  H文件做的模块化  4LED模块 0--f  STC15W408AS测试

单片机源程序如下:
  1. #include"1637.h"

  3. void delay_6us()
  4. {
  5.         _nop_();
  6. }                                                  

  8. //常规I2C时序
  9. void IIC_start(void)
  10. {
  11.          CLK = 1;
  12.          _nop_();
  13.          SDA = 1;
  14.          delay_6us();
  15.          SDA = 0;
  16.          _nop_();
  17.          CLK = 0;
  18. }

  20. void IIC_stop(void)
  21. {
  22.         CLK = 0;
  23.         _nop_();
  24.         SDA = 0;
  25.         _nop_();
  26.         CLK = 1;
  27.         delay_6us();
  28.         SDA = 1;

  30. }
  31. void IIC_ack(void)
  32. {

  34.         CLK = 0;
  35.         delay_6us();
  36.         while(SDA);
  37.         CLK = 1;
  38.         _nop_();
  39. }

  41. void IIC_Write_cmd(Byte cmd)  //写一个字节
  42. {
  43.         Byte n;
  44.         IIC_start();
  45.         for(n=0;n<8;n++)
  46.         {
  47.                 CLK = 0;
  48.                 delay_6us();
  49.                 SDA = cmd&0x01;
  50.         /*        if(cmd&0x01)
  51.                 {
  52.                         SDA = 1;        
  53.                 }
  54.                 else
  55.                 {
  56.                         SDA = 0;
  57.                 }        */
  58.                 cmd>>=1;
  59.                 CLK = 1;
  60.                 delay_6us();               
  61.         }
  62. }

  64. Byte Keysacn()        //键盘扫描函数
  65. {
  66.         Byte n,key_value;
  67.         IIC_start();
  68.         IIC_Write_cmd(0x42);
  69.         IIC_ack();
  70.         SDA = 1;
  71.         for(n=0;n<8;n++)
  72.         {
  73.                 CLK = 0;
  74.                 delay_6us();
  75.                 key_value = key_value>>1;
  76.         //  key_value>>=1;
  77.                 CLK = 1;
  78.                 if(SDA)
  79.                 {
  80.                         key_value = key_value|0x80;
  81.                 }
  82.                 else
  83.                 {
  84.                         key_value = key_value|0x00;
  85.                 }
  86.                 delay_6us();
  87.                 delay_6us();
  88.                 delay_6us();
  89.                         
  90.         }
  91.         IIC_ack();
  92.         IIC_stop();         
  93.         return (key_value);
  94. }

  96. void Display(Byte dat)        //显示函数
  97. {
  98.         Byte n;
  99.         IIC_start();
  100.         IIC_Write_cmd(0x40);
  101.         IIC_ack();
  102.         IIC_stop();
  103.         IIC_start();
  104.         IIC_Write_cmd(0xc1);
  105.         IIC_ack();
  106.         for(n=0;n<6;n++)
  107.         {
  108.                 IIC_Write_cmd(dat);
  109.                 IIC_ack();        
  110.         }
  111.         IIC_stop();
  112.         IIC_start();
  113.         IIC_Write_cmd(0x8f);
  114.         IIC_ack();
  115.         IIC_stop();        
  116. }

  118. void TM1637_Init()        //初始化函数
  119. {
  120.         IIC_start();
  121.         IIC_Write_cmd(0x8f);
  122.         IIC_ack();
  123.         //IIC_stop;
  124. }

复制代码

代码:
1637 0-f显示 模块化OK.rar (223.22 KB, 下载次数: 18)






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1