STC15W408AS单片机+DS3231+OLED便携式锂电池手表制作附程序 -

#include "reg51.h"
#include "intrins.h"
#include "codetab.h"
#define uint unsigned int
#define uchar unsigned char
// ------------------------------------------------------------
// IO口模拟I2C通信
// ------------------------------------------------------------
sbit SCL=P1^2; //串行时钟
sbit SDA=P1^3; //串行数据
sbit KEY1= P1^5; //调整
sbit KEY2= P1^4; //++
sbit KEY3= P1^6; //--
uchar a1,a2,a3; //按键消斗用
uchar disflag=0; //时间调整相关
#define Brightness 0xcf //
#define X_WIDTH 128
#define Y_WIDTH 64
/********************************************************************************************************
** DS3231常数定义
********************************************************************************************************/
#define DS3231_WriteAddress 0xD0 //器件写地址
#define DS3231_ReadAddress 0xD1 //器件读地址
#define DS3231_SECOND 0x00 //秒
#define DS3231_MINUTE 0x01 //分
#define DS3231_HOUR 0x02 //时
#define DS3231_WEEK 0x03 //星期
#define DS3231_DAY 0x04 //日
#define DS3231_MONTH 0x05 //月
#define DS3231_YEAR 0x06 //年
#define NACK 1
#define ACK 0
char hour,minute,second,year,month,day,week;
uchar TH3231;
bit ack; //应答标志位
/*********************OLED驱动程序用的延时程序************************************/
/*void delay(unsigned int z)
{
unsigned int x,y;
for(x=z;x>0;x--)
for(y=1100;y>0;y--);
} */
void Delay5US() //@12.000MHz 延时5us
{
_nop_(); _nop_(); _nop_();_nop_();
}
/**********************************************
//IIC Start
**********************************************/
void IIC_Start()
{
SCL = 1;
SDA = 1;
SDA = 0;
SCL = 0;
}
/**********************************************
//IIC Stop
**********************************************/
void IIC_Stop()
{
SCL = 0;
SDA = 0;
SCL = 1;
SDA = 1;
}
/********************************************************************************************************
** 3231
********************************************************************************************************/
uchar BCD2HEX(uchar val)
{
return ((val>>4)*10)+(val&0x0f);
}
uchar HEX2BCD(uchar val)
{
return (((val%100)/10)<<4)|(val%10);
}
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位
{
if((c<<BitCnt)&0x80)
SDA=1; //判断发送位
else
SDA=0;
SCL=1; //置时钟线为高，通知被控器开始接收数据位
Delay5US(); //保证时钟高电平周期大于4μs
SCL=0;
}
SDA=1; //8位发送完后释放数据线，准备接收应答位
SCL=1;
Delay5US();
if(SDA==1)
ack=0;
else
ack=1; //判断是否接收到应答信号
SCL=0;
Delay5US();
}
uchar RcvByte()
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; //置数据线为输入方式
for(BitCnt=0;BitCnt<8;BitCnt++)
{
SCL=0; //置时钟线为低，准备接收数据位
Delay5US(); //时钟低电平周期大于4.7μs
SCL=1; //置时钟线为高使数据线上数据有效
Delay5US();
retc=retc<<1;
if(SDA==1)
retc=retc+1; //读数据位,接收的数据位放入retc中
Delay5US();
}
SCL=0;
return(retc);
}
void Ack_I2C(bit a)
{
SDA = a;
SCL=1;
Delay5US(); //时钟低电平周期大于4us
SCL=0; //清时钟线，钳住I2C总线以便继续接收
Delay5US();
}
uchar write_byte(uchar addr, uchar write_data)
{
IIC_Start();
SendByte(DS3231_WriteAddress);
if (ack == 0)
return 0;
SendByte(addr);
if (ack == 0)
return 0;
SendByte(write_data);
if (ack == 0)
return 0;
IIC_Stop();
Delay5US();
Delay5US();
return 1;
}
uchar read_current()
{
uchar read_data;
IIC_Start();
SendByte(DS3231_ReadAddress);
if(ack==0)
return(0);
read_data = RcvByte();
Ack_I2C(1);
IIC_Stop();
return read_data;
}
uchar read_random(uchar random_addr)
{
uchar Tmp;
IIC_Start();
SendByte(DS3231_WriteAddress);
if(ack==0)
return(0);
SendByte(random_addr);
if(ack==0)
return(0);
Tmp=read_current();
if(random_addr==DS3231_HOUR)
Tmp&=0x3f;
return(BCD2HEX(Tmp));//都转10进制输出
}
void ModifyTime(uchar address,uchar num)
{
uchar temp=0;
if(address>6 && address <0) return;
temp=HEX2BCD(num);
write_byte(address,temp);
}
uint read_temp()
{
int itemp;
float ftemp;
//温度数据是以2 进制格式存储的并不需要数制转换
write_byte(0x0e,0x20);//0x0e寄存器的CONV位置1开启温度转换
itemp = ( (int) read_random(0x11) << 5 ); //放大32倍
itemp += ( read_random(0x12)>> 3);
IIC_Stop();
if(itemp & 0x1000)
itemp += 0xe000;
ftemp = 0.3125 * (float) itemp+0.5; //放大10倍
return (uint) ftemp;
}
/*********************OLED写数据************************************/
void OLED_WrDat(unsigned char IIC_Data)
{
IIC_Start();
SendByte(0x78);
SendByte(0x40); //write data
SendByte(IIC_Data);
IIC_Stop();
}
/*********************OLED写命令************************************/
void OLED_WrCmd(unsigned char IIC_Command)
{
IIC_Start();
SendByte(0x78); //Slave address,SA0=0
SendByte(0x00); //write command
SendByte(IIC_Command);
IIC_Stop();
}
/*********************OLED 设置坐标************************************/
void OLED_Set_Pos(unsigned char x, unsigned char y)
{
……………………
…………限于本文篇幅余下代码请从51黑下载附件…………

复制代码