51單片機adxl345傳感器的計步器程序源碼

ID:307792 · 發(fā)表于 2018-4-25 11:25

稀缺資源
單片機源碼：

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