加入星計劃,您可以享受以下權(quán)益:

  • 創(chuàng)作內(nèi)容快速變現(xiàn)
  • 行業(yè)影響力擴(kuò)散
  • 作品版權(quán)保護(hù)
  • 300W+ 專業(yè)用戶
  • 1.5W+ 優(yōu)質(zhì)創(chuàng)作者
  • 5000+ 長期合作伙伴
立即加入
  • 方案介紹
  • 附件下載
  • 相關(guān)推薦
申請入駐 產(chǎn)業(yè)圖譜

基于51單片機(jī)的道岔潤油系統(tǒng)【溫濕度,煙霧】(仿真)

01/03 08:51
454
加入交流群
掃碼加入
獲取工程師必備禮包
參與熱點(diǎn)資訊討論

有需要資料的可了解一下.docx

共1個文件

道岔轉(zhuǎn)轍機(jī)安裝在鐵道旁邊,在風(fēng)吹日曬雨淋的條件下,連接桿件和運(yùn)動部件容.易產(chǎn)生銹蝕和磨卡,影響道岔轉(zhuǎn)轍機(jī)的正常運(yùn)行。為.確保道岔轉(zhuǎn)轍機(jī)可靠運(yùn)行并具有較長的使用壽命,需要給道岔轉(zhuǎn)轍機(jī)提供充分的潤滑。

1、檢測道岔的溫度濕度和當(dāng)前環(huán)境的粉塵。

2、設(shè)定閥值,過限報警。

3、道岔鎖鉤傳感器檢測到運(yùn)輸貨箱通過,啟動潤滑。

4、可通過遠(yuǎn)程控制潤滑。

主要器件:

濕度傳感器HS1101

溫度傳感器DS18B20

粉塵傳感器MQ2

#include "ADC0832.h"

//讀取AD值
unsigned int ADC0832(unsigned char channel)  //AD轉(zhuǎn)換,返回結(jié)果
{
	uchar i = 0;
	unsigned char j;
	unsigned int dat = 0;
	unsigned char ndat = 0;

	if (channel == 0) channel = 2;//通道1
	if (channel == 1) channel = 3;//通道2
	ADDI = 1;//輸入引腳拉高
	_nop_();//延時1us
	_nop_();//延時1us
	ADCS = 0;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 1;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 0;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 1;
	ADDI = channel & 0x1;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 0;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 1;
	ADDI = (channel >> 1) & 0x1;
	_nop_();//延時1us
	_nop_();//延時1us
	ADCLK = 0;
	ADDI = 1;
	_nop_();//延時1us
	_nop_();//延時1us
	dat = 0;
	for (i = 0; i < 8; i++)
	{
		dat |= ADDO;
		ADCLK = 1;
		_nop_();//延時1us
		_nop_();//延時1us
		ADCLK = 0;
		_nop_();//延時1us
		_nop_();//延時1us
		dat <<= 1;
		if (i == 7) dat |= ADDO;
	}
	for (i = 0; i < 8; i++)
	{
		j = 0;
		j = j | ADDO;
		ADCLK = 1;
		_nop_();//延時1us
		_nop_();//延時1us
		ADCLK = 0;
		_nop_();//延時1us
		_nop_();//延時1us
		j = j << 7;
		ndat = ndat | j;
		if (i < 7) ndat >>= 1;
	}
	ADCS = 1;
	ADCLK = 0;
	ADDO = 1;
	dat <<= 8;
	dat |= ndat;
	return(dat);
}
#include"Ds18b20.h"
float ds18b20_temp=0;
/*******************************************************************************
* 函 數(shù) 名         : Delay1ms
* 函數(shù)功能		   : 延時函數(shù)
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/

void Delay1ms(uint y)
{
	uint x;
	for( ; y>0; y--)
	{
		for(x=110; x>0; x--);
	}
}
/*******************************************************************************
* 函 數(shù) 名         : Ds18b20Init
* 函數(shù)功能		   : 初始化
* 輸    入         : 無
* 輸    出         : 初始化成功返回1,失敗返回0
*******************************************************************************/

uchar Ds18b20Init()
{
	uchar i;
	DSPORT = 0;			 //將總線拉低480us~960us
	i = 100;	
	while(i--);//延時642us
	DSPORT = 1;			//然后拉高總線,如果DS18B20做出反應(yīng)會將在15us~60us后總線拉低
	i = 0;
	while(DSPORT)	//等待DS18B20拉低總線
	{
		Delay1ms(1);
		i++;
		if(i>5)//等待>5MS
		{
			return 0;//初始化失敗
		}
	
	}
	return 1;//初始化成功
}

/*******************************************************************************
* 函 數(shù) 名         : Ds18b20WriteByte
* 函數(shù)功能		   : 向18B20寫入一個字節(jié)
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/

void Ds18b20WriteByte(uchar dat)
{
	uint i, j;

	for(j=0; j<8; j++)
	{
		DSPORT = 0;	     	  //每寫入一位數(shù)據(jù)之前先把總線拉低1us
		i++;
		DSPORT = dat & 0x01;  //然后寫入一個數(shù)據(jù),從最低位開始
		i=6;
		while(i--); //延時68us,持續(xù)時間最少60us
		DSPORT = 1;	//然后釋放總線,至少1us給總線恢復(fù)時間才能接著寫入第二個數(shù)值
		dat >>= 1;
	}
}
/*******************************************************************************
* 函 數(shù) 名         : Ds18b20ReadByte
* 函數(shù)功能		   : 讀取一個字節(jié)
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/


uchar Ds18b20ReadByte()
{
	uchar byte, bi;
	uint i, j;	
	for(j=8; j>0; j--)
	{
		DSPORT = 0;//先將總線拉低1us
		i++;
		DSPORT = 1;//然后釋放總線
		i++;
		i++;//延時6us等待數(shù)據(jù)穩(wěn)定
		bi = DSPORT;	 //讀取數(shù)據(jù),從最低位開始讀取
		/*將byte左移一位,然后與上右移7位后的bi,注意移動之后移掉那位補(bǔ)0。*/
		byte = (byte >> 1) | (bi << 7);						  
		i = 4;		//讀取完之后等待48us再接著讀取下一個數(shù)
		while(i--);
	}				
	return byte;
}
/*******************************************************************************
* 函 數(shù) 名         : Ds18b20ChangTemp
* 函數(shù)功能		   : 讓18b20開始轉(zhuǎn)換溫度
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/

void  Ds18b20ChangTemp()
{
	Ds18b20Init();
	Delay1ms(1);
	Ds18b20WriteByte(0xcc);		//跳過ROM操作命令		 
	Ds18b20WriteByte(0x44);	    //溫度轉(zhuǎn)換命令
	//Delay1ms(100);	//等待轉(zhuǎn)換成功,而如果你是一直刷著的話,就不用這個延時了
   
}
/*******************************************************************************
* 函 數(shù) 名         : Ds18b20ReadTempCom
* 函數(shù)功能		   : 發(fā)送讀取溫度命令
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/

void  Ds18b20ReadTempCom()
{	

	Ds18b20Init();
	Delay1ms(1);
	Ds18b20WriteByte(0xcc);	 //跳過ROM操作命令
	Ds18b20WriteByte(0xbe);	 //發(fā)送讀取溫度命令
}
/*******************************************************************************
* 函 數(shù) 名         : Ds18b20ReadTemp
* 函數(shù)功能		   : 讀取溫度
* 輸    入         : 無
* 輸    出         : 無
*******************************************************************************/

void Ds18b20ReadTemp()
{
	uchar temp = 0;
	uchar tmh, tml;
	Ds18b20ChangTemp();			 	//先寫入轉(zhuǎn)換命令
	Ds18b20ReadTempCom();			//然后等待轉(zhuǎn)換完后發(fā)送讀取溫度命令
	tml = Ds18b20ReadByte();		//讀取溫度值共16位,先讀低字節(jié)
	tmh = Ds18b20ReadByte();		//再讀高字節(jié)
	temp = tmh;
	temp <<= 4;
	temp += (tml>>4);
	if(temp>127)
	{	
		temp--;
		temp=~temp;
		temp=temp & 0x7f;
		ds18b20_temp=temp;
		ds18b20_temp=-ds18b20_temp;
	}
	else
		ds18b20_temp=temp;
	ds18b20_temp=ds18b20_temp+(tml & 0x0f)*9/150;
}


資料借鑒于此紛傳

  • 有需要資料的可了解一下.docx
    下載

相關(guān)推薦

方案定制

去合作
方案開發(fā)定制化,2000+方案商即時響應(yīng)!