pic18f單片機can通信程序及ad采樣

上傳人：奔*** IP屬地：河北更新時間：2024-07-28 格式：docx 頁數(shù)：7 大小：30.88KB 人氣指數(shù)：12 舉報 版權(quán)申訴

已閱讀1頁，還剩6頁未讀，繼續(xù)免費閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進行舉報或認(rèn)領(lǐng)

文檔簡介

1、　　程序流程圖　　功能描述:AD數(shù)據(jù)采集,AD采集20組數(shù)據(jù)，每組數(shù)據(jù)50個采樣值,然后將采樣值經(jīng)過　　計算平均值并轉(zhuǎn)換為十進制數(shù)據(jù)后發(fā)送到CAN，在PC機上用CANTools軟件調(diào)試　　主函數(shù)流程圖中斷函數(shù)流

2、程圖　　程序源碼　　/* ****************************************************************　　***********************************************************

3、**** */　　#include"pic18f4680.h"/* PIC18系列的頭文件 */　　charCAN_TX_Adress_H,CAN_TX_Adress_L;/* CAN 發(fā)送郵箱標(biāo)識符高低字節(jié) */　　charCAN_RX_Adress_H,CAN_RX_Adre

4、ss_L;/* CAN 接收郵箱標(biāo)識符高低字節(jié) */　　#define CHANNEL7 0X1D //選擇模擬通道7采集正輸出電壓　　#define CHANNEL6 0X19//選擇模擬通道6采集正輸出電流　　#define CHANNEL3 0X0D//選擇模擬通道3采集正輸出電壓

5、　　#define CHANNEL2 0X09//選擇模擬通道2采集正輸出電流　　#define CHANNEL1 0X05//選擇模擬通道1采集負(fù)輸出電流　　#define CHANNEL0 0X01//選擇模擬通道0采集負(fù)輸出電壓　　#define LN 50 //采集50次進行平均<

6、;/p>　　#define LAN 20 //采集20個平均值　　bank2 uint AD[LN];//存放50次采樣值 　　uint RES[LAN]; //存放20個平均值　　uint RESVP=0x0000; //存放正輸出電壓采樣值，供CAN上傳數(shù)據(jù)

7、;　　uint RESIP=0X0000;//存放正輸出電流電壓采樣值，供CAN上傳數(shù)據(jù)　　uint RESVN=0X0000;//存放負(fù)輸出電壓采樣值，供CAN上傳數(shù)據(jù)　　uint RESIN=0X0000;//存放負(fù)輸出電流正電壓采樣值，供CAN上傳數(shù)據(jù)　　uchar WAIT_FLAG

8、; //等待中斷標(biāo)志位　　uint count; //100次計數(shù)　　/* ****************************************************************　　** 函數(shù) 名: initial()&

9、lt;/p>　　** 功能描述: 系統(tǒng)初始化子程序，放在程序首部　　*************************************************************** */　　voidinitial()　　{</

10、p>　　count=0;　　INTCON=0x00;/* bit7-bit0:關(guān)總中斷 */ 　　PIE1=0;/* PIE1 的中斷不使能 */　　PIE2=0;/* PIE2 的中斷不使能 */</

11、p>　　PIE3=0;/* PIE3 的中斷不使能 */　　}　　/* ****************************************************************　　** 函數(shù) 名: initc

12、an()　　** 功能描述: CAN初始化子程序，采用標(biāo)準(zhǔn)標(biāo)識符，正常工作模式　　*************************************************************** */　　voidinitcan()　　{&

13、lt;/b>　　// 設(shè)置發(fā)送郵箱0標(biāo)識符 :10011001010=0x04CA 　　CAN_TX_Adress_L=0x55; //CAN低地址標(biāo)識符　　CAN_TX_Adress_L=CAN_TX_Adress_L&0xe0;　　CAN_TX_A

14、dress_H=0x99; //CAN高地址標(biāo)識符，應(yīng)與發(fā)送方標(biāo)識符相同　　// 設(shè)置接收郵箱0標(biāo)識符 :00110011111=0x019F 　　CAN_RX_Adress_H=0x33; //CAN高地址標(biāo)識符　　CAN_RX_Adress_L=0xe0; //C

15、AN低地址標(biāo)識符，應(yīng)與發(fā)送方標(biāo)識符相同　　CAN_RX_Adress_L=CAN_RX_Adress_L&0xe0;　　// ************設(shè)置對CAN進行配置*************** 　　TRISB=TRISB & 0XFB; // 設(shè)置CANRX/RB

16、3輸入,CANTX/RB2輸出 　　CANCON=0X80; //CANCON，bit7-5:1XX請求配置 　　while((CANSTAT & 0X80)==0) // CAN狀態(tài)寄存器。bit7-5:100配置方式　　{</p&g

17、t;　　; // 等待進入CAN配置模式OPMODE=100　　} 　　// ***********波特率設(shè)置 ************************** 　　BRGCON1=0X07;

18、// Sync_Seg(bit7-6)=1TQ,BRP(bit5-0)=1，則TQ=((2*(BRP+1))/Fosc=16/32M=0.5us 　　BRGCON2=0X90;//bit7=1自由編程,bit6=0總線在采樣點采樣1次;phase_Seg1(bit5-3)=3TQ;　　BRGCON3=0X42;// Prog_Seg(b

19、it2-0)=1TQ,設(shè)置Phase_Seg2(bit2-0)=3TQ 　　// 標(biāo)稱位時間＝TQ*(Sync_Seg+ Prop_Seg+ Phase_seg1+ Phase_seg2)=(1+1+3+3)TQ＝8TQ, 　　//位率=1/(8*0.5us)=250Kbps　　// ******設(shè)置發(fā)送郵箱0

20、和初始發(fā)送的數(shù)據(jù)***** 　　TXB0SIDL=CAN_TX_Adress_L&0xe0; //bit3=0標(biāo)準(zhǔn)標(biāo)識符,bit7-5:標(biāo)準(zhǔn)標(biāo)識符2-0位　　TXB0SIDH=CAN_TX_Adress_H;// 標(biāo)準(zhǔn)標(biāo)識符的10-3位　　TXB0CON=0X03;// bit1-0:發(fā)送

21、優(yōu)先級,設(shè)置TXB0為最高優(yōu)先級3　　TXB0DLC=0X08;// 設(shè)置數(shù)據(jù)長度為8個字節(jié) 　　TXB0D0=0X00; /* 寫發(fā)送緩沖器數(shù)據(jù)區(qū)數(shù)據(jù)初值 */　　TXB0D1=0X00;　　TXB0D2=0X00;

22、 　　TXB0D3=0X00;　　TXB0D4=0X00;　　TXB0D5=0X00;　　TXB0D6=0X00;　　TXB0D7=0X00;　　/*接收緩沖區(qū)0的

23、ID、數(shù)據(jù)長度寫無效，故不需設(shè)置*/　　RXB0CON=0X20;// bit6-5=01只接收有效的標(biāo)準(zhǔn)標(biāo)識符信息 　　// *******初始化接收濾波器0和接收屏蔽**************** 　　RXF0SIDH=CAN_RX_Adress_H;

24、　　RXF0SIDL=CAN_RX_Adress_L&0xe0; //高3位為標(biāo)識符低3位，低5位是配置 　　RXM0SIDH=0XFF;　　RXM0SIDL=0XE0;// 11個1表示接收11位標(biāo)識符進行濾波，標(biāo)識符不同不接收;若全為0，若正確信息，全部接收　　// *******設(shè)置C

25、AN工作模式**************************** 　　CANCON=0X00;//=0X40,進入自測試模式;=0x00,正常操作模式　　while((CANSTAT&0XE0)!=0); // 檢測CAN配置完成 　　/* 初始化CAN的中斷，PIR3

26、為CAN的外圍中斷標(biāo)志寄存器 */　　PIR3=0X00; // 清所有CAN中斷標(biāo)志 　　PIE3=PIE3|0X01; //使能接收緩沖器0的接收中斷 　　IPR3=IPR3|0X01; // 接收緩沖器0的接收中斷為最高優(yōu)先級

27、　　}　　void CAN_SEND()　　{　　TXB0REQ=0; /* 關(guān)發(fā)送，該位發(fā)送成功則自動清零*/ 　　TX

28、B0D0=RESVP/100;　　TXB0D1=(RESVP%100)/10;　　TXB0D1=(TXB0D1<<4)|((RESVP%100)%10);　　TXB0D2=RESIP/100;　　TXB0D3=(RESIP%100)/10;

29、 　　TXB0D3=(TXB0D3<<4)|((RESIP%100)%10);　　TXB0D4=RESVN/100;　　TXB0D5=(RESVN%100)/10;　　TXB0D5=(TXB0D5<<4)|((RESVN%100)%

30、10);　　TXB0D6=RESIN/100;　　TXB0D7=(RESIN%100)/10;　　TXB0D7=(TXB0D7<<4)|((RESIN%100)%10); 　　TXB0REQ=1; /* bit3(TXR

31、EQ)=1請求發(fā)送 ,開始發(fā)送數(shù)據(jù)*/　　while(TXB0REQ==1); //等待發(fā)送完成 　　}　　/* ******************************************************

32、**********　　** 函數(shù) 名: interruptHI_ISR()　　** 功能描述: 高優(yōu)先級中斷子程序：RXB0接收郵箱0接收中斷子程序　　*************************************************************** */

33、　　void interruptHI_ISR()　　{　　if(RXB0IF==1)　　{ 　　if(RXB0D0==0xF0) //判斷命令，是否要上傳數(shù)據(jù)&l

34、t;/p>　　{　　WAIT_FLAG=0x00;// 置接收到 CAN 數(shù)據(jù) 　　} 　　RXB0FUL=0;// bit7＝0打開接收緩沖器接收新信息 <

35、p>　　RXB0IF=0;// 清接收中斷標(biāo)志 　　}　　}　　void get_ad(uint *x)　　{<p

36、>　　GODONE=1; //開始AD轉(zhuǎn)換，轉(zhuǎn)換完成后GODONE清零　　while(GODONE); //等待轉(zhuǎn)換完成　　*x=(ADRESH<<8)+ADRESL;　　}&l

37、t;p>　　//************************主程序****************************　　void main()　　{　　uchar ia,ib;　　osc_config(0x70,0x

38、40); //8MHz，四倍頻Fosc=8MHz*4　　initial(); // 系統(tǒng)初始化子程序 　　io_init();　　adc_init();　　initcan();// CAN設(shè)置初始化 　　I

39、PEN=1;// 使能中斷高低優(yōu)先級 　　INTCON=INTCON|0xC0;// 開總中斷、開外圍接口中斷 　　TXB0REQ=0;/* 關(guān)發(fā)送，TXB0REQ=0;緩沖區(qū)沒有要發(fā)送的數(shù)據(jù) */　　RXB0FUL=0; /*清零RXB0FUL,表示緩沖區(qū)未接

40、收到數(shù)據(jù)*/　　WAIT_FLAG=0X01;// 關(guān)發(fā)送，TXB0REQ=0; 　　while(1)　　{　　while (WAIT_FLAG==0X01); //等待中斷</

41、p>　　//* ***************測正電壓**************　　for (ib=0;ib<LAN;ib++) //LAN==16(20)　　{　　for (ia=0;ia<LN;ia++)

42、//LN==64(50)　　{　　ADCON0=CHANNEL3;　　get_ad(&AD[ia]); 　　}　　RES[i

43、b]=0x0000;　　for (ia=0;ia<LN;ia++)　　{　　RES[ib]+=AD[ia];　　}　　RES[ib]=RES[ib]

44、/50;　　}　　RESVP=0X0000; //保存平均的結(jié)果　　for (ib=0;ib<LAN;ib++)　　{

45、;　　RESVP=RESVP+RES[ib];　　}　　RESVP=RESVP/20; 　　//*****************測正壓ACS輸出******************　　for (ib=0;ib<LAN;ib+

46、+)　　{　　for (ia=0;ia<LN;ia++)　　{　　ADCON0=CHANNEL2;　　get_ad(&AD[ia]);<

47、;/p>　　}　　RES[ib]=0x0000;　　for (ia=0;ia<LN;ia++)　　{　　RES[ib]+=AD[ia];&

48、lt;p>　　}　　RES[ib]=RES[ib]/50;　　}　　RESIP=0X0000; //保存平均的結(jié)果　　for (ib=0;ib<L

49、AN;ib++)　　{　　RESIP+=RES[ib];　　}　　RESIP=RESIP/20; 　　//**********************測

50、負(fù)電壓********************　　for (ib=0;ib<LAN;ib++)　　{　　for (ia=0;ia<LN;ia++)　　{<

51、p>　　ADCON0=CHANNEL0;　　get_ad(&AD[ia]); 　　}　　RES[ib]=0x0000;　　for (ia=0;ia<LN;ia++)&l

52、t;p>　　{　　RES[ib]+=AD[ia];　　}　　RES[ib]=RES[ib]/50; //保存平均的結(jié)果　　}&l

53、t;p>　　RESVN=0X0000; 　　for (ib=0;ib<LAN;ib++)　　RESVN+=RES[ib];　　RESVN=RESVN/20; 　　//*******************

54、測負(fù)電源ACS輸出*******************　　for (ib=0;ib<LAN;ib++)　　{　　for (ia=0;ia<LN;ia++)　　{

55、　　ADCON0=CHANNEL1;　　get_ad(&AD[ia]); 　　}　　RES[ib]=0x0000;　　for (ia=0;ia<LN;ia++)

56、;　　{　　RES[ib]+=AD[ia];　　}　　RES[ib]=RES[ib]/50;　　}<p&g

57、t;　　RESIN=0X0000;　　for (ib=0;ib<LAN;ib++)　　{　　RESIN+=RES[ib];　　}　　RESIN=RE

58、SIN/20; 　　CAN_SEND(); 　　if(count>=99)　　{　　WAIT_FLAG=0X01; //發(fā)送完一百個數(shù)據(jù)后關(guān)閉發(fā)送　　count=0;

59、 //等待下一次接收CAN的命令　　}　　else　　{　　count++;&l

眾賞文庫> 全部分類> 畢業(yè)設(shè)計

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

pic18f單片機can通信程序及ad采樣

文檔簡介

溫馨提示

最新文檔

評論

pic18f單片機can通信程序及ad采樣

文檔簡介

溫馨提示

最新文檔

評論

免費下載