|
|
#include <REG52.H>
#include <INTRINS.H>
#define uchar unsigned char
#define uint unsigned int
#define DataPort P0 //LCD1602數據端口
sbit SCL=P3^5; //IIC時鐘引腳定義;
sbit SDA=P3^4; //IIC數據引腳定義
uchar code table_num[]="0123456789abcdefg";
/* *********** LCD1602設置 *************/
sbit rs=P2^5; //寄存器選擇信號 H:數據寄存器 L:指令寄存器
sbit rw=P2^6; //寄存器選擇信號 H:數據寄存器 L:指令寄存器
sbit e =P2^7; //片選信號 下降沿觸發
/* ***********清零按鍵設置 ********/
sbit key1 = P3^6;
sbit key2 = P3^7;
sbit key3 = P1^2;
#define SlaveAddress 0xA6 /*定義器件在IIC總線中的從地址,根據ALT ADDRESS地址引腳不同修改ALT ADDRESS引腳接地時地址為0xA6，接電源時地址為0x3A*/
long bushu,zong; //步數
uchar BUF[8]; //接收數據緩存區
uchar ge,shi,bai,qian,wan; //顯示變量
int dis_data; //變量
int c;
int s;
int h=30.5;
void Multiple_Read_ADXL345(); //連續的讀取內部寄存器數據
#define RdCommand 0x01 //定義ISP的操作命令
#define PrgCommand 0x02
#define EraseCommand 0x03
#define Error 1
#define Ok 0
#define WaitTime 0x01 //定義CPU的等待時間
sfr ISP_DATA=0xe2; //寄存器申明
sfr ISP_ADDRH=0xe3;
sfr ISP_ADDRL=0xe4;
sfr ISP_CMD=0xe5;
sfr ISP_TRIG=0xe6;
sfr ISP_CONTR=0xe7;
uchar a_a;
/**************打開 ISP,IAP 功能 ********* */
void ISP_IAP_enable(void)
{
EA = 0; //關中斷
ISP_CONTR = ISP_CONTR & 0x18; // 0001,1000
ISP_CONTR = ISP_CONTR | WaitTime; // 寫入硬件延時
ISP_CONTR = ISP_CONTR | 0x80; // ISPEN=1
}
/************** 關閉 ISP,IAP 功能 *************** */
void ISP_IAP_disable(void)
{
ISP_CONTR = ISP_CONTR & 0x7f; // ISPEN = 0
ISP_TRIG = 0x00;
EA = 1; // 開中斷
}
/*****************公用的觸發代碼********* */
void ISPgoon(void)
{
ISP_IAP_enable(); //打開 ISP,IAP 功能
ISP_TRIG = 0x46; //觸發ISP_IAP命令字節1
ISP_TRIG = 0xb9; //觸發ISP_IAP命令字節2
_nop_();
}
/**********字節讀 *********** */
unsigned char byte_read(unsigned int byte_addr)
{
EA = 0;
ISP_ADDRH = (unsigned char)(byte_addr >> 8); // 地址賦值
ISP_ADDRL = (unsigned char)(byte_addr & 0x00ff);
ISP_CMD = ISP_CMD & 0xf8; //清除低3位
ISP_CMD = ISP_CMD | RdCommand; // 寫入讀命令
ISPgoon(); //觸發執行
ISP_IAP_disable(); // 關閉ISP,IAP功能
EA = 1;
return (ISP_DATA); // 返回讀到的數據
}
/************ 扇區擦除*********** */
void SectorErase(unsigned int sector_addr)
{
unsigned int iSectorAddr;
iSectorAddr = (sector_addr & 0xfe00); // 取扇區地址
ISP_ADDRH = (unsigned char)(iSectorAddr >> 8);
ISP_ADDRL = 0x00;
ISP_CMD = ISP_CMD & 0xf8; //清空低3位
ISP_CMD = ISP_CMD | EraseCommand; //擦除命令3
ISPgoon(); //觸發執行
ISP_IAP_disable(); //關閉ISP,IAP功能
}
/********** 字節寫 ******* */
void byte_write(unsigned int byte_addr, unsigned char original_data)
{
EA = 0;
// SectorErase(byte_addr);
ISP_ADDRH = (unsigned char)(byte_addr >> 8); // 取地址
ISP_ADDRL = (unsigned char)(byte_addr & 0x00ff);
ISP_CMD = ISP_CMD & 0xf8; // 清低3位
ISP_CMD = ISP_CMD | PrgCommand; //寫命令2
ISP_DATA = original_data; //寫入數據準備
ISPgoon(); //觸發執行
ISP_IAP_disable(); //關閉IAP功能
EA =1;
}
/**********把數據保存到單片機內部eeprom中**************/
void write_eeprom() //保存數據
{
SectorErase(0x2000);
byte_write(0x2000, bushu);
byte_write(0x2001, bushu >> 8);
byte_write(0x2002, bushu >> 16);
byte_write(0x2003, zong);
byte_write(0x2004, zong >> 8);
byte_write(0x2005, zong >> 16);
byte_write(0x2055, a_a);
}
/******************把數據從單片機內部eeprom中讀出來*****************/
void read_eeprom() //讀出保存數據
{
bushu = byte_read(0x2002);
bushu <<= 8;
bushu |= byte_read(0x2001);
bushu <<= 8;
bushu |= byte_read(0x2000);
zong = byte_read(0x2005);
zong <<= 8;
zong |= byte_read(0x2004);
zong <<= 8;
zong |= byte_read(0x2003);
a_a = byte_read(0x2055);
}
/**************開機自檢eeprom初始化*****************/
void init_eeprom() //開始初始化保存的數據
{
read_eeprom(); //讀出保存數據
if(a_a != 14) //新的單片機初始單片機內問eeprom
{
zong = 0;
bushu = 0;
a_a = 14;
write_eeprom(); //保存數據
}
}
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 delay_1ms(uint q)
{
uint i,j;
for(i=0;i<q;i++)
for(j=0;j<120;j++);
}
void delay_uint(uint q)
{
while(q--);
}
void write_com(uchar com)
{
e=0;
rs=0;
rw=0;
P0=com;
delay_uint(25);
e=1;
delay_uint(100);
e=0;
}
void write_data(uchar dat)
{
e=0;
rs=1;
rw=0;
P0=dat;
delay_uint(25);
e=1;
delay_uint(100);
e=0;
}
/***********lcd1602上顯示十進制數************/
void write_bushu(uchar hang,uchar add,long date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
if(date >= 1000000)
write_data(0x30+date/1000000%10);
if(date >= 100000)
write_data(0x30+date/100000%10);
if(date >= 10000)
write_data(0x30+date/10000%10);
if(date >= 1000)
write_data(0x30+date/1000%10);
if(date >= 100)
write_data(0x30+date/100%10);
if(date >= 10)
write_data(0x30+date/10%10);
write_data(0x30+date%10);
}
/*************lcd1602上顯示這字符函數**************/
void write_string(uchar hang,uchar add,uchar *p)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
while(1)
{
if(*p == '\0') break;
write_data(*p);
p++;
}
}
/***********lcd1602初始化設置*************/
void init_1602() //lcd1602初始化
{
write_com(0x38);
write_com(0x0c);
write_com(0x06);
delay_uint(1000);
write_string(1,0,"B:0 Z:0 ");
write_string(2,0,"S:0 C:0 ");
}
/**********lcd1602上顯示特定的字符***********/
void write_zifu(uchar hang,uchar add,uchar date)
{
if(hang==1)
write_com(0x80+add);
else
write_com(0x80+0x40+add);
write_data(date);
}
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
void Delay5ms()
{
uint n = 560;
while (n--);
}
/*********起始信號************/
void ADXL345_Start()
{
SDA = 1; //拉高數據線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 0; //產生下降沿
Delay5us(); //延時
SCL = 0; //拉低時鐘線
}
/******停止信號********/
void ADXL345_Stop()
{
SDA = 0; //拉低數據線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 1; //產生上升沿
Delay5us(); //延時
}
/********發送應答信號 入口參數:ack (0:ACK 1:NAK)**********/
void ADXL345_SendACK(bit ack)
{
SDA = ack; //寫應答信號
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SCL = 0; //拉低時鐘線
Delay5us(); //延時
}
/**************************************
接收應答信號
**************************************/
bit ADXL345_RecvACK()
{
SCL = 1; //拉高時鐘線
Delay5us(); //延時
CY = SDA; //讀應答信號
SCL = 0; //拉低時鐘線
Delay5us(); //延時
return CY;
}
/**************************************
向IIC總線發送一個字節數據
**************************************/
void ADXL345_SendByte(uchar dat)
{
uchar i;
for (i=0; i<8; i++) //8位計數器
{
dat <<= 1; //移出數據的最高位
SDA = CY; //送數據口
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SCL = 0; //拉低時鐘線
Delay5us(); //延時
}
ADXL345_RecvACK();
}
/*************從IIC總線接收一個字節數據*******/
uchar ADXL345_RecvByte()
{
uchar i;
uchar 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_ADXL345(uchar REG_Address,uchar REG_data)
{
ADXL345_Start(); //起始信號
ADXL345_SendByte(SlaveAddress); //發送設備地址+寫信號
ADXL345_SendByte(REG_Address); //內部寄存器地址，參考中文pdf22頁
ADXL345_SendByte(REG_data); //內部寄存器數據，參考中文pdf22頁
ADXL345_Stop(); //發送停止信號
}
//********單字節讀取************//
uchar Single_Read_ADXL345(uchar REG_Address)
{ uchar REG_data;
ADXL345_Start(); //起始信號
ADXL345_SendByte(SlaveAddress); //發送設備地址+寫信號
ADXL345_SendByte(REG_Address); //發送存儲單元地址，從0開始
ADXL345_Start(); //起始信號
ADXL345_SendByte(SlaveAddress+1); //發送設備地址+讀信號
REG_data=ADXL345_RecvByte(); //讀出寄存器數據
ADXL345_SendACK(1);
ADXL345_Stop(); //停止信號
return REG_data;
}
//*****連續讀出ADXL345內部加速度數據，地址范圍0x32~0x37*****//
void Multiple_read_ADXL345(void)
{ uchar i;
ADXL345_Start(); //起始信號
ADXL345_SendByte(SlaveAddress); //發送設備地址+寫信號
ADXL345_SendByte(0x32); //發送存儲單元地址，從0x32開始
ADXL345_Start(); //起始信號
ADXL345_SendByte(SlaveAddress+1); //發送設備地址+讀信號
for (i=0; i<6; i++) //連續讀取6個地址數據，存儲中BUF
{
BUF[ i] = ADXL345_RecvByte(); //BUF[0]存儲0x32地址中的數據
if (i == 5)
{
ADXL345_SendACK(1); //最后一個數據需要回NOACK
}
else
{
ADXL345_SendACK(0); //回應ACK
}
}
ADXL345_Stop(); //停止信號
Delay5ms();
}
//******初始化ADXL345，根據需要請參考pdf進行修改***//
void Init_ADXL345()
{
Single_Write_ADXL345(0x31,0x0B); //測量范圍,正負16g，13位模式
Single_Write_ADXL345(0x2C,0x08); //速率設定為12.5 參考pdf13頁
Single_Write_ADXL345(0x2D,0x08); //選擇電源模式 參考pdf24頁
Single_Write_ADXL345(0x2E,0x80); //使能 DATA_READY 中斷
Single_Write_ADXL345(0x1E,0x00); //X 偏移量 根據測試傳感器的狀態寫入pdf29頁
Single_Write_ADXL345(0x1F,0x00); //Y 偏移量 根據測試傳感器的狀態寫入pdf29頁
Single_Write_ADXL345(0x20,0x05); //Z 偏移量 根據測試傳感器的狀態寫入pdf29頁
}
//*******顯示x軸*******//
void display_y()
{
static uchar flag_en,flag_fu;
float temp;
dis_data=(BUF[3]<<8)+BUF[2]; //合成數據
if(dis_data<0)
{
dis_data=-dis_data;
flag_fu = 1;
}
else
{
flag_en = 1;
flag_fu = 0;
}
temp=(float)dis_data*3.9; //計算數據和顯示,查考ADXL345快速入門第4頁
if(temp > 100) //步數加1
{
if((flag_en == 1) && (flag_fu == 1))
{
flag_en = 0;
bushu ++;
zong ++;
s=bushu*h;
c=bushu*1.5;
write_eeprom(); //保存數據
write_bushu(1,2,bushu); //顯示步數
write_bushu(1,11,zong); //顯示總步數
write_bushu(2,2,s);
write_bushu(2,11,c);
}
}
if(temp < 70)
{
flag_en = 1;
}
}
//******按鍵控制程序*******//
void key()
{
if(key1 == 0)
{
delay_1ms(1);
if(key1 == 0)
{
zong = 0;
write_string(1,11," ");
write_bushu(1,2,bushu); //顯示步數
write_bushu(1,11,zong); //顯示總步數
write_eeprom(); //保存數據
}
while(key1 == 0); //松手檢測
}
if(key2 == 0)
{
delay_1ms(1);
if(key2 == 0)
{
bushu = 0;
write_string(1,2," ");
write_bushu(1,2,bushu); //顯示步數
write_bushu(1,11,zong); //顯示總步數
write_eeprom(); //保存數據
}
while(key2 == 0); //松手檢測
}
}
//******主程序********//
void main()
{
static uint flag_value;
uchar devid;
init_1602(); //lcd1602初始化
Init_ADXL345(); //初始化ADXL345
devid=Single_Read_ADXL345(0X00); //讀出的數據為0XE5,表示正確
delay_1ms(20);
init_eeprom(); //開始初始化保存的數據
write_bushu(1,11,zong); //顯示總步數
bushu=0;
while(1) //循環
{
if(key3==0)
{delay_1ms(1);
if(key3==0)
h=h+1.5;}
if(h==38)
{ h=30.5;}
key(); //按鍵程序
flag_value ++;
if(flag_value >= 100) //100ms
{
flag_value = 0;
Init_ADXL345(); //初始化ADXL345
devid=Single_Read_ADXL345(0X00); //讀出的數據為0XE5,表示正確
if(devid!=0XE5)
{
write_string(2,11,"error");
}
else
{
Multiple_Read_ADXL345(); //連續讀出數據，存儲在BUF中
display_y(); //---------顯示Y軸
}
}
delay_1ms(1); //延時
}
}
|
|
