基于單片機的遠程監測系統設計論文監測系統論文-資料下載頁

　　

【正文】 DZ){ uchar V,VH,VL。 VL=ADZ%10。 LED_8=table1[VL]。附錄4 PTR2000發送部分程序代碼ORG 0200HTANSF:MOV SCON , 11010000B 。 串口通信方式3 , 允許接收MOV PCON , 00H。 波特率不加倍SMOD=1MOV TMOD , 20H。 定時器1 , 方式2MOV TL1 , 0FDH。 設定初值波特率9600MOV TH1 , 0FDH。 設定初值SETB TR1；啟動定時/計數器T1CLR ；使PTR2000工作于1通道SETB ；使PTR2000工作于正常狀態START:SETB ；使其處于發送狀態ACALL DELAY5ms；接收到發送的轉換時間為5msMOV DPH,50H。指針指向握手信號數據塊MOV DPL,00H MOV R1,20H。發送20字節握手信號AT1: MOV R2,55H。握手信號為55HCLR TI。清TICLR AMOV A,R2MOV SUBF,A；從串口發送JNB TI,$。等待發送完CLR TIDJNZ R1,AT1。數據發送完，繼續CLR ；置PTR2000為接收狀態ACALL DELAY5ms；發送到接收的轉換時間為5msAR1: JNB RI,AR1；查詢接收標志CLR RI MOV A,SBUF；取串口數據到寄存器A中 CJNE A,AAH,START；比較收到的信號，是AAH則發送數據AT2: SETB ACALL DELAY5msMOV R0,20H；發送數據塊首地址送R0 MOV R7,4；數據塊的長度送R7 MOV A,00H。累加和單元清零AT3: MOV SBUF, @R0；發送一個數據ADD A,@R0；求累加和INC R0；地址指針加1AS1: JBC TI,AT4；判斷一幀是否發送完 SJMP AS1；未完等待AT4: DJNZ R7,AT3；數據塊未發送完，轉發送 MOV SUBF,A；數據塊發送完，發送校驗和AS2: JBC TI,AR3 SJMP AS2AR3: CLR ；置PTR2000為接收狀態 ACALL DELAY5ms；發送到接收的轉換時間 JBC RI,AR4；等待接收對方的回答 SJMP AR3AR4: MOV A,SBUF；讀對方回答信號到A中JNZ AT2；結果非0，對方接收出錯，轉重新發送RET；結果為0，對方接收正確，子程序返回DELAY5ms: MOV R5,10D1: MOV R6,248DJNZ R6,$DJNZ R5,D2RET附錄5 PTR2000接收部分程序代碼ORG 0200HRECEV: NUM EQU 2BHMOV SP,80H。設置數據指針的位置MOV SCON , 11010000B 。 (串口通信方式3 , 允許接收)MOV PCON , 00H。 (波特率不加倍)MOV TMOD , 20H。 (定時器1 , 方式2)MOV TL1 , 0FDH。 (設定初值波特率9600)MOV TH1 , 0FDH。 (設定初值)SETB TR1。啟動定時/計數器CLR ；使PTR2000工作于1通道SETB ；使PTR2000正常工作START:CLR ；置PTR2000為接收狀態ACALL DELAY5msBR1: MOV NUM,0。記錄連續收到同步符55H的個數B1： JNB RI,B2；判斷串口有數據轉換B2: CLR RI；清接收中斷標志 MOV A,SBUF；讀串口數據 CJNE A,55H,BR1。不是同步字符轉BR1 INC NUM。收到的同步字符加1 MOV A,NUM。取收到的同步個數 CJNE A,20,B1。未連續收夠20個55H轉B1BT1: SETB ；置PTR2000為發送狀態 ACALL DELAY5ms；延時5ms MOV SUBF,AAHBS1: JBC TI,BR2 SJMP BS1BR2: CLR ；置PTR2000為接收狀態ACALL DELAY5ms；延時5msMOV R0,70H；接收數據首地址送DPTR MOV R7,4；數據塊長度送R7 MOV R6,00H；累加和寄存器清零BR3: JBC RI,BR4。等待接收一幀數據 SJMP BR3BR4: MOV A,SUBF；讀取一幀數據到A中 MOV @R0,A；將接收到的數據存入外部RAM INC R0；修改數據存儲地址 ADD A,R6；求累加和 MOV R6,A；保存累加和 DJNZ R7,BR3；判斷數據塊是否接收完，未完轉接收BS2: JBC RI,BR6；數據塊接收完畢，等待接收校驗和 SJMP BS2BR5: MOV A,SBUF；讀取校驗和到A中 XRL A,R6；校驗和與累加和做異或運算 JZ BR6；結果為零，兩者相等，則轉BT2: SETB ；置PTR2000為發送狀態 ACALL DELAY5ms MOV SBUF,0FFH；兩者不等，向對方發送出錯標志BS3: JBC TI,BR2；轉重新接收 SJMP BS3BR6: SETB ；置PTR2000為發送狀態 ACALL DELAY5msMOV SBUF,00H；向對方發送接收正確標志ZH1: MOV R1,70H；接收到的數據塊的首地址為70H MOV R5,4 MOV R3,0ZH2: MOV A,@R0；取數據放入A中MOV B,64H。64H是十進制的100，除數100送B中 DIV AB。商（百位數的BCD碼）在A中，余數在B中 MOV 43H,A。百位數送22H MOV A,B。余數送A做被除數 MOV B,0AH。除數10送B中 DIV AB。十位數BCD碼在A中，個位數在B中 MOV 42H,A。十位數BCD碼送42H中 MOV 41H,B。個位數送41H中 INC R1 INC R3 MOV 40H,R3；把采集通道的地址放入40H中 DJNZ R5,ZH2DELAY5ms: MOV R5,10D1: MOV R6,248DJNZ R6,$DJNZ R5,D2RET附錄6 數碼管顯示部分程序數碼管顯示/*****************************************實驗功能：可以實現時鐘，顯示百位，十位，個位和最低位；實現方法：通過定時器T0，實現精確的定時時間： 20110105*****************************************/includedefine uint unsigned intdefine uchar unsigned chardefine LED_8 P0sbit c1= P2^7。sbit c2= P2^6。sbit c3= P2^5。sbit c4= P2^4。//變量聲明uchar aa,bb,cc。//函數聲明void delay()。void display(uchar fen,uchar miao,uchar bfm)。uchar code table1[]={0x03,0x9f,0x25,0x0d,0x99,0x49,0x41,0x1f, 0x01,0x09,0x11,0xc1,0x63,0x85,0x61,0x71}。void main(){ TMOD=0x11。 TH0=0xd8。 TL0=0xf0。//定時10MS EA=1。 TR0=1。 ET0=1。 aa=66。 bb=9。 cc=0。 while(1) { display(cc,bb,aa)。 }}//void Time_t0() interrupt 1{ TH0=0xd8。 TL0=0xf0。//定時10MS aa++。 if(aa==100) { aa=0。 bb++。 } if(bb==60) { bb=0。 cc++。 } if(cc==60) cc=0。}//顯示子程序void display(uchar fen,uchar miao,uchar bfm){ uchar fenL,miaoH,miaoL,bfmH。 bfmH=bfm/10。 LED_8=table1[bfmH]。 c1=0。 delay()。 c1=1。 miaoH=miao%10。 LED_8=table1[miaoH]。 c2=0。 delay()。//延時顯示 c2=1。 miaoL=miao/10。 LED_8=table1[miaoL]。 c3=0。 delay()。 c3=1。 fenL=fen%10。 LED_8=table1[fenL]。 c4=0。 delay()。 c4=1。}//延時子程序 void delay(){ uint i,j。 for(i=1。i0。i) for(j=110。j0。j)。