STM32 CAN總線測試程序 本程序分主機程序和從機程序 硬件平臺是本人自己設計的開發板 經測試程序運行穩定
單片機源程序如下:
- #include "led.h"
- #include "delay.h"
- #include "key.h"
- #include "sys.h"
- #include "lcd.h"
- #include "usart.h"
- #include "can.h"
- #include "ds18b20.h"
- int main(void)
- {
- u8 i=0,t=0;
- u8 canbuf1[8];
- u8 canbuf0[8];
- u8 temp;
- u8 res;
- short temperature;
- NVIC_Configuration(); //設置NVIC中斷分組2:2位搶占優先級，2位響應優先級
- KEY_Init(); //按鍵初始化
-
- CAN_Mode_Init(CAN_SJW_1tq,CAN_BS2_1tq,CAN_BS1_6tq,9,CAN_Mode_Normal);//CAN初始化環回模式,波特率500Kbps 原來的 CAN_Mode_Normal
- delay_init(); //延時函數初始化
- uart_init(9600); //串口初始化為9600
- LED_Init(); //初始化與LED連接的硬件接口
- LCD_Init();
- POINT_COLOR=RED;//設置字體為紅色
- LCD_ShowString(60,50,200,16,16,"Mini STM32");
- LCD_ShowString(60,70,200,16,16,"DS18B20+CAN TEST");
- LCD_ShowString(60,90,200,16,16,"ATOM@ALIENTEK");
- LCD_ShowString(60,110,200,16,16,"2016/6/6");
- LCD_ShowString(60,130,200,16,16,"LoopBack Mode");
- LCD_ShowString(60,190,200,16,16,"Send Data:");
- while(DS18B20_Init()) //DS18B20初始化
- {
- LCD_ShowString(60,130,200,16,16,"DS18B20 Error");
- delay_ms(200);
- LCD_Fill(60,130,239,130+16,WHITE);
- delay_ms(200);
- }
- LCD_ShowString(60,130,200,16,16,"DS18B20 OK");
- POINT_COLOR=BLUE;//設置字體為藍色
- LCD_ShowString(60,150,200,16,16,"Temp: . C");
- while(1)
- {
- if(t%10==0)//每100ms讀取一次
- {
- temperature=DS18B20_Get_Temp();
- if(temperature<0)
- {
- LCD_ShowChar(60+40,150,'-',16,0); //顯示負號
- temperature=-temperature; //轉為正數
- }else LCD_ShowChar(60+40,150,' ',16,0); //去掉負號
- LCD_ShowNum(60+40+8,150,temperature/10,2,16); //顯示正數部分
- LCD_ShowNum(60+40+32,150,temperature%10,1,16); //顯示小數部分
-
- temp=temperature;
- for(i=0;i<8;i++)
- canbuf0[i]=temp; //溫度賦值并發送到主機
- Can_Send_Msg(canbuf0,8);//發送8個字節
- temp=temperature>>8;
- for(i=0;i<8;i++)
- canbuf1[i]=(temp); //溫度賦值并發送到主機
- Can_Send_Msg(canbuf1,8);//發送8個字節
- // if(res)LCD_ShowString(60+80,190,200,16,16,"Failed"); //提示發送失敗
- // else LCD_ShowString(60+80,190,200,16,16,"OK "); //提示發送成功
- }
- delay_ms(10);
- t++;
- if(t==20)
- {
- t=0;
- LED0=!LED0;
- }
- }
- }
所有資料51hei提供下載:
CAN實驗.rar
(1.32 MB, 下載次數: 177)
2018-5-3 02:42 上傳
點擊文件名下載附件
|
[復制鏈接]
