【正文】 ,準備發(fā)送數(shù)據(jù),每一bit數(shù)據(jù)都以50us低電平時隙開始,則DHT11沒有響應(yīng),，DHT11拉低總線50us,隨后總線由上拉電阻拉高進入空閑狀態(tài)。將這些材料做成很薄的薄片，每一片薄片相對的兩面各引出一根電極，在電極兩端則形成一個等效的小電容。 當人體靜止在傳感器的檢測區(qū)域內(nèi)時，照射到兩個電容上的紅外線光能能量相等，且達到平衡，極性相反、能量相等的光電流在回路中相互抵消，傳感器仍然沒有信號輸出。在半導(dǎo)體光敏材料兩端裝上電極引線，將其封裝在帶有透明窗的管殼里就構(gòu)成光敏電阻。當光敏電阻受到光照時，價帶中的電子吸收光子能量后躍遷到導(dǎo)帶，成為自由電子，同時產(chǎn)生空穴，電子—空穴對的出現(xiàn)使電阻率變小。光敏電阻的應(yīng)用光敏電阻屬半導(dǎo)體光敏器件，除具靈敏度高，反應(yīng)速度快，光譜特性及r值一致性好等特點外，在高溫，多濕的惡劣環(huán)境下，還能保持高度的穩(wěn)定性和可靠性，可廣泛應(yīng)用于照相機，太陽能庭院燈，草坪燈，驗鈔機，石英鐘，音樂杯，禮品盒，迷你小夜燈，光聲控開關(guān)，路燈自動開關(guān)以及各種光控玩具，光控?zé)麸棧瑹艟叩裙庾詣娱_關(guān)控制領(lǐng)域。主要適合用于自動控制和遠程控制領(lǐng)域，可以嵌入各種設(shè)備。再通過對熱釋電的檢測程序，讀取熱釋電的當前狀態(tài)，完成數(shù)據(jù)的采集。6. 狀態(tài)記憶 當下位機的數(shù)據(jù)發(fā)生改變時，單片機就會將數(shù)據(jù)寫入EEPROM中，確保下位機系統(tǒng)在非正常情況恢復(fù)后能繼續(xù)先前狀態(tài)運行。每部分的具體功能如下：1. 顯示部分： 該部分主要用來顯示系統(tǒng)的溫度，濕度，內(nèi)外光照等數(shù)據(jù)，使得下位機系統(tǒng)的狀太實時掌握。4. 通信端口設(shè)置部分 該端口主要用來設(shè)定串口通信時所用PC機的端口以及通信波特率等，單擊連接串口，即完成數(shù)據(jù)通信，這是軟件操作的開始。 VS2008引入了250多個新特性，整合了對象、關(guān)系型數(shù)據(jù)、XML的訪問方式,語言更加簡潔。Visual Studio 2008可以高效開發(fā)Web應(yīng)用，集成了AJAX ，包含AJAX項目模板，它還可以高效開發(fā)Office應(yīng)用和Mobile應(yīng)用。 創(chuàng)建 Microsoft Office 應(yīng)用程序。），從而提高用戶的工作效率，簡化部署過程。由于引入了語言集成查詢 (LINQ) 和其他數(shù)據(jù)訪問改進功能，開發(fā)人員能夠應(yīng)用一致的編程方法進行數(shù)據(jù)處理，使用新的數(shù)據(jù)設(shè)計圖面執(zhí)行數(shù)據(jù)訪問，以及使用內(nèi)置類來實施偶爾連接的設(shè)計模式。JavaScript IntelliSense 和調(diào)試進一步改善了開發(fā)體驗。 改善應(yīng)用程序生命周期管理 (ALM)。 因為水平有限，此設(shè)計存在一定的問題。 AD_init()。 PWM_init()。 read_date()。 buguang()。 }}void AD_init(void){ DDRA=0x00。 ADMUX=a。}void AD_chuli(void){ shiyan[0]=AD_read(0)。 shiyan[2]=AD_read(2)。 a[6]=shiyan[1]%253。=0x7f。}/**************shoudongkongzhi***************/void buguang(void){ if(cunshushou[1]==1) { PORTD|=0X80。 } else if(cunshushou[0]==0) { PORTCamp。=0XbF。 //關(guān)加熱 } else if(TN=(cunshuzi[0])) { PORTCamp。//關(guān)風(fēng)扇 } else if(TN(cunshuzi[0])) { PORTC|=0X80。=0XDF。 } else if((PINBamp。 PORTB|=0X40。 //略微延時約6微秒//2 PORTBamp。time++)。time++)。time5。time200。 //返回檢測成功標志}/*****************************************************函數(shù)功能：從DS18B20讀取一個字節(jié)數(shù)據(jù)出口參數(shù)：dat***************************************************/ unsigned char ReadOneChar(void) { unsigned char i=0。i++) { PORTB|=0X40。 //單片機從DS18B20讀書據(jù)時,將數(shù)據(jù)線從高拉低即啟動讀時序 dat=1。=0XBF。 //延時約6us，使主機在15us內(nèi)采樣//2 flag1=PINBamp。//如果讀到的數(shù)據(jù)是0，則將0存入dat //將單片機檢測到的電平信號DQ存入r[i] for(time=0。 } return(dat)。 i8。=0xBF。 //利用與運算取出要寫的某位二進制數(shù)據(jù),//并將其送到數(shù)據(jù)線上等待DS18B20采樣 for(time=0。 //釋放數(shù)據(jù)線 for(time=0。 //將dat中的各二進制位數(shù)據(jù)右移1位 } for(time=0。 //將DS18B20初始化 WriteOneChar(0xCC)。 //跳過讀序號列號的操作 WriteOneChar(0xBE)。 TN=TH*16+TL/16。}//unsigned char zhuantai[12]={254,0,0,0,0,0,0,0,0,0,0,0}。=0Xfe。 //寄存器選著，八位數(shù)據(jù)發(fā)送 UBRR=47。 for(i=0。 for(i=0。 }}pragma interrupt_handler chuankou:iv_USART_RXC void chuankou(void){ unsigned char shuju=0,i=0。 if(shuju==255amp。 } else if(kaiguan_chuan==1)//數(shù)據(jù)接收 { shou[xunhuani]=shuju。 if(shou[7]==1amp。i++) { cunshushou[i]=shou[i]。 } EEPROM_write(11,1)。amp。 } if(shou[10]==(zhancun[0]+zhancun[1]+zhancun[2]+zhancun[3]+zhancun[4]+zhancun[5]+zhancun[6]+zhancun[7]+zhancun[8]+zhancun[9])) { for(i=0。i11。 PWM_init()。 for(i=0。0X20))amp。amp。 if(PINBamp。0X20)amp。 U8data=1。 delay_ms(100)。 PORTB|=0X20。 Delay(30)。0X20))amp。 while((PINBamp。 COM()。 COM()。 COM()。//P2_0=1。 U8T_data_H=U8T_data_H_temp。 shidu_ge=U8RH_data_H%10。 a[9]=shiduz。}/*void time2_init(void){ TCCR2|=0X02。 jishu++。 shidu_read()。unsigned char TL=0,TH=0,TN=0,TD=0。//一共發(fā)送十二位數(shù)據(jù)，a[0],a[11]為校驗，a[11]=a[1]+a[2]+a[9]。unsigned char zhancun[10]。/******************************************/unsigned int jishu=0。unsigned char U8temp。unsigned char U8data。float P=,I=2,D=1。b) for(c=120。 (1EEWE))。 /* 置位EEWE 以啟動寫操作*/ EECR |= (1EEWE)。 /* 設(shè)置EERE 以啟動讀操作*/ EECR |= (1EERE)。j12。j++) { cunshushou[j]=read_pre[j]。j++) { cunshuzi[j]=read_pre[j]。 pwm=pwm+P*error+I*lasterror+D*preerror。 if(pwm256)pwm=255。 //TCNT1=10000。//快速PWM TCNT2=0。//快速PWM //TCCR1B=0X00。//快速PWM DDRD|=0X80。jieshoushuju 39。設(shè)置Input一次從接收緩沖讀取字節(jié)數(shù)為1 = 1 39。清除發(fā)送緩沖區(qū)數(shù)據(jù) If = True Then = False End If = COM1 = 9600 Call chushihua() End Sub Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles Dim a a = MsgBox(確定退出系統(tǒng)嗎？, 52, 提示！) If a = Then Call chushihua() End End If End Sub 39。 DateString amp。串口程序段 Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As , ByVal e As ) Handles On Error GoTo cuowu Select Case Case Is = COM1 = 1 Case Is = COM2 = 2 Case Is = COM3 = 3 Case Is = COM4 = 4 Case Is = COM5 = 5 Case Is = COM6 = 6 Case Is = COM7 = 7 Case Is = COM8 = 8 Case Is = COM9 = 9 Case Is = COM10 = 10 Case Is = COM11 = 11 Case Is = COM12 = 12 Case Is = COM13 = 13 End Select Exit Subcuowu: MsgBox(警告：端口設(shè)置錯誤！, 48, 錯誤) = 連接串口 If = True Then = False End If = COM1 = False = False chuan = 0 shou = 0 39。手動控制標志位 zi = 0 39。 vbCrLf amp。 vbCrLf amp。 vbCrLf _ amp。 vbCrLf amp。 vbCrLf amp。 vbCrLf amp。 vbCrLf amp。 vbCrLf If chuan = 0 Then MsgBox(請先打開串口！, 48, 提示) Exit Sub Else = True If = True Then = False End If If = 確定 Then = 重置 = False End If If = 確定 Then = 重置 = False End If If = 確定 The