#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,':');
|