#include <reg52.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long
sbit RS=P1^0; //LCD命令/數據端
sbit RW=P1^1; //LCD讀/寫端
sbit LCDE=P1^2; //LCD使能端
sbit MCP_CS=P2^2; //MCP3001與AT89S52的管腳接線定義
sbit MCP_DO=P2^0;
sbit MCP_CLK=P2^1;
uint measure;
uchar flag; //Busy標志
uchar code dis[]={"Measure Start"}; //顯示
uchar code dis1[] = {"Distance:"};
uchar code dis2[] = {"0123456789.cm"}; //顯示代碼
uchar code dis3[]={"Out Measure!"}; //顯示
uchar dis_buf[6]; //顯示緩沖區
void L_delay(void); //短延時
void delay_ms(uint n); //延時函數
uint read_MCP(void); //讀MCP3001
void init_1602(void); //1602初始化函數
void busy(void); //寫數據子函數
void dat_wrt(uchar dat);
void cmd_wrt(uchar smd); //寫命令子函數
uint distance(void); //距離計算函數
void lcd_start(uchar start); //設定顯示位置函數
void LCD_Clear(void);
uchar dat_adj(uint dat1); //顯示數據調整函數
void print(uchar *str); //字符串顯示函數
void disp(uint dat); //顯示子函數
uint average(void); //算術平均濾波程序
void main()
{
init_1602();
print(dis); //顯示測量開始
delay_ms(1000);
while(1)
{
measure=distance();
disp(measure); //顯示高度
delay_ms(100);
}
}
/**************************延時函數**************************/
void delay_ms(uint n)
{
uint j;
while(n--)
{
for(j=0;j<125;j++);
}
}
/***************************短延時****************************/
void L_delay(void)
{
uchar i;
for(i=0;i<5;i++)
_nop_();
}
/************************讀MCP3001函數*************************/
uint read_MCP(void) // read_MCP 采集的數據并轉換后的值
{
uchar i;
uint temp=0;
MCP_CS=1;
L_delay();
MCP_CS=0; //CS置低,開始采樣數據
for(i=0;i<13;i++) //讀轉換的10位數據
{
MCP_CLK=0;
L_delay();
MCP_CLK=1;
temp<<=1;
if(MCP_DO==1)temp|=0x01;
}
MCP_CS=1;
temp&=0x03ff; //獲取有效轉換值
return(temp);
}
/************************LCD忙標志判斷函數******************/
void busy(void)
{
flag=0x80; //賦初值 高位為1 禁止
while (flag&0x80) //讀寫操作使能位禁止時等待 繼續檢測
{
P0=0xff;
RS=0; //指向地址計數器
RW=1; //讀
LCDE=1; //信號下降沿有效
flag=P0; //讀狀態位元 高位為狀態
LCDE=0;
}
} /***********************寫數據子函數************************/
void dat_wrt(uchar dat)
{
busy(); //檢測 讀寫操作使能嗎
LCDE=0;
RS=1; //指向數據寄存器
RW=0; //寫
P0=dat; //寫數據
LCDE=1; //高電平有效
LCDE=0;
}
/*************************寫命令子函數************************/
void cmd_wrt(uchar cmd)
{
LCDE=0;
busy(); //檢測 讀寫操作使能嗎
P0=cmd; //命令
RS=0; //指向命令計數器
RW=0; //寫
LCDE=1; //高電平有效
LCDE=0;
}
/***********************距離計算函數***************************/
uint distance(void)
{
uint temp1;
temp1=average(); //temp1 平均數據轉換的距離////////////////////////////////////
if((temp1>160)&(temp1<960)) //在正常測量范圍?
{
temp1=13569/(temp1+7)-4; //轉換測量數據
}
else
{
temp1=0x00ff; //超出測量范圍,返回錯誤標志
}
return(temp1);
}
/************************算術平均濾波程序**********************/
uint average(void)
{
uchar i;
uint av_dat; //av_dat 平均數據
ulong ave=0;
for(i=0;i<10;i++) //連續讀取10個數據值
{
ave+=read_MCP(); //讀轉換數據
L_delay();
}
av_dat=(uint)(ave/10); //求平均值
return(av_dat);
}
/*************************1602初始化函數**********************/
void init_1602(void)
{
cmd_wrt(0x01); //清屏
cmd_wrt(0x0c); //開顯示,不顯示游標,不閃爍
cmd_wrt(0x06); //完成一個字符碼傳送后,光標左移,顯示不發生移位元
cmd_wrt(0x38); //16×2顯示,5×7點陣,8位數據接口
}
/************************設定顯示位置函數************************/
void lcd_start(uchar start)
{
cmd_wrt(start|0x80);
}
/***********************LCD清屏函數***************************/
void LCD_Clear(void)
{
cmd_wrt(0x01); //寫入清屏指令
delay_ms(1);
}
/************************顯示數據調整函數************************/
uchar dat_adj(uint dat1) //dat1 L距離
{
uchar i;
//date=average()/2;
dis_buf[0]=(uchar)(dat1/10); //十位
dis_buf[1]=(uchar)(dat1%10); //個位
dis_buf[2]=11;
dis_buf[3]=12;
if(dis_buf[0]==0)
i=1;
return(i);
}
/**************************字符串顯示函數**************************/
void print(uchar *str)
{
while(*str!='\0') //直到字符串結束
{
dat_wrt(*str);
str++; //指向下一個字符
}
}
/***************************顯示子函數****************************/
void disp(uint dat)
{
uchar temp,j;
if(dat!=0x00ff)
{
temp=dat_adj(dat);
LCD_Clear();
lcd_start(0x00);
print(dis1);
lcd_start(0x45+temp);
for(j=temp;j<4;j++);
dat_wrt(dis2[dis_buf[j]]);
}
else
{
LCD_Clear();
lcd_start(0x42+temp);
print(dis3);
}
}
|