TM1638数码管显示驱动程序（参考）
1、TM1638与STM32连接
1.1 硬件连接
Vcc--电源+
GND--电源地
STB--PA0
CLK--PA1
DIO--PA2
1.2 驱动程序
TM1638.c文件：
/**********************************************************************************************
**Program Assignment: Driver for TM1638 digital tube
**Author :
**Date :
**Description : This is a driver for the board which is controled by thechip of tm1638.
The board has eight digital tubes which have eight segments and eight keys.
***********************************************************************************************/
//#include "stm32f10x.h"
#include "TM1638.h"
/*********************define and global variables*********************************************/
#define STB GPIO_Pin_0 //chip-select line
#define CLK GPIO_Pin_1 //clock line
#define DIO GPIO_Pin_2 //data line
#define Set(x) GPIO_SetBits(GPIOA,(x)) //Sets the selected data port bits
#define Reset(x) GPIO_ResetBits(GPIOA,(x)) //Resets the selected data port bits
#define Get(x) GPIO_ReadInputDataBit(GPIOA,(x))==SET //Read the specified input port pin
uint16_t const tm_dat[2][14]={{'0','1','2','3','4','5', //the char and its segment code
'6','7','8','9','.','-','_',' '},
{0x3F,0x06,0x5B,0x4F,0x66,0x6D,
0x7D,0x07,0x7F,0x6F,0x80,0x40,
0x08,0x00}};
/***********************************************************************************************
*Function Name: RCC_Config
*Purpose : Configration Clock
***********************************************************************************************/
void RCC_Config(){
RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA,ENABLE);
}
/***********************************************************************************************
*Function Name: GPIO_Config
*Purpose : Configration GPIO
***********************************************************************************************/
void GPIO_Config(){
GPIO_InitTypeDef GPIO_InitStructure;
GPIO_InitStructure.GPIO_Mode=GPIO_Mode_Out_OD;
GPIO_InitStructure.GPIO_Speed=GPIO_Speed_50MHz;
GPIO_InitStructure.GPIO_Pin=STB|CLK|DIO;
GPIO_Init(GPIOA,&GPIO_InitStructure);
}
/***********************************************************************************************
*Function Name: Write_Byte
*Purpose : Write one byte to the data port
*params : byte -------8-bits byte
*return : none
***********************************************************************************************/
void Write_Byte(uint8_t byte){
uint8_t i=0;
for(i=0;i<8;i++){
Reset(CLK);
if(byte&0x01){
Set(DIO);
}else{
Reset(DIO);
}
Set(CLK);
byte>>=1;
}
}
/***********************************************************************************************
*Function Name: Read_Byte
*Purpose : Read one byte from data port
*params : none
*return : the 8-bits byte which is read from data port
***********************************************************************************************/
int8_t Read_Byte(){
uint8_t i=0;
uint8_t temp=0x00;
for(i=0;i<8;i++){
Set(CLK);
temp>>=1;
if(Get(DIO)){
temp|=0x80;
}
Reset(CLK);
}
return temp;
}
/***********************************************************************************************
*Function Name: Write_Cmd
*Purpose : Write a conmand to the data port
*params : cmd -------8-bits byte,the conmand,check the data sheet to find the conmand
*return : none
***********************************************************************************************/
void Write_Cmd(uint8_t cmd){
Set(STB);
Reset(STB);
Write_Byte(cmd);
}
/***********************************************************************************************
*Function Name: Read_Key
*Purpose : Read the key number which has been pressed
*params : none
*return : the number of the key. 0-8. "return 0" represents no key has been pressed.
***********************************************************************************************/
int8_t Read_Key(){
uint8_t i=0;
uint8_t key1=0x00;
uint16_t key2=0x00;
Write_Cmd(0x42);
Set(DIO); //this is obligatory, check the data sheet,GPIO
for(i=0;i<4;i++){
key1=Read_Byte();
key2|=(key1<<i);
}
key2>>=1;
for(i=0;i<8;i++){
if(0x01<<i==key2)return i+1;
}
return 0;
}
/***********************************************************************************************
*Function Name: Write_Dat
*Purpose : Write data to the location specified
*params : addr ------the address,0x00 to 0x0f
dat ------the data,segment code
*return : none
***********************************************************************************************/
void Write_Dat(uint8_t addr,uint8_t dat){
Write_Cmd(0x44);
Write_Cmd(0xc0|addr);
Write_Byte(dat);
}
/***********************************************************************************************
*Function Name: TM1638_SendData
*Purpose : Write data to the location specified
*params : i ------the bit code of digtal tube,0 to 7
str ------the string,the char which was not in tm_data will be replace with "''".
*return : none
***********************************************************************************************/
void TM1638_SendData(uint8_t i,char * str){
int j=0,k=0;
unsigned char chr;
for(;i<8;i++){
k=0;
for(j=0;j<14;j++){
if(*str==tm_dat[0][j]){
chr=tm_dat[1][j];
k=1;
break;
}
}
if(k==0){
chr=0x00;
}
if(*(str+1)=='.'){
chr|=0x80;
Write_Dat(i*2,chr);
str++;
}else{
Write_Dat(i*2,chr);
}
str++;
if(*str=='\0')break;
}
}
/***********************************************************************************************
*Function Name: TM1638_SendIntData
*Purpose : Write Int data to the location specified
*params : i ------the bit code of digtal tube,0 to 7
num ------the Int.
*return : none
***********************************************************************************************/
void TM1638_SendIntData(uint8_t i,int num)
{
char a;
a = num + '0';
TM1638_SendData(i,&a);
}
/***********************************************************************************************
*Function Name: TM1638_Init
*Purpose : the initialization of tm1638
*params : none
*return : none
***********************************************************************************************/
void TM1638_Init(){
int i=0;
RCC_Config();
GPIO_Config();
Write_Cmd(0x8a);
Write_Cmd(0x40);
for(i=0;i<16;i++){
Write_Byte(0x00);
}
}
TM1638.h
#ifndef __TM1638_H
#define __TM1638_H
#include "stm32f10x.h"
void RCC_Config(void);
void GPIO_Config(void);
void Write_Byte(uint8_t byte);
int8_t Read_Byte(void);
void Write_Cmd(uint8_t cmd);
int8_t Read_Key(void);
void Write_Dat(uint8_t addr,uint8_t dat);
void TM1638_SendData(uint8_t i,char * str);
void TM1638_SendIntData(uint8_t i,int num);
void TM1638_Init(void);
#endif
1.3 函数说明
用到的函数：void TM1638_SendData(uint8_t i,char * str);函数说明如下：
/***********************************************************************************************
*Function Name: TM1638_SendData
*Purpose : Write data to the location specified
*params : i ------the bit code of digtal tube,0 to 7
str ------the string,the char which was not in tm_data will be replace with "''".不显示数据的时候用"''"替换字符
*return : none
***********************************************************************************************/
int8_t Read_Key(void);函数说明如下：
/***********************************************************************************************
*Function Name: Read_Key
*Purpose : Read the key number which has been pressed
*params : none
*return : the number of the key. 0-8. "return 0" represents no key has been pressed.
***********************************************************************************************/
2.DS1302与STM32
2.1硬件连接
Vcc--电源+
GND--电源地
CLK--PC12
DAT--PC11
RST--PC10
2.2驱动程序
DS1302.c的程序网上很多都不能用，查找了硬件时序，发现没问题，但是就是没办法用，下面的程序我亲自测过可以用的，如下：
#include "DS1302.h"
//#include "IO.h"
#include "delay.h"
//*****************DS1302控制命令*******************
#define WRITE_SECOND 0x80
#define WRITE_MINUTE 0x82
#define WRITE_HOUR 0x84
#define WRITE_DAY 0x86
#define WRITE_MONTH 0x88
#define WRITE_WEEK 0x8A
#define WRITE_YEAR 0x8C
#define WRITE_TIMER_FLAG 0xC0
#define READ_SECOND 0x81
#define READ_MINUTE 0x83
#define READ_HOUR 0x85
#define READ_DAY 0x87
#define READ_MONTH 0x89
#define READ_WEEK 0x8B
#define READ_YEAR 0x8D
#define READ_TIMER_FLAG 0xC1
#define WRITE_PROTECT 0x8E
_calendar_obj calendar; //时钟结构体
_next_obj next;
//月份数据表
u8 const table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5}; //月修正数据表
u8 BCD2HEX(u8 bcd_data) //BCDtoHEX
{
u8 temp;
temp=(bcd_data/16*10 + bcd_data%16);
return temp;
}
u8 HEX2BCD(u8 hex_data) //HEXtoBCD
{
u8 temp;
temp=(hex_data/10*16 + hex_data%10);
return temp;
}
//============================================
//函数名称：void Ds1302_Write_Byte (byte addr, byte dat)
//功能： 串行发送地址、数据，先发低位，且在上升沿发送
//参数传递：有，地址和数据
//返回值： 无
//===========================================
void IO_Init(void)
{
GPIO_InitTypeDef GPIO_InitStructure;
RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA|RCC_APB2Periph_GPIOB|RCC_APB2Periph_GPIOC, ENABLE); //使能PA,PB,PC端口时钟
GPIO_InitStructure.GPIO_Speed = GPIO_Speed_2MHz; //IO口速度为50MHz
//PC端口初始化
GPIO_InitStructure.GPIO_Pin = GPIO_Pin_10|GPIO_Pin_11|GPIO_Pin_12; //设置PC10~PC12端口推挽输出
GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; //推挽输出
GPIO_Init(GPIOC, &GPIO_InitStructure);
}
void Ds1302_Write_Byte(u8 addr, u8 dat)
{
u8 i;
DS1302_IO_OUT(); //数据端口定义为输出
CE = 1;
delay_us(10);
SCLK = 0;
delay_us(10);
for(i=0;i<8;i++)
{
if(addr&0x01)
{
DIO = 1;
}
else
{
DIO = 0;
}
addr = addr>>1;
SCLK = 1;
delay_us(10);
SCLK = 0;
delay_us(10);
}
for(i=0;i<8;i++) //写入数据：dat
{
if(dat&0x01)
{
DIO = 1;
}
else
{
DIO = 0;
}
dat = dat>>1;
SCLK = 1;
delay_us(10);
SCLK = 0;
delay_us(10);
}
CE = 0;; //停止DS1302总线
delay_us(10);
}
//===============================================
//函数名称：byte Ds1302_Read_Byte ( byte addr )
//功能： 串行读取数据，先发低位，且在下降沿发送
//参数传递：有，地址
//返回值： 有，读取的数据
//===============================================
u8 Ds1302_Read_Byte(u8 addr)
{
u8 i;
u8 temp = 1;
CE = 1;
delay_us(10);
for(i=0;i<8;i++)
{
SCLK = 0;
delay_us(10);
if(addr&0x01)
{
DIO = 1;
}
else
{
DIO = 0;
}
addr = addr>>1;
SCLK = 1;
delay_us(10);
}
DS1302_IO_IN(); //数据端口定义为输入
for(i=0;i<8;i++)
{
temp = temp >> 1; //输出数据：temp
SCLK = 0;
delay_us(10);
if(DIO_IN)
{
temp |= 0x80;
}
SCLK = 1;
delay_us(10);
}
DS1302_IO_OUT(); //数据端口定义为输出
SCLK = 0;
delay_us(10);
CE = 0; //停止DS1302总线
delay_us(10);
return temp;
}
//获得现在是星期几
//功能描述:输入公历日期得到星期(只允许1901-2099年)
//输入参数：公历年月日
//返回值：星期号
u8 RTC_Get_Week(u16 year,u8 month,u8 day)
{
u16 temp2;
u8 yearH,yearL;
yearH=year/100;
yearL=year%100; //如果为21世纪,年份数加100
if (yearH>19)yearL+=100; //所过闰年数只算1900年之后的
temp2=yearL+yearL/4;
temp2=temp2%7;
temp2=temp2+day+table_week[month-1];
if (yearL%4==0&&month<3)temp2--;
return(temp2%7);
}
//===============================================
// 向DS1302写入时钟数据
//===============================================
void RTC_Set(u16 year,u8 mon,u8 day,u8 hour,u8 min,u8 sec)
{
u8 WR_week;
u8 WR_yearL = 0;
if(year>=2000)
{
WR_yearL = year - 2000;
}
WR_week = RTC_Get_Week(year,mon,day); //根据写入的日期算星期几
Ds1302_Write_Byte(WRITE_PROTECT,0x00); //关闭写保护
Ds1302_Write_Byte(WRITE_SECOND,0x80); //暂停
// Ds1302_Write_Byte(ds1302_charger_add,0xa9); //涓流充电
Ds1302_Write_Byte(WRITE_YEAR,HEX2BCD(WR_yearL)); //年
Ds1302_Write_Byte(WRITE_MONTH,HEX2BCD(mon)); //月
Ds1302_Write_Byte(WRITE_DAY,HEX2BCD(day)); //日
Ds1302_Write_Byte(WRITE_HOUR,HEX2BCD(hour)); //时
Ds1302_Write_Byte(WRITE_MINUTE,HEX2BCD(min)); //分
Ds1302_Write_Byte(WRITE_SECOND,HEX2BCD(sec)); //秒
Ds1302_Write_Byte(WRITE_WEEK,HEX2BCD(WR_week)); //周
Ds1302_Write_Byte(WRITE_PROTECT,0x80); //打开写保护
}
//========================================
// 从DS1302读出时钟数据
//========================================
void GetTime(void)
{
// u8 i,tmp;
calendar.w_year = BCD2HEX(Ds1302_Read_Byte(READ_YEAR)); //年
calendar.w_month = BCD2HEX(Ds1302_Read_Byte(READ_MONTH)); //月
calendar.w_date = BCD2HEX(Ds1302_Read_Byte(READ_DAY)); //日
calendar.hour = BCD2HEX(Ds1302_Read_Byte(READ_HOUR)); //时
calendar.min = BCD2HEX(Ds1302_Read_Byte(READ_MINUTE)); //分
calendar.sec = BCD2HEX(Ds1302_Read_Byte(READ_SECOND)&0x7F); //秒
calendar.week = BCD2HEX(Ds1302_Read_Byte(READ_WEEK)); //周
calendar.w_year = calendar.w_year+2000;
}
//==========================================
// DS1302初始化
//==========================================
void Ds1302_Init(void)
{
IO_Init();
CE = 0; //RST脚置低
SCLK = 0; //SCK脚置低
Ds1302_Write_Byte(WRITE_SECOND,0x00); //开始
//RTC_Set(2017,4,18,15,23,2) ;
}
//*******************以下UTC时间计算部分函数*****************
//判断是否是闰年函数
//月份 1 2 3 4 5 6 7 8 9 10 11 12
//闰年 31 29 31 30 31 30 31 31 30 31 30 31
//非闰年 31 28 31 30 31 30 31 31 30 31 30 31
//输入:年份
//输出:该年份是不是闰年.1,是.0,不是
u8 Is_Leap_Year(u16 year)
{
if(year%4==0) //必须能被4整除
{
if(year%100==0)
{
if(year%400==0)return 1; //如果以00结尾,还要能被400整除
else return 0;
}else return 1;
}else return 0;
}
DS1302.h内容如下：
#ifndef __DS1302_H
#define __DS1302_H
#include "sys.h"
#endif
//-------------------------------------------------------------------------*
//文件名: DS1302.h (实时时钟头文件) *
//-------------------------------------------------------------------------*
//IO方向设置
#define CE PCout(10) // PC10
#define DIO PCout(11) // PC11
#define SCLK PCout(12) // PC12
#define DS1302_IO_IN() {GPIOC->CRH&=0xFFFF0FFF;GPIOC->CRH|=0x00008000;} //低八位引脚的PC11脚定义为输入
#define DS1302_IO_OUT() {GPIOC->CRH&=0xFFFF0FFF;GPIOC->CRH|=0x00003000;} //低八位引脚的PC11脚定义为输出
//IO操作函数
#define DIO_OUT PCout(11) //数据端口 PC11
#define DIO_IN PCin(11) //数据端口 PC11
typedef struct
{
u8 sec;
u8 min;
u8 hour;
u8 day;
u8 mon;
u16 year;
u8 week;
}_next_obj;
extern _next_obj next;
typedef struct
{
vu8 hour;
vu8 min;
vu8 sec;
//公历日月年周
vu16 w_year;
vu8 w_month;
vu8 w_date;
vu8 week;
}_calendar_obj;
extern _calendar_obj calendar; //日历结构体
extern u32 RTC_sec_sum; //当前时间的总秒值
extern u32 Program_sec_sum; //当前编程任务的总秒值,与RTC_sec_sum进行比较
void RTC_Set(u16 year,u8 mon,u8 day,u8 hour,u8 min,u8 sec);
void GetTime(void);
void NEXT_Date(u8 day);
u8 RTC_Pro_count(u16 syear,u8 smon,u8 sday,u8 hour,u8 min,u8 sec,u8 mode);//编程任务时间计算
u8 Pro_Get_time(u32 ttt); //编程模式无效时间时计算下次开始的日期
void Ds1302_Init(void);
