//ATmega128的DS1302实时时钟芯片驱动程序
//编译环境 AVR Studio 4.17/AVR GCC
//体系时钟7.3728MHZ，设置熔丝位为外部高频石英晶体振荡，发动时刻4.1ms
//作者：张奇zhangqi123zq@126.com
//日期：2010.02.20
//***********************************************************************
//包括文件
//***********************************************************************
#include
#include
#define F_CPU7372800/* 单片机主频为7.3728MHz,用于延时子程序 */
#include
#include <avr/io.h>
#include
//***********************************************************************
//界说变量区
//***********************************************************************
#define uchar unsigned char
#define uint unsigned int
#define delay_us(x) _delay_us(x) //AVR GCC延时函数 x(us)
#define delay_ms(x) _delay_ms(x) //AVR GCC延时函数 x(ms)
/*复位脚*/
#define RST_CLRPORTE &= ~(1 << PE7) //电平置低
#define RST_SETPORTE |= (1 << PE7) //电平置高
#define RST_INDDRE &= ~(1 << PE7) //方向输入
#define RST_OUTDDRE |= (1 << PE7) //方向输出
/*双向数据*/
#define IO_CLRPORTE &= ~(1 << PE6) //电平置低
#define IO_SETPORTE |= (1 << PE6) //电平置高
#define IO_RPINE & (1 << PE6) //电平读取
#define IO_INDDRE &= ~(1 << PE6) //方向输入
#define IO_OUTDDRE |= (1 << PE6) //方向输出
/*时钟信号*/
#define SCK_CLRPORTE &= ~(1 << PE5) //时钟信号
#define SCK_SETPORTE |= (1 << PE5) //电平置高
#define SCK_INDDRE &= ~(1 << PE5) //方向输入
#define SCK_OUTDDRE |= (1 << PE5) //方向输出
/*ds1302指令与相关地址*/
#define ds1302_sec_add0x80//秒数据地址
#define ds1302_min_add0x82//分数据地址
#define ds1302_hr_add0x84//时数据地址
#define ds1302_date_add0x86//日数据地址
#define ds1302_month_add0x88//月数据地址
#define ds1302_day_add0x8a//星期数据地址
#define ds1302_year_add0x8c//年数据地址
#define ds1302_control_add0x8e//操控数据地址
#define ds1302_charger_add0x90
#define ds1302_clkburst_add0xbe
#define RS_CLRPORTF &= ~(1 << PF1) //RS置低
#define RS_SETPORTF |= (1 << PF1) //RS置高
#define RW_CLRPORTF &= ~(1 << PF2) //RW置低
#define RW_SETPORTF |= (1 << PF2) //RW置高
#define EN_CLRPORTF &= ~(1 << PF3) //E置低
#define EN_SETPORTF |= (1 << PF3) //E置高
#define Data_IO PORTA //液晶数据口
#define Data_DDR DDRA //数据口方向寄存器
#define D_LE0 PORTD &= ~(1 << PD4) //数码管段操控位为0，锁存端口数据
#define D_LE1 PORTD |= (1 << PD4) //数码管段操控位为1，锁存器输出与端口共同
#define W_LE0 PORTD &= ~(1 << PD5) //数码管位操控位为0
#define W_LE1 PORTD |= (1 << PD5) //数码管位操控位为1
unsigned char time_buf[8] = {0x20,0x10,0x01,0x14,0x09,0x55,0x00,0x02};
//*************************************************************************
//初始化子程序
//*************************************************************************
void system_init()
{
Data_IO = 0xFF; //电平设置
Data_DDR = 0xFF; //方向输出
PORTF = 0xFF; //电平设置
DDRF = 0xFF; //方向输出
PORTD=0xFF;
DDRD=0xFF;
D_LE1; //关掉数码管，避免显现乱码
W_LE1;
Data_IO=0xFF; //关数码管
W_LE0;
}
//***********************************************************************
//向DS1302写入一字节数据
//***********************************************************************
void ds1302_write_byte(unsigned char addr, unsigned char d)
{
unsigned char i;
RST_SET;//发动DS1302总线
//写入方针地址：addr
IO_OUT;
addr = addr & 0xFE; //最低方位零
for (i = 0; i < 8; i ++) {
if (addr & 0x01) {
IO_SET;
}
else {
IO_CLR;
}
SCK_SET;
SCK_CLR;
addr = addr >> 1;
}
//写入数据：d
IO_OUT;
for (i = 0; i < 8; i ++) {
if (d & 0x01) {
IO_SET;
}
else {
IO_CLR;
}
SCK_SET;
SCK_CLR;
d = d >> 1;
}
RST_CLR;//中止DS1302总线
}
//***********************************************************************
// 从DS1302读出一字节数据
//***********************************************************************
unsigned char ds1302_read_byte(unsigned char addr)
{
unsigned char i;
unsigned char temp;
RST_SET;//发动DS1302总线
//写入方针地址：addr
IO_OUT;
addr = addr | 0x01; //最低方位高
for (i = 0; i < 8; i ++) {
if (addr & 0x01) {
IO_SET;
}
else {
IO_CLR;
}
SCK_SET;
SCK_CLR;
addr = addr >> 1;
}
/*输出数据：temp*/
IO_IN;
for (i = 0; i < 8; i ++) {
temp = temp >> 1;
if (IO_R) {
temp |= 0x80;
}
else {
temp &= 0x7F;
}
SCK_SET;
SCK_CLR;
}
RST_CLR;//中止DS1302总线
return temp;
}
//***********************************************************************
// 向DS302写入时钟数据
//***********************************************************************
void ds1302_write_time(void)
{
ds1302_write_byte(ds1302_control_add,0x00);//封闭写保护
ds1302_write_byte(ds1302_sec_add,0x80);//暂停
//ds1302_write_byte(ds1302_charger_add,0xa9);//涓流充电
ds1302_write_byte(ds1302_year_add,time_buf[1]);//年
ds1302_write_byte(ds1302_month_add,time_buf[2]);//月
ds1302_write_byte(ds1302_date_add,time_buf[3]);//日
ds1302_write_byte(ds1302_day_add,time_buf[7]);//周
ds1302_write_byte(ds1302_hr_add,time_buf[4]);//时
ds1302_write_byte(ds1302_min_add,time_buf[5]);//分
ds1302_write_byte(ds1302_sec_add,time_buf[6]);//秒
ds1302_write_byte(ds1302_day_add,time_buf[7]);//周
ds1302_write_byte(ds1302_control_add,0x80);//翻开写保护
}
//***********************************************************************
// 从DS302读出时钟数据
//***********************************************************************
void ds1302_read_time(void)
{
time_buf[1]=ds1302_read_byte(ds1302_year_add);//年
time_buf[2]=ds1302_read_byte(ds1302_month_add);//月
time_buf[3]=ds1302_read_byte(ds1302_date_add);//日
time_buf[4]=ds1302_read_byte(ds1302_hr_add);//时
time_buf[5]=ds1302_read_byte(ds1302_min_add);//分
time_buf[6]=(ds1302_read_byte(ds1302_sec_add))&0x7F;//秒
time_buf[7]=ds1302_read_byte(ds1302_day_add);//周
}
//***********************************************************************
// DS302初始化函数
//***********************************************************************
void ds1302_init(void)
{
RST_CLR;//RST脚置低
SCK_CLR;//SCK脚置低
RST_OUT;//RST脚设置为输出
SCK_OUT;//SCK脚设置为输出
}
//***********************************************************************
//显现屏指令写入函数
//***********************************************************************
void LCD_write_com(unsigned char com)
{
RS_CLR;
RW_CLR;
EN_SET;
Data_IO = com;
delay_ms(5);
EN_CLR;
}
//***********************************************************************
//显现屏数据写入函数
//***********************************************************************
void LCD_write_data(unsigned char data)
{
RS_SET;
RW_CLR;
EN_SET;
Data_IO = data;
delay_ms(5);
EN_CLR;
}
//***********************************************************************
//显现屏清空显现
//***********************************************************************
void LCD_clear(void)
{
LCD_write_com(0x01);
delay_ms(5);
}
//***********************************************************************
//显现屏字符串写入函数
//***********************************************************************
void LCD_write_str(unsigned char x,unsigned char y,unsigned char *s)
{
if (y == 0)
{
LCD_write_com(0x80 + x);
}
else
{
LCD_write_com(0xC0 + x);
}
while (*s)
{
LCD_write_data( *s);
s ++;
}
}
//***********************************************************************
//显现屏单字符写入函数
//***********************************************************************
void LCD_write_char(unsigned char x,unsigned char y,unsigned char data)
{
if (y == 0)
{
LCD_write_com(0x80 + x);
}
else
{
LCD_write_com(0xC0 + x);
}
LCD_write_data( data);
}
//***********************************************************************
//显现屏初始化函数
//***********************************************************************
void LCD_init(void)
{
system_init();
LCD_write_com(0x38);//显现形式设置
delay_ms(5);
LCD_write_com(0x08);//显现封闭
delay_ms(5);
LCD_write_com(0x01);//显现清屏
delay_ms(5);
LCD_write_com(0x06);//显现光标移动设置
delay_ms(5);
LCD_write_com(0x0C);//显现开及光标设置
delay_ms(5);
}
//***********************************************************************
//主函数
//***********************************************************************
void main(void)
{
unsigned char temp;
delay_ms(200);
LCD_init(); //1602液晶初始化
ds1302_init(); //DS1302初始化
delay_ms(10);
ds1302_write_time(); //向DS1302写初始数据，如年月和时刻等
while (1)
{
delay_ms(200);
ds1302_read_time(); //读DS1302数据
temp = (time_buf[0] >> 4) + 0; //在LCD上写要显现的数据
LCD_write_char(0, 0, temp);/*年*/
temp = (time_buf[0] & 0x0F) + 0;
LCD_write_char(1, 0, temp);
temp = (time_buf[1] >> 4) + 0;
LCD_write_char(2, 0, temp);
temp = (time_buf[1] & 0x0F) + 0;
LCD_write_char(3, 0, temp);
LCD_write_char(4, 0, -);
temp = (time_buf[2] >> 4) + 0;
LCD_write_char(5, 0, temp);/*月*/
temp = (time_buf[2] & 0x0F) + 0;
LCD_write_char(6, 0, temp);
LCD_write_char(7, 0, -);
temp = (time_buf[3] >> 4) + 0;
LCD_write_char(8, 0, temp);/*日*/
temp = (time_buf[3] & 0x0F) + 0;
LCD_write_char(9, 0, temp);
temp = (time_buf[4] >> 4) + 0;
LCD_write_char(8, 1, temp);/*时*/
temp = (time_buf[4] & 0x0F) + 0;
LCD_write_char(9, 1, temp);
LCD_write_char(10, 1, :);
temp = (time_buf[5] >> 4) + 0;
LCD_write_char(11, 1, temp);/*分*/
temp = (time_buf[5] & 0x0F) + 0;
LCD_write_char(12, 1, temp);
LCD_write_char(13, 1, :);
temp = (time_buf[6] >> 4) + 0;
LCD_write_char(14, 1, temp);/*秒*/
temp = (time_buf[6] & 0x0F) + 0;
LCD_write_char(15, 1, temp);
}
}
