#include <REG51.H>
#include <math.h> //Keil library
#include <stdio.h> //Keil library
#include <INTRINS.H>
#include "DS1302.H"
#define uchar unsigned char
#define uint unsigned int
#define SYSTIM 20
//使用的端口,请按照以下接线
#define DataPort P0 //LCD1602数据端口
sbit SCL=P3^7; //IIC时钟引脚定义
sbit SDA=P3^6; //IIC数据引脚定义
sbit LCM_RS=P1^0; //LCD1602命令端口
sbit LCM_RW=P1^1; //LCD1602命令端口
sbit LCM_EN=P1^2; //LCD1602命令端口
//按键端口定义
sbit KEY_SET=P3^2;
sbit KEY_ADD=P3^3;
sbit KEY_MIN=P3^4;
//蜂鸣器端口定义
//sbit BEEP=P2^7;
#define SlaveAddress 0x3C //定义器件在IIC总线中的从地址
typedef unsigned char BYTE;
typedef unsigned short WORD;
BYTE BUF[8]; //接收数据缓存区
uchar ge,shi,bai,qian,wan; //显示变量
//uint start_A=50,stop_A=80; //报警区间
uchar SET_FLAG=0;
uchar sys_time=0;
uint angle1=0;
int dis_data; //变量
bit dis_flag=0;
unsigned char data TIME_Buffer[6]={0}; // 时间数据暂存数组
unsigned char LCD1602_Table[]="0123456789:-";
void delayms(unsigned int k);
void InitLcd();
void Init_HMC5883(void); //初始化5883
void WriteDataLCM(uchar dataW);
void WriteCommandLCM(uchar CMD,uchar Attribc);
void DisplayOneChar(uchar X,uchar Y,uchar DData);
void conversion(uint temp_data);
void Single_Write_HMC5883(uchar REG_Address,uchar REG_data); //单个写入数据
uchar Single_Read_HMC5883(uchar REG_Address); //单个读取内部寄存器数据
void Multiple_Read_HMC5883(); //连续的读取内部寄存器数据
//以下是模拟iic使用函数-------------
void Delay5us();
void Delay5ms();
void HMC5883_Start();
void HMC5883_Stop();
void HMC5883_SendACK(bit ack);
bit HMC5883_RecvACK();
void HMC5883_SendByte(BYTE dat);
BYTE HMC5883_RecvByte();
void HMC5883_ReadPage();
void HMC5883_WritePage();
//-----------------------------------
//*********************************************************
void conversion(uint temp_data)
{
wan=temp_data/10000+0x30 ;
temp_data=temp_data%10000; //取余运算
qian=temp_data/1000+0x30 ;
temp_data=temp_data%1000; //取余运算
bai=temp_data/100+0x30 ;
temp_data=temp_data%100; //取余运算
shi=temp_data/10+0x30 ;
temp_data=temp_data%10; //取余运算
ge=temp_data+0x30;
}
/*******************************/
void delayms(unsigned int k)
{
unsigned int i,j;
for(i=0;i<k;i++)
{
for(j=0;j<121;j++)
{;}}
}
/********************************/
void KEYSCAN()
{
if(!KEY_SET)
{
delayms(5);
if(!KEY_SET)
{
SET_FLAG++;
if(SET_FLAG==6)
{
SET_FLAG=0;
WRITE_DS1302(DS1302_WRITE_PROTECT,DS1302_WRITE_PROTECT_NO); //禁止写保护
WRITE_DS1302(WRITE_DS1302_YEAR,TIME_Buffer[0]); //年
WRITE_DS1302(WRITE_DS1302_MONTH,TIME_Buffer[1]); //月份
WRITE_DS1302(WRITE_DS1302_DAY,TIME_Buffer[2]); //日期
WRITE_DS1302(WRITE_DS1302_HOUR,TIME_Buffer[3]); //小时
WRITE_DS1302(WRITE_DS1302_MINUTE,TIME_Buffer[4]); //分
WRITE_DS1302(WRITE_DS1302_SECOND,TIME_Buffer[5]); //秒
WRITE_DS1302(DS1302_WRITE_PROTECT,DS1302_WRITE_PROTECT_OFF); //允许写保护
}
while(!KEY_SET);
}
}
if(!KEY_ADD)
{
delayms(5);
if(!KEY_ADD)
{
switch(SET_FLAG)
{
case 1:
if(TIME_Buffer[0]<99)
TIME_Buffer[0]++;
break;
case 2:
if(TIME_Buffer[1]<12)
TIME_Buffer[1]++;
break;
case 3:
if(TIME_Buffer[2]<31)
TIME_Buffer[2]++;
break;
case 4:
if(TIME_Buffer[3]<23)
TIME_Buffer[3]++;
break;
case 5:
if(TIME_Buffer[4]<59)
TIME_Buffer[4]++;
break;
default: break;
}
while(!KEY_ADD);
}
}
else if(!KEY_MIN)
{
delayms(5);
if(!KEY_MIN)
{
switch(SET_FLAG)
{
case 1:
if(TIME_Buffer[0]>0)
TIME_Buffer[0]--;
break;
case 2:
if(TIME_Buffer[1]>1)
TIME_Buffer[1]--;
break;
case 3:
if(TIME_Buffer[2]>1)
TIME_Buffer[2]--;
break;
case 4:
if(TIME_Buffer[3]>0)
TIME_Buffer[3]--;
break;
case 5:
if(TIME_Buffer[4]>0)
TIME_Buffer[4]--;
break;
default: break;
}
while(!KEY_MIN);
}
}
}
/*******************************/
void WaitForEnable(void)
{
DataPort=0xff;
LCM_RS=0;LCM_RW=1;_nop_();
LCM_EN=1;_nop_();_nop_();
while(DataPort&0x80);
LCM_EN=0;
}
/*******************************/
void WriteCommandLCM(uchar CMD,uchar Attribc)
{
if(Attribc)WaitForEnable();
LCM_RS=0;LCM_RW=0;_nop_();
DataPort=CMD;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/*******************************/
void WriteDataLCM(uchar dataW)
{
WaitForEnable();
LCM_RS=1;LCM_RW=0;_nop_();
DataPort=dataW;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/***********************************/
void InitLcd()
{
WriteCommandLCM(0x38,1);
WriteCommandLCM(0x08,1);
WriteCommandLCM(0x01,1);
WriteCommandLCM(0x06,1);
WriteCommandLCM(0x0c,1); //Angel time
DisplayOneChar(0,1,'A');
DisplayOneChar(1,1,'n');
DisplayOneChar(2,1,'g');
DisplayOneChar(3,1,'e');
DisplayOneChar(4,1,'l');
DisplayOneChar(5,1,':');
}
/***********************************/
void DisplayOneChar(uchar X,uchar Y,uchar DData)
{
Y&=1;
X&=15;
if(Y)X|=0x40;
X|=0x80;
WriteCommandLCM(X,0);
WriteDataLCM(DData);
}
/**************************************
延时5微秒(STC90C52RC@12M)
不同的工作环境,需要调整此函数,注意时钟过快时需要修改
当改用1T的MCU时,请调整此延时函数
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
void Delay5ms()
{
WORD n = 560;
while (n--);
}
/**************************************
起始信号
**************************************/
void HMC5883_Start()
{
SDA = 1; //拉高数据线
SCL = 1; //拉高时钟线
Delay5us(); //延时
SDA = 0; //产生下降沿
Delay5us(); //延时
SCL = 0; //拉低时钟线
}
/**************************************
停止信号
**************************************/
void HMC5883_Stop()
{
SDA = 0; //拉低数据线
SCL = 1; //拉高时钟线
Delay5us(); //延时
SDA = 1; //产生上升沿
Delay5us(); //延时
}
/**************************************
发送应答信号
入口参数:ack (0:ACK 1:NAK)
**************************************/
void HMC5883_SendACK(bit ack)
{
SDA = ack; //写应答信号
SCL = 1; //拉高时钟线
Delay5us(); //延时
SCL = 0; //拉低时钟线
Delay5us(); //延时
}
/**************************************
接收应答信号
**************************************/
bit HMC5883_RecvACK()
{
SCL = 1; //拉高时钟线
Delay5us(); //延时
CY = SDA; //读应答信号
SCL = 0; //拉低时钟线
Delay5us(); //延时
return CY;
}
/**************************************
向IIC总线发送一个字节数据
**************************************/
void HMC5883_SendByte(BYTE dat)
{
BYTE i;
for (i=0; i<8; i++) //8位计数器
{
dat <<= 1; //移出数据的最高位
SDA = CY; //送数据口
SCL = 1; //拉高时钟线
Delay5us(); //延时
SCL = 0; //拉低时钟线
Delay5us(); //延时
}
HMC5883_RecvACK();
}
/**************************************
从IIC总线接收一个字节数据
**************************************/
BYTE HMC5883_RecvByte()
{
BYTE i;
BYTE dat = 0;
SDA = 1; //使能内部上拉,准备读取数据,
for (i=0; i<8; i++) //8位计数器
{
dat <<= 1;
SCL = 1; //拉高时钟线
Delay5us(); //延时
dat |= SDA; //读数据
SCL = 0; //拉低时钟线
Delay5us(); //延时
}
return dat;
}
//***************************************************
void Single_Write_HMC5883(uchar REG_Address,uchar REG_data)
{
HMC5883_Start(); //起始信号
HMC5883_SendByte(SlaveAddress); //发送设备地址+写信号
HMC5883_SendByte(REG_Address); //内部寄存器地址,请参考中文pdf
HMC5883_SendByte(REG_data); //内部寄存器数据,请参考中文pdf
HMC5883_Stop(); //发送停止信号
}
//********单字节读取内部寄存器*************************
uchar Single_Read_HMC5883(uchar REG_Address)
{ uchar REG_data;
HMC5883_Start(); //起始信号
HMC5883_SendByte(SlaveAddress); //发送设备地址+写信号
HMC5883_SendByte(REG_Address); //发送存储单元地址,从0开始
HMC5883_Start(); //起始信号
HMC5883_SendByte(SlaveAddress+1); //发送设备地址+读信号
REG_data=HMC5883_RecvByte(); //读出寄存器数据
HMC5883_SendACK(1);
HMC5883_Stop(); //停止信号
return REG_data;
}
//******************************************************
//
//连续读出HMC5883内部角度数据,地址范围0x3~0x5
//
//******************************************************
void Multiple_read_HMC5883(void)
{ uchar i;
HMC5883_Start(); //起始信号
HMC5883_SendByte(SlaveAddress); //发送设备地址+写信号
HMC5883_SendByte(0x03); //发送存储单元地址,从0x32开始
HMC5883_Start(); //起始信号
HMC5883_SendByte(SlaveAddress+1); //发送设备地址+读信号
for (i=0; i<6; i++) //连续读取6个地址数据,存储中BUF
{
BUF = HMC5883_RecvByte(); //BUF[0]存储0x32地址中的数据
if (i == 5)
{
HMC5883_SendACK(1); //最后一个数据需要回NOACK
}
else
{
HMC5883_SendACK(0); //回应ACK
}
}
HMC5883_Stop(); //停止信号
Delay5ms();
}
//显示区间子程序
void DISPLAY()
{
sys_time++;
if(sys_time>=SYSTIM)
{
sys_time=0;
dis_flag=~ dis_flag;
}
if(SET_FLAG==0)
{
TIME_Buffer[0]=READ_DS1302(READ_DS1302_YEAR);
TIME_Buffer[1]=READ_DS1302(READ_DS1302_MONTH);
TIME_Buffer[2]=READ_DS1302(READ_DS1302_DAY);
TIME_Buffer[3]=READ_DS1302(READ_DS1302_HOUR);
TIME_Buffer[4]=READ_DS1302(READ_DS1302_MINUTE);
TIME_Buffer[5]=READ_DS1302(READ_DS1302_SECOND);
}
if(SET_FLAG==1&&dis_flag)
{
DisplayOneChar(1,0,' ');
DisplayOneChar(2,0,' ');
}
else
{
DisplayOneChar(1,0,LCD1602_Table[TIME_Buffer[0]/10]);
DisplayOneChar(2,0,LCD1602_Table[TIME_Buffer[0]%10]);
}
DisplayOneChar(3,0,'/');
if(SET_FLAG==2&&dis_flag)
{
DisplayOneChar(4,0,' ');
DisplayOneChar(5,0,' ');
}
else
{
DisplayOneChar(4,0,LCD1602_Table[TIME_Buffer[1]/10]);
DisplayOneChar(5,0,LCD1602_Table[TIME_Buffer[1]%10]);
}
DisplayOneChar(6,0,'/');
if(SET_FLAG==3&&dis_flag)
{
DisplayOneChar(7,0,' ');
DisplayOneChar(8,0,' ');
}
else
{
DisplayOneChar(7,0,LCD1602_Table[TIME_Buffer[2]/10]);
DisplayOneChar(8,0,LCD1602_Table[TIME_Buffer[2]%10]);
}
DisplayOneChar(9,0,' ');
if(SET_FLAG==4&&dis_flag)
{
DisplayOneChar(10,0,' ');
DisplayOneChar(11,0,' ');
}
else
{
DisplayOneChar(10,0,LCD1602_Table[TIME_Buffer[3]/10]);
DisplayOneChar(11,0,LCD1602_Table[TIME_Buffer[3]%10]);
}
if((TIME_Buffer[5]%2)==0)
DisplayOneChar(12,0,':');
|