?? pic16f946_i2c.txt
字號:
#include<pic.h>
#define SCL RD5 //FM24C16-6
#define SDA RD4 //FM24C16-5
#define WP RD3 //寫保護
#define LED RC3
#define SCL_DIR TRISD5 //1
#define SDA_DIR TRISD4 //2
#define IIC_READ 0xA1 //定義讀指令
#define IIC_WRITE 0xA0 //定義寫指令
#define OUTPUT 0
#define INPUT 1
bit ack; //應答標志位
unsigned char b[4];
unsigned char b1[4];
unsigned char c[1];
/*--------------------------------------------------------------------------------------------
功能:啟動I2C總線,即發(fā)送I2C起始條件.
名稱:Start_I2c()
輸入:無
輸出:無
返回:無
備注:無
---------------------------------------------------------------------------------------------*/
void Start_I2c(void)
{
SDA_DIR = OUTPUT;
SCL_DIR = OUTPUT;
SDA = 1; //發(fā)送起始條件的數(shù)據(jù)信號
SCL = 1;
SDA = 0; //發(fā)送起始信號
SCL = 0; //鉗住I2C總線，準備發(fā)送或接收數(shù)據(jù)
}
/*--------------------------------------------------------------------------------------------
功能:結束I2C總線,即發(fā)送I2C結束條件.
名稱:Stop_I2c()
輸入:無
輸出:無
返回:無
備注:無
---------------------------------------------------------------------------------------------*/
void Stop_I2c()
{
SDA_DIR = OUTPUT;
SCL_DIR = OUTPUT;
SDA=0; //發(fā)送結束條件的數(shù)據(jù)信號
SCL=1; //發(fā)送結束條件的時鐘信號
SDA=1; //發(fā)送I2C總線結束信號
}
/*--------------------------------------------------------------------------------------------
功能:將數(shù)據(jù)c發(fā)送出去,可以是地址,也可以是數(shù)據(jù),發(fā)完后等待應答,并對此狀態(tài)位進行操作.(不應答或非應答都使ack=0)
發(fā)送數(shù)據(jù)正常，ack=1; ack=0表示被控器無應答或損壞。
名稱:void SendByte
輸入:c:要發(fā)送的數(shù)據(jù)
輸出:無
返回:無
備注:無
---------------------------------------------------------------------------------------------*/
void SendByte(unsigned char c)
{
unsigned char BitCnt;
SCL_DIR = OUTPUT;
SDA_DIR = OUTPUT;
for(BitCnt=0;BitCnt<8;BitCnt++) //要傳送的數(shù)據(jù)長度為8位
{
if((c<<BitCnt)&0x80) //判斷發(fā)送位
{ SDA=1; }
else { SDA=0; }
SCL=1; //置時鐘線為高，通知被控器開始接收數(shù)據(jù)位
SCL=0;
}
SDA=1; //8位發(fā)送完后釋放數(shù)據(jù)線，準備接收應答位
SDA_DIR = INPUT; //將SDA置為輸入口,等待應答
SCL=1;
if(SDA==1) { ack=0; }
else { ack=1; } //判斷是否接收到應答信號，如果正確第九個sda為零
SCL=0;
}
/*--------------------------------------------------------------------------------------------
功能:用來接收從器件傳來的數(shù)據(jù),并判斷總線錯誤(不發(fā)應答信號)，發(fā)完后請用應答函數(shù)應答從機。
名稱:RcvByte
輸入:無
輸出:無
返回:retc
備注:無
---------------------------------------------------------------------------------------------*/
unsigned char RcvByte(void)
{
unsigned char retc;
unsigned char BitCnt;
retc=0;
SDA=1; //置數(shù)據(jù)線為輸入方式
SDA_DIR = INPUT; //將SDA置為輸入口,等待應答
for(BitCnt=0;BitCnt<8;BitCnt++)
{
SCL=0; //置時鐘線為低，準備接收數(shù)據(jù)位
SCL=1; //置時鐘線為高使數(shù)據(jù)線上數(shù)據(jù)有效
retc=retc<<1;
if(SDA==1)retc=retc+1; //讀數(shù)據(jù)位,接收的數(shù)據(jù)位放入retc中
}
SCL=0;
return(retc);
}
/*--------------------------------------------------------------------------------------------
功能:主控器進行應答信號(可以是應答或非應答信號，由位參數(shù)a決定)
名稱:void Ack_I2c
輸入:無
輸出:無
返回:無
備注:無
---------------------------------------------------------------------------------------------*/
void Ack_I2c(unsigned char a)
{
SCL_DIR = OUTPUT;
SDA_DIR = OUTPUT;
if(a==0)
{
SDA=0; //在此發(fā)出應答或非應答信號
}
else
{
SDA=1;
}
SCL=1;
SCL=0; //清時鐘線，鉗住I2C總線以便繼續(xù)接收
}
/*--------------------------------------------------------------------------------------------
功能:向有子地址器件發(fā)送字節(jié)數(shù)據(jù)函數(shù)
從啟動總線到發(fā)送命令，地址，數(shù)據(jù)，結束總線的全過程,器件子地址sbua.如果返回1表示操作成功，否則操作有誤。
名稱:ISendByte
輸入:
輸出:
返回:
備注:
---------------------------------------------------------------------------------------------*/
unsigned char ISendByte(unsigned int suba,unsigned char c)
{
unsigned char temp,tempw;
temp=(unsigned char)(suba>>8); //temp =0 0 0 0 0 a10 a9 a8
tempw=(IIC_WRITE|(temp<<1)); //tempw=1 0 1 0 a10 a9 a8 0
Start_I2c(); //啟動總線
SendByte(tempw); //發(fā)送命令
if(ack==0)
{
//LED=0;
return(0);
}
SendByte((unsigned char)suba); //發(fā)送地址
if(ack==0)
{
//LED=0;
return(0);
}
SendByte(c); //發(fā)送數(shù)據(jù)
if(ack==0)
{
//LED=0;
return(0);
}
Stop_I2c(); //結束總線
return(1);
}
/*--------------------------------------------------------------------------------------------
功能:向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)函數(shù)
從啟動總線到發(fā)送命令，子地址,數(shù)據(jù)，結束總線的全過程如果返回1表示操作成功，否則操作有誤。
名稱:ISendStr輸入:
輸出:
返回:
備注:使用前必須已結束總線。
---------------------------------------------------------------------------------------------*/
unsigned char ISendStr(unsigned int suba,unsigned char *s,unsigned char no)
{
unsigned char i;
unsigned char temp,tempw;
temp=(unsigned char)(suba>>8); //temp=0 0 0 0 0 a10 a9 a8
tempw=(IIC_WRITE|(temp<<1)); //tempw=1 0 1 0 a10 a9 a8 0
Start_I2c(); //啟動總線
SendByte(tempw); //發(fā)送命令
if(ack==0)return(0);
SendByte((unsigned char)suba); //發(fā)送器件子地址
if(ack==0)return(0);
for(i=0;i<no;i++)
{
SendByte(*s); //發(fā)送數(shù)據(jù)
if(ack==0)return(0);
s++;
}
Stop_I2c(); //結束總線
return(1);
}
/*--------------------------------------------------------------------------------------------
功能:向有子地址器件讀字節(jié)數(shù)據(jù)函數(shù)
從啟動總線到發(fā)送命令，地址，讀數(shù)據(jù)，結束總線的全過程,器件子地址sbua ，返回值在c.
如果返回1表示操作成功，否則操作有誤。
名稱:IRcvByte
輸出:
返回:
備注:
---------------------------------------------------------------------------------------------*/
unsigned char IRcvByte(unsigned int sbua,unsigned char *c)
{
unsigned char temp,tempw,tempr;
temp=(unsigned char)(sbua>>8); //temp=0 0 0 0 0 a10 a9 a8
tempw=(IIC_WRITE|(temp<<1)); //tempw=1 0 1 0 a10 a9 a8 0
tempr=(IIC_READ|(temp<<1)); //tempr=1 0 1 0 a10 a9 a8 1
Start_I2c(); //啟動總線
SendByte(tempw); //寫命令
if(ack==0)
{
return(0);
}
SendByte((unsigned char)sbua); //寫地址
if(ack==0)
{
return(0);
}
Start_I2c(); //重新啟動總線
SendByte(tempr); //讀命令
if(ack==0)
{
return(0);
}
*c=RcvByte(); //讀取數(shù)據(jù)
Ack_I2c(1); //發(fā)送非就答位
Stop_I2c(); //結束總線
return(1);
}
/*--------------------------------------------------------------------------------------------
功能:向有子地址器件讀取多字節(jié)數(shù)據(jù)函數(shù)
從啟動總線到發(fā)送命令，子地址,讀數(shù)據(jù)，結束總線的全過程,如果返回1表示操作成功，否則操作有誤。
名稱:IRcvStr
輸出:
返回:
備注:
---------------------------------------------------------------------------------------------*/
unsigned char IRcvStr(unsigned int suba,unsigned char *s,unsigned char no)
{
unsigned char i;
unsigned char temp,tempw,tempr;
temp=(unsigned char)(suba>>8); //temp=0 0 0 0 0 a10 a9 a8
tempw=(IIC_WRITE|(temp<<1)); //tempw=1 0 1 0 a10 a9 a8 0
tempr=(IIC_READ|(temp<<1)); //tempr=1 0 1 0 a10 a9 a8 1
Start_I2c(); //啟動總線
SendByte(tempw); //寫命令
if(ack==0)return(0);
SendByte((unsigned char)suba); //寫地址
if(ack==0)return(0);
Start_I2c(); //重新啟動總線
SendByte(tempr);
if(ack==0)return(0);
for(i=0;i<no-1;i++)
{
*s=RcvByte(); //發(fā)送數(shù)據(jù)
Ack_I2c(0); //發(fā)送就答位
s++;
}
*s=RcvByte();
Ack_I2c(1); //發(fā)送非應位
Stop_I2c(); //結束總線
return(1);
}
void main(void)
{
unsigned char a[4]={0xDc,0x55,0xaa,0xed};
unsigned char d=0xDD;
OSCCON = 0b011001111;
TRISD3=OUTPUT;
TRISD4=INPUT;
TRISD5=INPUT;
TRISC3=OUTPUT;
RD4=0;
RD5=0;
WP=0;
LED=1;
ISendStr(0x400,a,4);
IRcvStr(0x400,b,4);
if( b[0]==0xDC && b[1]==0x55 && b[2]==0xaa && b[3]==0xed )
{
LED=0;
}
/*
ISendByte(0x301,d);
IRcvByte(0x301,c);
if(c[0]==d)
{
LED=0;
}
*/
//IRcvStr(0x400,b1,4);
while(1)
{
}
}
本程序在MPLAB8.0版本中調成功
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -