標(biāo)題: 網(wǎng)上找的1637C H文件做的模塊化 TM1637 4LED模塊 0--f [打印本頁(yè)]
作者: zuiqf1978    時(shí)間: 2021-10-17 20:19
標(biāo)題: 網(wǎng)上找的1637C H文件做的模塊化 TM1637 4LED模塊 0--f
網(wǎng)上找的1637C  H文件做的模塊化  4LED模塊 0--f  STC15W408AS測(cè)試

單片機(jī)源程序如下:
  1. #include"1637.h"

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

  8. //常規(guī)I2C時(shí)序
  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)  //寫一個(gè)字節(jié)
  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()        //鍵盤掃描函數(shù)
  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)        //顯示函數(shù)
  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()        //初始化函數(shù)
  119. {
  120.         IIC_start();
  121.         IIC_Write_cmd(0x8f);
  122.         IIC_ack();
  123.         //IIC_stop;
  124. }

復(fù)制代碼

代碼:
1637 0-f顯示 模塊化OK.rar (223.22 KB, 下載次數(shù): 18)






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