/*****************************************************************************

 *版权信息：深圳天微电子有限公司

 *文 件 名：TM1637-V1.0

 *当前版本：V1.0

 *MCU 型号：STC12C5608AD

 *开发环境：Keil uVision4

 *晶震频率：11.0592MHZ

 *完成日期：2013-07-19

 *程序功能：数码管驱动和按键：驱动8段6位LED共阳数码管显示,当对应按键按下时显示1~7,原理图请参考TM1637规格书；

 *免责声明：1.此程序为TM1637驱动共阳LED数码管和按键演示程序，仅作参考之用。

            2.如有直接使用本例程程序造成经济损失的，本公司不承担任何责任

********************************************************************************/

#include <reg52.h>                                                //头文件

#include "intrins.h"                                                //包含_nop_()指令头文件

#define nop _nop_();_nop_();_nop_();_nop_();_nop_();                 //宏定义

/********************定义控制端口**********************/

sbit CLK=P2^;                                                                 //定义CLK

sbit DIO=P2^;                                                                 //定义DIO

/********************定义数据*************************/

unsigned char code CODE[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8, 0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e}; //共阳显示数据0-F

                                                        /* 0   1    2    3    4     5    6    7     8    9   a     b    c    d    e    f*/

unsigned char code TAB[]={0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,};//数码管不显示

/********************延时函数，延时nms******************/

void delay_nms(unsigned int n)

{

 unsigned int i;

 while(n--)

   for(i=;i<;i++);

}

/********************Start函数*************************/

void I2CStart()

{

 DIO=;

 CLK=;

 nop;

 DIO=;

 nop;

 DIO=;

 nop;

 CLK=;

}

/********************Stop函数*************************/

void I2CStop()

{

    CLK=;

        nop;

        nop;

        DIO=;

        nop;

        nop;

        CLK=;

        nop;

        nop;

        nop;

        DIO=;

        nop;

        CLK=;

        DIO=;

}

/***************发送8bit数据，从低位开始**************/

void I2CWritebyte(unsigned char oneByte)

{

  unsigned char i;

  for(i=;i<;i++)

  {

    CLK=;

        if(oneByte&0x01)

          DIO=;

        else

          DIO=;

        nop;

    CLK=;

    oneByte=oneByte>>;

  }

                                                                                  //8位数据传送完

        CLK = ;                                                                //判断芯片发过来的ACK应答信号

        nop;

        while(DIO==);

        nop;

        CLK = ;

        nop;

}

/***************读按键程序**************/

unsigned char read_key()

{

unsigned char rekey,i;

I2CStart();

I2CWritebyte(0x42);                                                         //写读键指令0x42

DIO=;

for(i=;i<;i++)

{

        CLK=;

        nop;

        nop;

        rekey=rekey>>;                                                           //先读低位

        nop;

        nop;

        CLK=;

        if(DIO)

          rekey=rekey|0x80;

        else

          rekey=rekey|0x00;

        nop;

}

        CLK = ;                                                          //判断芯片发过来的ACK应答信号

        nop;

        nop;

        while(DIO==);

        nop;

        nop;

        CLK = ;

        nop;

        nop;

        I2CStop();

        return rekey;

}

/************显示函数，地址自加一************/

void disp0(unsigned char *p)

{

 unsigned char i;

 I2CStart();

 I2CWritebyte(0x40);                                  //数据命令设置：地址自动加1，写数据到显示寄存器

 I2CStop();

 I2CStart();

 I2CWritebyte(0xc0);                                  //地址命令设置：初始地址为00H

 for(i=;i<;i++)                                  //发送4字节数据到显存

 {

 I2CWritebyte(*p);

 p++;

 }

 I2CStop();

 I2CStart();

 I2CWritebyte(0x8C);                                 //显示控制命令：开显示，脉冲宽度为11/16.

 I2CStop();

}

/************显示函数，固定地址写数据************/

void disp(unsigned char add, unsigned char value)

{

 I2CStart();

 I2CWritebyte(0x44);                                 //数据命令设置：固定地址，写数据到显示寄存器

 I2CStop();

 I2CStart();

 I2CWritebyte(add);                                //地址命令设置：写入add对应地址

 I2CWritebyte(CODE[value]);                        //给add地址写数据

 I2CStop();

 I2CStart();

 I2CWritebyte(0x8C);                                //显示控制命令：开显示，脉冲宽度为11/16.

 I2CStop();

}

/************按键处理函数，按键数据低位在前高位在后************/

void key_process()

{

 unsigned char temp;

 temp=read_key();                                   //读取按键返回值

 if(temp!=0xff)

 {

  disp0(TAB);                                           //清屏

  switch(temp)

  {

    case 0xf7 : disp(0xc0,);break;                  //K1与SG1对应按键按下,显示1

        case 0xf6 : disp(0xc1,);break;                  //K1与SG2对应按键按下,显示2

        case 0xf5 : disp(0xc2,);break;                  //K1与SG3对应按键按下,显示3

        case 0xf4 : disp(0xc3,);break;                  //K1与SG4对应按键按下,显示4

        case 0xef : disp(0xc4,);break;                  //K2与SG1对应按键按下,显示5

        case 0xee : disp(0xc5,);break;                  //K2与SG2对应按键按下,显示6

        case 0xed : disp(0xc0,);break;                  //K2与SG3对应按键按下,显示7

        default   : break;

  }

 }

}

void main()

{
　　disp0(CODE);                                      //上电数码管显示0~5

　　delay_nms();

　　while()                                     //按键后显示按键内容

　　{

　　　　key_process();

　　　　delay_nms();

　　}

}