CAN總線與PC機串口通信適配器設(shè)計與實現(xiàn)
加入技術(shù)交流群
以下為VB的發(fā)送接收程序：
Private SuBcmdSendàClick() 使用按鈕控件
MSComm1. Output= txtSend. Text 將傳送區(qū)內(nèi)的字符串以O(shè)utput屬性送出
End Sub
Private SuBFormàLoad() 窗體的加載事件
MSComm1. PortOpeN= True 將通訊斷口開啟，通訊參數(shù)也可以在開啟前先設(shè)定
MSComm1. RThreshold = Val (txtThreshold. Text) 設(shè)定引發(fā)接收事件的接收閾值，使程序一執(zhí)行便開啟通訊端口，將接收的閾值設(shè)定為閾值，設(shè)定文本框內(nèi)的值。
End Sub
Private SuBMSComm1. OnComm() 通訊控件的OnComm事件。引發(fā)接收事件后，將字符收進來并放在接收的文本框中
SelectCase MSComm1. CommEvent 根據(jù)下面每一個case 語句處理每個事件和錯誤事件
Case comEvCD CD 線的狀態(tài)發(fā)生變化
Case commEvReceive 收到Rthreshold # of
txtReceive. Text= txtReceive. Text+ Trim(MSComm1. Input)vbCrLf
Case comEvSend 傳輸緩沖區(qū)有Sthreshold 個字符
End Select
End Sub
Private SuBtxtThreshold Change ( ) p閾值設(shè)定文本框的Change事件
MSComm1. Rthreshold = Val (txtThreshold. Text) p當(dāng)設(shè)定的閾值變化時，實時改變通訊對象的屬性
End Sub
AT89C51單片機部分
單片機部分采用C語言編程。C語言編程具有快捷、模塊功能強大、可靠性好、效率高等優(yōu)點。其中程序初始化包括設(shè)定串口工作方式，定時器、中斷寄存器初始化，各變量的初始化。
TMOD = 0x20； //定時器1為發(fā)生器
SCON= 0x50； //串口工作方式1
TH1= 0xfd ； //設(shè)定波特率= 9600bit/s
TL1= 0xfd ;
EA= 1； //開中斷
ES= 1； //允許串口中斷
TR1= 1； //啟動定時器T1
SPECHAR = 0xff ； //設(shè)定通訊開始標(biāo)志
程序采用中斷接收，查詢發(fā)送的方式。串口中斷服務(wù)程序流程圖如圖3所示。
SJA1000控制器部分
初始化子程序CANINIT()
選用CAN2. 0協(xié)議構(gòu)建CAN總線控制網(wǎng)絡(luò)，對SJA1000的初始化主要包括工作方式的設(shè)置、驗收代碼寄存器ACR、驗收屏蔽寄存器AMR、波特率的參數(shù)設(shè)置等。
void canàinit(void) /*SJA1000的初始化子函數(shù)*/
{control = 1； /*禁止超載、出錯及接收中斷，并置復(fù)位請求位使其進入復(fù)位狀態(tài)*/
while (control0x01== 0);
acceptanceàcode = 0x01； /*驗收碼寄存器(存機號1號)*/
acceptanceàmask= 0xfe ； /*驗收屏蔽碼寄存器*/
busàtimingà0= 0x03； /*總線定時寄存器0，同步跳轉(zhuǎn)寬度
T0= T，BPS= 125 k*/
busàtimingà1= 0x18； /*總線定時寄存器1，T1= 9T，T2=2T，波特率為500kbit/S*/
outputàcontrol = 0x1A； /*正常輸出方式，TX1引腳懸浮*/
clockàdivider = 0x40； /*BASICCAN模式，RX1接固定電平*/
control = 0x1A； /*清復(fù)位請求，使其進入工作狀態(tài)*/
}
發(fā)送canàsend()
發(fā)送子程序負(fù)責(zé)節(jié)點報文的發(fā)送，由CAN控制器SJA1000獨立完成，將命令寄存器里的發(fā)送請求標(biāo)志置位，即可發(fā)送SJA1000發(fā)送緩沖區(qū)中的報文。
void canàsend(unsigned char ID ，char*xdata) /*該子函數(shù)完成一幀數(shù)據(jù)的發(fā)送*/
{while ( (status0x10)>> 4 == 1)àNOPà； /*檢查上次請求發(fā)送是否完成*/
while ( (status0x04)>> 2== 0)àNOPà;
Transmitbuffer1= ID;
Transmitbuffer2= 0x08;
Transmitbuffer3= txdata[0] ;
Transmitbuffer10= txdata[7] ;
Command = 0x05 ； /*發(fā)送請求*/
while ( (status0x08)>> 3== 0);
}
接收子程序canàreceive ()
接收子程序負(fù)責(zé)節(jié)點報文的接收。SJA1000自動接收發(fā)往該節(jié)點的數(shù)據(jù)并將收到的數(shù)據(jù)放到它的接收緩沖器中。
SJA1000的報文接收主要有2種方式：中斷接收方式和查詢接收方式。系統(tǒng)采用的是中斷接收方式。
{unsigned char ir ;
ir = interrupt； /*獲得SJA1000的中斷狀態(tài)*/
EA= 0;
If ( (ir0x04)>> 2== 1)error ( )； /*如果是出錯中斷，則調(diào)出錯處理函數(shù)*/
If ( (ir0x08)>> 3== 1)overruN( )； /*如果是超載中斷，則調(diào)超載處理函數(shù)*/
While ( ( (ir0x04)>> 2== 1)‖( ( (ir0x08)>> 3)== 1){àNOPà;}
RxID[0] = Receivebuffer1;
RxID[0] = Receivebuffer2;
If ( ( (Receivebuffer20x10)>> 4)== 0) /*如果是數(shù)據(jù)幀，則接收數(shù)據(jù)*/
{Rxdata[0] = Receivebuffer3;
.
Rxdata[7] = Receivebuffer10;
Command = 0x04 ； /*SJA1000的接收緩存器被釋放*/
}
else if ( ( (Receivebuffer20x10)>> 4)== 1) /*如果是遠(yuǎn)程幀，則作相應(yīng)處理*/
{ /*相應(yīng)處理程序*/
EA= 1;
}
}
結(jié)束語
介紹了一種低成本、高可靠性、快捷的通用型CAN總線與PC機通過RS-232串口互連方案。該互連方案很好地保證了管理監(jiān)控層和現(xiàn)場生產(chǎn)測控層之間的連接，方便了上下層信息交流，滿足工廠、變電站等工業(yè)場合的應(yīng)用要求。
評論