【導讀】[摘要]為了提供作物生長所需要的最佳生態(tài)環(huán)境,需要對溫室環(huán)境溫度進行實時監(jiān)控?？?，數(shù)據(jù)管理等功能。通過CAN收發(fā)器CTM8251完成對總線信號的讀取以及向總線上發(fā)送命令，現(xiàn)。的單片機PIC18F4580的數(shù)據(jù)采集模塊完成A/D轉(zhuǎn)換，通過CAN收發(fā)器將信號傳至主監(jiān)視器，使用MCG12864A8-3液晶顯示器實現(xiàn)數(shù)據(jù)顯示。

　　

【正文】 // 打開定時器 0 } 畢業(yè)論文 29 //功能 描述 ： A/D 轉(zhuǎn)化初始化子程序 void AD_Initial() { ADCON0=0x41。 // 選擇 A/D 通道為 RA0,A/D 轉(zhuǎn)換器 // 處于工作狀態(tài) ,且使 A/D 轉(zhuǎn)換時鐘為 8tosc ADCON1=0X8E。 // 轉(zhuǎn)換結(jié)果右 移 ,及 ADRESH 寄存器的高 6 位為 0 // 且把 RA0(AN0)設(shè)置為模擬量輸入方式 ADIF=0。 // 清除 A/D 轉(zhuǎn)換標志 ADIE=1。 // A/D 轉(zhuǎn)換中斷允許 ADIP=1。 // AD 中斷高優(yōu)先級 TRISA=TRISA|0x01。 // 設(shè)置 RA0(AN0 通道 )為輸入方式 } //AD 轉(zhuǎn)換完成后處理數(shù)據(jù)子程序 void Deal_AD() { unsigned char HI,Low,i。 unsigned long data,j,a,b。 unsigned int c。 double m。 for(i=0。i16。i++) AD_Reseve[i]=AD_Sample[i]。 // 讀采樣值，以免在計算時被新的采樣值覆蓋 data=0。 for(i=0。i16。i++) // 計算 16 點采樣值平方和 { HI=AD_Reseve[i]8。 // 高 2 位 Low=AD_Reseve[i]amp。0xff。 // 低 8 位 a=HI*HI。 a=a16。 b=(HI*Low)。 b=b9。 c=Low*Low。 畢業(yè)論文 30 j=a+c+b。 /* a 為高 2 位， b 為低 8 位， j=(a8+b)*(a8+b)= (a*a)16+2*(a8*b)+b*b=(a*a)16+(a*b)9+b*b. */ data+=j。 } data=data4。 // data=data/16 m=sqrt(data)。 // 開平方根 Adresult=(unsigned int)m。 // 轉(zhuǎn)換為整形數(shù) 據(jù) Adresult=(Adresult*50)10。 /* 將 AD 采樣結(jié)果轉(zhuǎn)換為兩位數(shù)表示的值，即放大 10 倍 , 乘以滿該度值 5V，除以滿刻度轉(zhuǎn)換值 10 位（ 1024） */ Adresult=(((Adresult/10)4)amp。0xf0)+(Adresult % 10)。 /* 轉(zhuǎn)換為帶一位小數(shù)的 BCD 碼實際值如 25 表示 */ } //功能描述 : SPI 輸出初始化子程序 void SPIinitial() { TRISA=TRISAamp。0xdf。 /* 設(shè) 置 RA5 輸出 74HC595 鎖存信號 */ TRISC=TRISCamp。0xd7。 // SDO(RC5)引腳為輸出 ,SCK(RC3)引腳為輸出 SSPCON1=0x30。 // SSPEN=1。CKP=1,FOSC/4 SSPSTAT=0xC0。 // 時鐘下降沿發(fā)送數(shù)據(jù) SSPIF=0。 // 清除 SSPIF 標志 } //功能描述 : SPI 傳輸數(shù)據(jù)（發(fā)送數(shù)據(jù)）子程序 void SPILED(char data) { SSPBUF=data。 /* 啟動 SPI 發(fā)送 */ do { 。 }while(SSPIF==0)。 /* 等待 SPI 發(fā)送完成 */ SSPIF=0。 /* 清 SPI 發(fā)送完成標志 */ 畢業(yè)論文 31 } //功能描述 : 高優(yōu)先級中斷子程序： AD 轉(zhuǎn)換完成中斷 void interrupt HI_ISR() { if(TMR0IF==1) // 定時器 0 中斷 { TMR0IF=0。 // 清中斷標志 TMR0H=0XFB。 TMR0L=0X2D。 // 對 TMR0 定時 寫入一個初值。 ADCON0=ADCON0|0x04。 // 定時 啟動 AD 采樣，每周波采樣 16 點 } if(ADIF==1) //AD 轉(zhuǎn)換完成 { ADIF=0。 // 清除中斷標志 AD_Sample[AD_Point]=ADRESL+(ADRESH8)。 // 讀取并存儲 A/D 轉(zhuǎn)換結(jié)果（ 10 位，高 6 位為 0） AD_Point++。 if(AD_Point15) { AD_Point=0。 AD_Flag=1。 // 置 AD 轉(zhuǎn)換完成標志 } } } 畢業(yè)論文 32 CAN 收發(fā)器發(fā)送和接收子程序： //功能描述 : CAN 自測試收發(fā)編程， CAN 發(fā)送郵箱 0 以一定的時間間隔發(fā)送數(shù)據(jù)，接收到數(shù)據(jù)后 ,將接收數(shù)據(jù)加 1 作為下一次的發(fā)送數(shù)據(jù) include /* PIC18 系列的頭文件 */ char CAN_Adress_H,CAN_Adress_L。 /* CAN 標識符高低字節(jié) */ char CAN_Adress_EH,CAN_Adress_EL。 /* CAN 擴展標識符高低字節(jié) */ int CAN_FLAG。 /* =1 接收到 CAN 數(shù)據(jù) ,=0 未接收到數(shù)據(jù) */ unsigned int CAN_Delay_count=0。 /* 間隔一定時間發(fā)送 CAN 數(shù)據(jù) */ //功能描述 : 系統(tǒng)初始化子程序，放在程序首部 void initial() { INTCON=0x00。 /* bit7bit0:關(guān)總中斷 */ ADCON1=0X07。 /* 設(shè)置數(shù)字輸入輸出口 */ PIE1=0。 /* PIE1 的中斷不使能 */ PIE2=0。 /* PIE2 的中斷不使能 */ PIE3=0。 /* PIE3 的中斷不使能 */ } //功能描述 : CAN 初始化子程序，采用標準標識符，自測試模式 void initcan() { /* ************設(shè)置對 CAN 進行配置 *************** */ TRISB=(TRISB|0X08)amp。0XFB。 /*設(shè)置 CANRX/RB3 輸入 ,CANTX/RB2 輸出 */ CANCON=0X80。 /* CANCON， bit75:1XX 請求配置 */ while((CANSTATamp。0X80)==0) /* CAN 狀態(tài)寄存器。 bit75:100 配置方式 */ { 。 } /* 等待進入 CAN 配置模式 OPMODE=100 */ /* ***********波特率設(shè)置 ************************** */ 畢業(yè)論文 33 BRGCON1=0X01。 /* Sync_Seg(bit76)=1TQ,BRP(bit50)=1， 則 TQ=((2*(BRP+1))/Fosc=4/4M=1us */ BRGCON2=0X90。 /*bit7=1 自由編程 ,bit6=0 總線在采樣點采樣 1 次 。Phase_Seg1(bit53)=3TQ。Prog_Seg(bit20)=1TQ*/ BRGCON3=0X42。 /* 設(shè)置 Phase_Seg2(bit20)=3TQ */ /* 標稱位時間＝ TQ*(Sync_Seg+ Prop_Seg+ Phase_seg1+ Phase_seg2) =(1+1+3+3)TQ＝ 8TQ, 位率 =1/(8*1U)= */ /* ******設(shè)置發(fā)送郵標識符號和初始發(fā)送的數(shù)據(jù) ***** */ TXB0CON=0X03。 /* bit10:發(fā)送優(yōu)先級 ,設(shè)置 TXB0 為最高優(yōu)先級 3 */ TXB0SIDL=CAN_Adress_Lamp。0xe0。 /* bit3=0 標準標識符 ,bit75:標準標識符 20 位 */ TXB0SIDH=CAN_Adress_H。 /* 標準標識符的 103 位 */ TXB0DLC=0X08。 /* 設(shè)置數(shù)據(jù)長度為 8 個字節(jié) */ TXB0D0=0X00。 /* 寫發(fā)送緩沖器數(shù)據(jù)區(qū)數(shù)據(jù)初值 */ TXB0D1=0X01。 /* 寫發(fā)送緩沖器數(shù)據(jù)區(qū)數(shù)據(jù)初值 */ TXB0D2=0X02。 TXB0D3=0X03。 TXB0D4=0X04。 TXB0D5=0X05。 TXB0D6=0X06。 TXB0D7=0X07。 /* *******設(shè)置接收郵箱 0 的標識符和初始化數(shù)據(jù) ********** */ RXB0SIDL=CAN_Adress_Lamp。0xe0。 /* bit3=0 標準標識符 ,bit75:標準標識符 20 位 */ RXB0SIDH=CAN_Adress_H。 /* 標準標識符的 103 位 */ RXB0CON=0X20。 /* bit65=01 只接收有效的標準標識符信息 */ RXB0DLC=0X08。 /* 設(shè)置接收緩沖器 0 的數(shù)據(jù)區(qū)長度 8 個字節(jié) */ RXB0D0=0X02。 /* 初始化接收緩沖器 0 的數(shù)據(jù)區(qū)數(shù)據(jù) */ RXB0D1=0X03。 /* 初始化接收緩沖器 0 的數(shù)據(jù)區(qū)數(shù)據(jù) */ RXB0D2=0X04。 RXB0D3=0X05。 RXB0D4=0X00。 畢業(yè)論文 34 RXB0D5=0X00。 RXB0D6=0X00。 RXB0D7=0X00。 /* *******初始化接收濾波器 0 和接收屏蔽 **************** */ RXF0SIDH=CAN_Adress_H。 RXF0SIDL=CAN_Adress_L。 /* 本字節(jié)高 3 位為標識符低 3 位，低 5 位是配置 */ RXM0SIDH=0Xff。 RXM0SIDL=0Xe0。 /* 11 個 1 表示接收 11 位標識符進行濾波，標識符 不同不接收 。若全為 0，若正確信息，全部接收 */ /* *******設(shè)置 CAN 工作模式 **************************** */ CANCON=0X40。 /* bit6:=1 進入自測試模式 。=0,正常操作模式 */ while((CANSTATamp。0X40)!=0) /* 檢測 CAN 配置完成 */ { 。 } /* 初始化 CAN 的中斷， PIR3 為 CAN 的外圍中斷標志寄存器 */ PIR3=0X00。 /* 清所有 CAN 中斷標志 */ PIE3=PIE3|0X01。 /* 使能接收緩沖器 0 的接收中斷 */ IPR3=IPR3|0X01。 /* 接收緩沖器 0 的接收中斷為最高優(yōu)先級 */ } //功能描述： CAN 接收數(shù)據(jù)后處理子程序：接收數(shù)據(jù)加 1 為下次發(fā)送的數(shù)據(jù) void CAN_deal() { CAN_FLAG=0。 /* 清接收到標志 */ TXB0CON=TXB0CONamp。0xf7。 /* TXB0REQ=0，禁止發(fā)送請求 */ TXB0D0=RXB0D0+1。 /* 用接收數(shù)據(jù)加 1 來更新發(fā)送數(shù)據(jù) */ TXB0D1=RXB0D1+1。 TXB0D2=RXB0D2+1。 TXB0D3=RXB0D3+1。 畢業(yè)論文 35 TXB0D4=RXB0D4+1。 TXB0D5=RXB0D5+1。 TXB0D6=RXB0D6+1。 TXB0D7=RXB0D7+1。 } //功能描述 : 高優(yōu)先級中斷子程序： RXB0 接收郵箱 0 接收中斷子程序 void interrupt HI_ISR() { if(RXB0IF==1) /* RXB0 接收郵箱 0 接收中斷 */ { CAN_FLAG=1。 /* 置接收到 CAN 數(shù)據(jù) */ RXB0IF=0。 /* 清接收中斷標志 */ RXB0FUL=0。 /* bit7＝ 0 打開接收緩沖器接收新信息 */ } }