[资料分享] 最近闲来无事，调试了一下时钟芯片DS1302程序，挺好使

调试好使的程序。

以下是调试的主要程序：

#include<avr/io.h>
#include<util/delay.h>
#include "HW.h"

//#define BURST_MODE

#define DS1302_DDR   DDRB
#define DS1302_PORT  PORTB
#define DS1302_PIN   PINB
#define DS1302_DDRCS   DDRD
#define DS1302_PORTCS  PORTD
#define DS1302_CK    PB7
#define DS1302_IO   PB6
#define DS1302_CE   PD2

#define delay_bus(x) _delay_loop_1(x*2)

static inline void ds1302_select(void)
{
  DS1302_PORTCS|=BIT(DS1302_CE);
  delay_bus(2);
}

static inline void ds1302_unselect(void)
{
  DS1302_PORTCS&=~BIT(DS1302_CE);
  delay_bus(2);
}

//实现读一字节时序
static uint8_t ds1302_read_byte(void)
{
  uint8_t i,ret=0;
 
  for(i=0;i<8;i++)
  {
    ret>>=1;
   
    if(DS1302_PIN & BIT(DS1302_IO))
      ret|=0x80;
   
    //给一脉冲
    DS1302_PORT|=BIT(DS1302_CK); 
    delay_bus(1); 
    DS1302_PORT&=~BIT(DS1302_CK);
   
    delay_bus(1);
  }
  return ret;
}

//实现写一字节时序
static void ds1302_write_byte(uint8_t dat)
{
  uint8_t i;
 
  //IO口设置为输出
  DS1302_DDR|=BIT(DS1302_IO);
  DS1302_PORT&=~BIT(DS1302_IO);

  for(i=0;i<8;i++)
  {
    //设置好数据口
    if(dat& 0x01)
      DS1302_PORT|=BIT(DS1302_IO);
    else
      DS1302_PORT&=~BIT(DS1302_IO);
     
    delay_bus(1);
   
    //给一脉冲
    DS1302_PORT|=BIT(DS1302_CK);
    delay_bus(1); 
    DS1302_PORT&=~BIT(DS1302_CK);
   
    dat>>=1; 
  } 
  //IO口恢复到输入状态
  DS1302_PORT&=~BIT(DS1302_IO); 
  DS1302_DDR&=~BIT(DS1302_IO);
 
  delay_bus(1);
}

//读寄存器 addr: 0~8
uint8_t rtc_read_reg(uint8_t addr)
{
  uint8_t ret;
 
  addr<<=1;
  addr|=0x81;
 
  ds1302_select();
  ds1302_write_byte(addr);
  ret=ds1302_read_byte();
  ds1302_unselect();
 
  return ret;
}

//写寄存器
void rtc_write_reg(uint8_t addr,uint8_t dat)
{
  addr<<=1;
  addr|=0x80;
 
  ds1302_select();
  ds1302_write_byte(addr);
  ds1302_write_byte(dat);
  ds1302_unselect();
}

//读RAM
//在多字节(BURST)模式下读取 x 长度的数据到buf指向的存储区
//在单字节模式下从地址为x(0~31)的RAM中读一字节存储到buf处
void rtc_read_ram(uint8_t x,uint8_t *buf)
{
#ifdef BURST_MODE
  uint8_t i;
 
  ds1302_select();
  ds1302_write_byte(0xff); //read burts ram
  for(i=0;i<x;i++)
   buf=ds1302_read_byte();
  ds1302_unselect();
#else
  x<<=1;
  x|=0xc1;
 
  ds1302_select();
  ds1302_write_byte(x);
  *buf=ds1302_read_byte();
  ds1302_unselect();
#endif 
}