/*****************************************************************************
*版权信息：深圳天微电子有限公司
*文 件 名：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();
}
}