久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: 求52單片機光照強度檢測與pwm控制程序 [打印本頁]

作者: 8466 時間: 2017-7-13 17:49
標題: 求52單片機光照強度檢測與pwm控制程序
52單片機，該怎么編程程序，求大神幫忙

捕獲q.PNG (130.35 KB, 下載次數: 47)

作者: wfrgrre411 時間: 2017-7-13 18:10
/ BH1750FVI IIC測試程序
// 使用單片機STC89C51
// 晶振：11.0592M
// 顯示：LCD1602
// 編譯環境 Keil uVision2
// 參考宏晶網站24c04通信程序
// 時間：2011年4月20日
//****************************************
#include  <REG51.H>
#include  <math.h> //Keil library
#include  <stdio.h> //Keil library
#include  <INTRINS.H>
#define uchar unsigned char
#define uint unsigned int
#define DataPort P0       //LCD1602數據端口
sbit       SCL=P1^0;    //IIC時鐘引腳定義
sbit          SDA=P1^1;    //IIC數據引腳定義
sbit    LCM_RS=P2^0; //LCD1602命令端口
sbit    LCM_RW=P2^1; //LCD1602命令端口
sbit    LCM_EN=P2^2; //LCD1602命令端口

#define       SlaveAddress 0x46 //定義器件在IIC總線中的從地址,根據ALT  ADDRESS地址引腳不同修改
                           //ALT  ADDRESS引腳接地時地址為0x46，接電源時地址為0xB8
typedef unsigned char BYTE;
typedef unsigned short WORD;

BYTE BUF[8];                      //接收數據緩存區
uchar ge,shi,bai,qian,wan;          //顯示變量
int    dis_data;                      //變量

void delay_nms(unsigned int k);
void InitLcd();
void Init_BH1750(void);

void WriteDataLCM(uchar dataW);
void WriteCommandLCM(uchar CMD,uchar Attribc);
void DisplayOneChar(uchar X,uchar Y,uchar DData);
void conversion(uint temp_data);

void  Single_Write_BH1750(uchar REG_Address);             //單個寫入數據
uchar Single_Read_BH1750(uchar REG_Address);             //單個讀取內部寄存器數據
void  Multiple_Read_BH1750();                            //連續的讀取內部寄存器數據
//------------------------------------
void Delay5us();
void Delay5ms();
void BH1750_Start();                   //起始信號
void BH1750_Stop();                   //停止信號
void BH1750_SendACK(bit ack);          //應答ACK
bit  BH1750_RecvACK();                //讀ack
void BH1750_SendByte(BYTE dat);       //IIC單個字節寫
BYTE BH1750_RecvByte();                //IIC單個字節讀

//-----------------------------------

//*********************************************************
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_nms(unsigned int k)
{
unsigned int i,j;
for(i=0;i<k;i++)
{
for(j=0;j<121;j++)
{;}}
}

/*******************************/
void WaitForEnable(void)
{
DataPort=0xff;
LCM_RS=0;LCM_RW=1;_nop_();
LCM_EN=1;_nop_();_nop_();
while(DataPort&0x80);
LCM_EN=0;
}
/*******************************/
void WriteCommandLCM(uchar CMD,uchar Attribc)
{
if(Attribc)WaitForEnable();
LCM_RS=0;LCM_RW=0;_nop_();
DataPort=CMD;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/*******************************/
void WriteDataLCM(uchar dataW)
{
WaitForEnable();
LCM_RS=1;LCM_RW=0;_nop_();
DataPort=dataW;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/***********************************/
void InitLcd()
{
WriteCommandLCM(0x38,1);
WriteCommandLCM(0x08,1);
WriteCommandLCM(0x01,1);
WriteCommandLCM(0x06,1);
WriteCommandLCM(0x0c,1);
}
/***********************************/
void DisplayOneChar(uchar X,uchar Y,uchar DData)
{
Y&=1;
X&=15;
if(Y)X|=0x40;
X|=0x80;
WriteCommandLCM(X,0);
WriteDataLCM(DData);
}

/**************************************
延時5微秒(STC90C52RC@12M)
不同的工作環境,需要調整此函數，注意時鐘過快時需要修改
當改用1T的MCU時,請調整此延時函數
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
      _nop_();_nop_();_nop_();_nop_();
      _nop_();_nop_();_nop_();_nop_();
}

/**************************************
延時5毫秒(STC90C52RC@12M)
不同的工作環境,需要調整此函數
當改用1T的MCU時,請調整此延時函數
**************************************/
void Delay5ms()
{
WORD n = 560;

while (n--);
}

/**************************************
起始信號
**************************************/
void BH1750_Start()
{
SDA = 1;                   //拉高數據線
SCL = 1;                   //拉高時鐘線
Delay5us();                //延時
SDA = 0;                   //產生下降沿
Delay5us();                //延時
SCL = 0;                   //拉低時鐘線
}

/**************************************
停止信號
**************************************/
void BH1750_Stop()
{
SDA = 0;                   //拉低數據線
SCL = 1;                   //拉高時鐘線
Delay5us();                //延時
SDA = 1;                   //產生上升沿
Delay5us();                //延時
}

/**************************************
發送應答信號
入口參數:ack (0:ACK 1:NAK)
**************************************/
void BH1750_SendACK(bit ack)
{
SDA = ack;                //寫應答信號
SCL = 1;                   //拉高時鐘線
Delay5us();                //延時
SCL = 0;                   //拉低時鐘線
Delay5us();                //延時
}

/**************************************
接收應答信號
**************************************/
bit BH1750_RecvACK()
{
SCL = 1;                   //拉高時鐘線
Delay5us();                //延時
CY = SDA;                //讀應答信號
SCL = 0;                   //拉低時鐘線
Delay5us();                //延時

return CY;
}

/**************************************
向IIC總線發送一個字節數據
**************************************/
void BH1750_SendByte(BYTE dat)
{
BYTE i;

for (i=0; i<8; i++)       //8位計數器
{
      dat <<= 1;             //移出數據的最高位
      SDA = CY;             //送數據口
      SCL = 1;             //拉高時鐘線
      Delay5us();          //延時
      SCL = 0;             //拉低時鐘線
      Delay5us();          //延時
}
BH1750_RecvACK();
}

/**************************************
從IIC總線接收一個字節數據
**************************************/
BYTE BH1750_RecvByte()
{
BYTE i;
BYTE 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_BH1750(uchar REG_Address)
{
BH1750_Start();                //起始信號
BH1750_SendByte(SlaveAddress); //發送設備地址+寫信號
BH1750_SendByte(REG_Address); //內部寄存器地址，
  //  BH1750_SendByte(REG_data);    //內部寄存器數據，
BH1750_Stop();                //發送停止信號
}

//********單字節讀取*****************************************
/*
uchar Single_Read_BH1750(uchar REG_Address)
{  uchar REG_data;
BH1750_Start();                         //起始信號
BH1750_SendByte(SlaveAddress);          //發送設備地址+寫信號
BH1750_SendByte(REG_Address);                //發送存儲單元地址，從0開始
BH1750_Start();                         //起始信號
BH1750_SendByte(SlaveAddress+1);       //發送設備地址+讀信號
REG_data=BH1750_RecvByte();             //讀出寄存器數據
      BH1750_SendACK(1);
      BH1750_Stop();                         //停止信號
return REG_data;
}
*/
//*********************************************************
//
//連續讀出BH1750內部數據
//
//*********************************************************
void Multiple_read_BH1750(void)
{ uchar i;
BH1750_Start();                         //起始信號
BH1750_SendByte(SlaveAddress+1);       //發送設備地址+讀信號

      for (i=0; i<3; i++)                   //連續讀取2個地址數據，存儲中BUF
{
      BUF[ i] = BH1750_RecvByte();       //BUF[0]存儲0x32地址中的數據
      if (i == 3)
      {

         BH1750_SendACK(1);             //最后一個數據需要回NOACK
      }
      else
      {
      BH1750_SendACK(0);             //回應ACK
   }
}

BH1750_Stop();                         //停止信號
Delay5ms();
}

//初始化BH1750，根據需要請參考pdf進行修改****
void Init_BH1750()
{
Single_Write_BH1750(0x01);

}
//*********************************************************
//主程序********
//*********************************************************
void main()
{
float temp;
delay_nms(100);          //延時100ms
InitLcd();          //初始化LCD
Init_BH1750();    //初始化BH1750

  while(1)             //循環
  {

Single_Write_BH1750(0x01); // power on
Single_Write_BH1750(0x10); // H- resolution mode

   delay_nms(180);             //延時180ms

Multiple_Read_BH1750();    //連續讀出數據，存儲在BUF中

dis_data=BUF[0];
dis_data=(dis_data<<8)+BUF[1];//合成數據，即光照數據

temp=(float)dis_data/1.2;

conversion(temp);       //計算數據和顯示
      DisplayOneChar(0,0,'L');
      DisplayOneChar(1,0,'i');
      DisplayOneChar(2,0,'g');
      DisplayOneChar(3,0,'h');
      DisplayOneChar(4,0,'t');
DisplayOneChar(5,0,':');

DisplayOneChar(7,0,wan); //顯示數據
DisplayOneChar(8,0,qian);
DisplayOneChar(9,0,bai);
DisplayOneChar(10,0,shi);
      DisplayOneChar(11,0,ge);

      DisplayOneChar(13,0,'l'); ////顯示數單位
      DisplayOneChar(14,0,'x');

  }
}

作者: cjjcjj1 時間: 2017-7-13 20:00
提示: 作者被禁止或刪除內容自動屏蔽

歡迎光臨 (http://www.zg4o1577.cn/bbs/)

<code id="aqqwe"></code>