單片機RS485通信源程序_第1頁
單片機RS485通信源程序_第2頁
單片機RS485通信源程序_第3頁
單片機RS485通信源程序_第4頁
單片機RS485通信源程序_第5頁
已閱讀5頁,還剩2頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、附錄一、主機源程序#include <reg52.H>unsigned char xdata table5;unsigned char code tab=0x03,0x9f,0x25,0x0d, 0x99,0x49,0x41,0x1f, 0x01,0x09,0x05,0xc1, 0x63,0x85,0x61,0x71,0xff;sbit ctrl=P12;sbit DATA=P10;sbit CLK=P11;void show(unsigned char m)/LED顯示子程序unsigned char i,d;d=tabm;for(i=0;i<8;i+) DATA=d&am

2、p;0x01; CLK=0; CLK=1; d=d>>1; void interrupt0(void) interrupt 0 using 0/串行中斷程序 unsigned char cm0,cm1,sum0,sum1,i; lab: sum0=0; ctrl=1;/將MAX485設置為發(fā)送方式 SBUF=0xFF;/發(fā)送數(shù)據(jù)申請 while(TI!=1); ctrl=0; /將MAX485設置為接收方式 TI=0; while(RI!=1); cm0=SBUF;/接收申請確認信號 RI=0; if(cm0=0xff) i=0; ctrl=0; while(RI!=1); cm1

3、=SBUF; /接收第一個數(shù)據(jù) RI=0; while(cm1!=0xf0) tablei=cm1; while(RI!=1); cm1=SBUF;/接收后續(xù)的數(shù)據(jù) RI=0; i+; for(i=0;i<4;i+) sum0=sum0+tablei;/計算校驗和 sum1=table4;/獲取收到的校驗和 if(sum0=sum1) ctrl=1; SBUF=0xf0; /發(fā)送數(shù)據(jù)確認信號 while(TI!=1); TI=0; for(i=0;i<4;i+) show(tablei); else goto lab; else goto lab; ctrl=1;/將MAX485設

4、置為發(fā)送方式 return ;void main(void) SCON = 0x50; /串口方式1,允許接收 TMOD = 0x20; /定時器1 定時方式2 PCON=0x80; /設SMOD=1; TH1 = 0xFA; /11.0592MHz 9600 波特率 TL1 = 0xFA; TR1 = 1; /啟動定時器 EX0=1; /開外部中斷0 IT0=0; EA=1; /開總中斷 ctrl=1;/將MAX485設置為發(fā)送方式 while(1); /等待中斷附錄二、從機源程序#include <reg52.H>unsigned char xdata table=0,0,0,

5、0;sbit replay=P10;sbit warn0=P11;sbit CTRL=P12;sbit DATA=P13;sbit CLK=P14;unsigned char code tab=0x03,0x9f,0x25,0x0d, /顯示用的碼表 0x99,0x49,0x41,0x1f, 0x01,0x09,0x05,0xc1, 0x63,0x85,0x61,0x71,0xff;void delay(void) /鍵盤掃描延時10ms程序 unsigned char i,j; for(i=20;i>0;i-) for(j=248;j>0;j-);void show(unsign

6、ed char m)/LED顯示子程序 unsigned char i,d; d=tabm; for(i=0;i<8;i+) DATA=d&0x01; CLK=0; CLK=1; d=d>>1; void ser(void) interrupt 4 using 0/串行中斷程序 unsigned char cm,sum,i; sum=0; replay=1; warn0=1; cm=SBUF; RI=0;if(cm=0xf0)/判斷是否為主機返回的確認信號 replay=0; /表示已正確發(fā)送完一組數(shù)據(jù) goto end; else if(cm!=0xff)/判斷是否

7、為主機的數(shù)據(jù)申請 warn0=0; /通信命令錯誤提示 goto end;else CTRL=1; /置MAX485為發(fā)送方式 SBUF=0xff;/發(fā)送申請確認信號 while(TI!=1); TI=0;for(i=0;i<4;i+) SBUF=tablei; /發(fā)送數(shù)據(jù) while(TI!=1); TI=0; sum=sum+tablei;/計算校驗和 SBUF=sum; /發(fā)送校驗和while(TI!=1);TI=0;SBUF=0xf0;/發(fā)送結束標志while(TI!=1);TI=0; end: CTRL=0; /置MAX485為接收方式 return;void main(voi

8、d) unsigned char key,X,Y,temp; SCON = 0x50; /串口方式1,允許接收 TMOD = 0x20; /定時器1 定時方式2 PCON=0x80; /設SMOD=1; TH1 = 0xFA; /11.0592MHz 9600 波特率 TL1 = 0xFA; TR1 = 1; /啟動定時器 ES=1; /開串行中斷 EA=1; /開總中斷 CTRL=0; /置MAX485為接收方式 replay=1; warn0=1; while(1) /鍵盤掃描 P2=0xff; /鍵盤初始化 P2=0xf0; if (P2!=0xf0) delay(); /延時去抖 if

9、 (P2!=0xf0) X=P2; /讀鍵盤P2=0x0f;Y=P2; P2=X|Y; temp=P2;switch(temp) case 0xee:key=0;break; case 0xde:key=1;break; case 0xbe:key=2;break; case 0x7e:key=3;break; case 0xed:key=4;break; case 0xdd:key=5;break; case 0xbd:key=6;break; case 0x7d:key=7;break; case 0xeb:key=8;break; case 0xdb:key=9;break; case 0xbb:key=10;break; case 0x7b:key=11;break; case 0xe7:key=12;break; case 0xd7:key=13;break; case 0xb7:key=14;break; case 0x77:key=15;break; for(X=0;X<4;X+) /存儲最近讀的按鍵碼

溫馨提示

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

最新文檔

評論

0/150

提交評論