#include<reg52.h>
#include <intrins.h>
#define ulong unsigned long
#define uchar unsigned char
#define uint unsigned int
#define LCD1602_PORT P1
#define PCF8591 0x90
#define NOP() _nop_()
#define _Nop() _nop_()
sbit SCL=P2^1;
sbit SDA=P2^0;
sbit LCD1602_RS = P2^5;
sbit LCD1602_RW = P2^4;
sbit LCD1602_EN = P2^3;
bit ack;
sbit key1= P0^4;
sbit key2 = P0^5;
sbit buzz = P2^6;
void delay_ms(uint n)
{
unsigned int i,j;
for(i=0;i<n;i++)
for(j=0;j<123;j++);
}
/*應答標志位*/
// 變量定義
uchar AD_CHANNEL;
ulong xdata LedOut[8]; //單片機內部存取器
ulong f,a,cj,v;
uchar date;
// 函數申明
extern bit ack; //起動總線函數
extern void Start_I2c(); //結束總線函數
extern void Stop_I2c(); //應答子函數
extern void Ack_I2c(bit a); //字節數據發送函數
extern void SendByte(uchar c); //有子地址發送多字節數據函數
extern bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no) ; //無子地址發送多字節數據函數
extern bit ISendStrExt(uchar sla,uchar *s,uchar no); //無子地址讀字節數據函數
extern uchar RcvByte();
void LCD1602_delay_ms(uint n);
void LCD1602_write_com(uchar com);
void LCD1602_write_data(ulong dat);
void LCD1602_write_word(uchar *s);
void Init_LCD1602();
bit ISendByte(uchar sla,uchar c);
uchar IRcvByte(uchar sla);
//MS延時函數(12M晶振下測試)
//寫指令
void LCD1602_write_com(uchar com)
{
LCD1602_RS = 0; //1602液晶顯示屏的數據/命令選擇端置0,數據/命令(H/L),此時選擇寫命令操作
delay_ms(1);
LCD1602_EN = 1; //使能,也就是打開液晶接收數據命令的通道
LCD1602_PORT = com; //把命令送給P2口
delay_ms(1);
LCD1602_EN = 0;
}
//寫數據
void LCD1602_write_data(ulong dat)
{
LCD1602_RS = 1; //1602液晶顯示屏的數據/命令選擇端置0,數據/命令(H/L),此時選擇寫數據操作
delay_ms(1);
LCD1602_PORT = dat; //把數據送給P2口
LCD1602_EN = 1;
delay_ms(1);
LCD1602_EN = 0;
}
//連續寫字符
void LCD1602_write_word(uchar *s)
{
while(*s>0)
{
LCD1602_write_data(*s);
s++;
}
}
//1602初始化函數
void Init_LCD1602()
{
LCD1602_EN = 0;
LCD1602_RW = 0; //設置為寫狀態
LCD1602_write_com(0x38); //顯示模式設定
LCD1602_write_com(0x0c); //開關顯示、光標有無設置、光標閃爍設置
LCD1602_write_com(0x06); //寫一個字符后指針加一
LCD1602_write_com(0x01); //清屏指令
}
/*******************************************************************
起動總線函數
函數原型: void Start_I2c();
功能: 啟動I2C總線,即發送I2C起始條件.
********************************************************************/
void Start_I2c()
{
SDA=1; /*發送起始條件的數據信號*/
_Nop();
SCL=1;
_Nop(); /*起始條件建立時間大于4.7us,延時*/
_Nop();
_Nop();
_Nop();
_Nop();
SDA=0; /*發送起始信號*/
_Nop(); /* 起始條件鎖定時間大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
SCL=0; /*鉗住I2C總線,準備發送或接收數據 */
_Nop();
_Nop();
}
/*******************************************************************
結束總線函數
函數原型: void Stop_I2c();
功能: 結束I2C總線,即發送I2C結束條件.
********************************************************************/
void Stop_I2c()
{
SDA=0; /*發送結束條件的數據信號*/
_Nop(); /*發送結束條件的時鐘信號*/
SCL=1; /*結束條件建立時間大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1; /*發送I2C總線結束信號*/
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
字節數據發送函數
函數原型: void SendByte(UCHAR c);
功能: 將數據c發送出去,可以是地址,也可以是數據,發完后等待應答,并對
此狀態位進行操作.(不應答或非應答都使ack=0)
發送數據正常,ack=1; ack=0表示被控器無應答或損壞。
********************************************************************/
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) /*要傳送的數據長度為8位*/
{
if((c<<BitCnt)&0x80)SDA=1; /*判斷發送位*/
else SDA=0;
_Nop();
SCL=1; /*置時鐘線為高,通知被控器開始接收數據位*/
_Nop();
_Nop(); /*保證時鐘高電平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0;
}
_Nop();
_Nop();
SDA=1; /*8位發送完后釋放數據線,準備接收應答位*/
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop();
_Nop();
if(SDA==1)ack=0;
else ack=1; /*判斷是否接收到應答信號*/
SCL=0;
_Nop();
_Nop();
}
/*******************************************************************
字節數據接收函數
函數原型: UCHAR RcvByte();
功能: 用來接收從器件傳來的數據,并判斷總線錯誤(不發應答信號),
發完后請用應答函數應答從機。
********************************************************************/
uchar RcvByte()
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; /*置數據線為輸入方式*/
for(BitCnt=0;BitCnt<8;BitCnt++)
{
_Nop();
SCL=0; /*置時鐘線為低,準備接收數據位*/
_Nop();
_Nop(); /*時鐘低電平周期大于4.7μs*/
_Nop();
_Nop();
_Nop();
SCL=1; /*置時鐘線為高使數據線上數據有效*/
_Nop();
_Nop();
retc=retc<<1;
if(SDA==1)retc=retc+1; /*讀數據位,接收的數據位放入retc中 */
_Nop();
_Nop();
}
SCL=0;
_Nop();
_Nop();
return(retc);
}
/********************************************************************
應答子函數
函數原型: void Ack_I2c(bit a);
功能: 主控器進行應答信號(可以是應答或非應答信號,由位參數a決定)
********************************************************************/
void Ack_I2c(bit a)
{
if(a==0)SDA=0; /*在此發出應答或非應答信號 */
else SDA=1;
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop(); /*時鐘低電平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0; /*清時鐘線,鉗住I2C總線以便繼續接收*/
_Nop();
_Nop();
}
/*******************************************************************
ADC發送字節[命令]數據函數
*******************************************************************/
bit ISendByte(uchar sla,uchar c)
{
Start_I2c(); //啟動總線
SendByte(sla); //發送器件地址
if(ack==0)return(0);
SendByte(c); //發送數據
if(ack==0)return(0);
Stop_I2c(); //結束總線
return(1);
}
/*******************************************************************
ADC讀字節數據函數
*******************************************************************/
uchar IRcvByte(uchar sla)
{
uchar c;
Start_I2c(); //啟動總線
SendByte(sla+1); //發送器件地址
if(ack==0)return(0);
c=RcvByte(); //讀取數據0
Ack_I2c(1); //發送非就答位
Stop_I2c(); //結束總線
return(c);
}
// 字符顯示函數
void Display()
{
LCD1602_write_com(0x80); //指針設置,指向1602液晶第一行第一列
LCD1602_write_word("V=");
LCD1602_write_com(0xc0+0x00); //指針設置,指向1602液晶第二行第一列
LCD1602_write_word(" LOVE ");
}
//采集數據顯示
void Display_Voltage()
{
v=(v*10000/255);
LCD1602_write_com(0x82);
LCD1602_write_data(v/1000%10 + 0x30);
LCD1602_write_data('.');
LCD1602_write_data(v/100%10 + 0x30);
LCD1602_write_data(v/10%10 + 0x30);
LCD1602_write_data('V');
}
main()
{
Init_LCD1602(); //初始化LCD1602
Display();
while(1)
{
ISendByte(PCF8591);
v=IRcvByte(PCF8591);
Display_Voltage();
}
}
|