pc計算機與單片機串口通信源程序

下面是一個單片機與PC機通信的程序，pc機程序用c語言來編寫，單片機程序用匯編語言來編寫

1. PC機編程
PC采用Toubr C 進行編寫。程序如下：
#include<stdio.h>
#define port 0x3f8 /*利用串口1進行通信*/
int ch[15];
main ()
{
int a;
int i,j;
int b[6]={88,15,38,26,20,0};
char c;
clrscr();
outportb(port+3,0x80); /*準備設置波特率*/
outportb(port,0x0C); /*一體成型電感器波特率設置為9 600 bps*/
outportb(port+1,0x00);
outportb(port+3,0x03); /*8位數(shù)據(jù)位，奇偶檢驗，1位停止位*/
outportb(port+1,0x00); /*關(guān)中斷*/
inportb(port+5); /*讀一次線路狀態(tài)寄存器，使其復位*/
{
printf("ttsend data or receive data: (s or r?)nnn");
c=getchar();
switch(c)
{
c一體成型電感器ase ’s’:
case ’S’:
一體成型電感器 {
while(!(inportb(port+5)&0x20)); /*貼片電感發(fā)送保持器滿則等待*/
outportb(port,0x01); /*否則發(fā)送數(shù)據(jù)01通知單片機準備接收*/
for(i=0;i<6;i++) /*共發(fā)送6個數(shù)據(jù)*/
{
a=b[i];
while(!(inportb(port+5)&0x20))
delay(100); /*發(fā)送保持器滿，等待*/
outportb(port,a); /*發(fā)送a*/
printf("%dn",a); /*顯示a*/
while(!(inport(port+5)&1)); /*接收單片機送回的數(shù)據(jù)*/
ch[i]=inport(port); /*保存*/
}
delay(10);
for(j=0;j<8;j++) /*顯示接收的回送數(shù)據(jù)*/
printf("n%dn",ch[j]);
getch();
break;
}
case’r’: /*接收數(shù)據(jù)*/
case’R’:
{
while(!(inportb(port+5)&0x20));
outportb(port,0x02); /*發(fā)送數(shù)據(jù)02通知單片機發(fā)送數(shù)據(jù)*/
for(j=0;j<9;j++) /*共接收9個數(shù)據(jù)*/
{
while(!(inportb(port+5)&1));
ch[j]=inportb(port);
}
for(j=0;j<9;j++)
printf("n %dn",ch[j]);
getch();
break;
}
}
}
}
2. 單片機與PC機通信之單片機程序
LIST P=16F876
#INCLUDE P16F876.INC
CBLOCK 0X24
COUNT
TEMP
ENDC
ORG 0X0000
NOP
START GOTO MAIN
ORG 0X020
MAIN MOVLW 0X30 ；將RAM單元初始化
MOVWF FSR
BCF STATUS，RP0
MOVLW 0X22
MOVWF COUNT
INTRAM MOVF COUNT，0
MOVWF INDF
INCF COUNT，1
INCF FSR，1
BTFSS FSR，7
GOTO INTRAM
BANKSEL TXSTA ；波特率設置為9 600 bps
MOVLW 0X19
MOVWF SPBRG ；異步高速方式
MOVLW 0X04
MOVWF TXSTA
BCF STATUS，RP0
MOVLW 0X80 ；串行口使能
MOVWF RCSTA
MOVLW 0X30
MOVWF FSR
BSF RCSTA，CREN ；接收允許
BSF STATUS，RP0
BSF TXSTA，TXEN ；發(fā)送允許
BCF STATUS，RP0
WAIT BTFSS PIR1，RCIF ；接收PC機命令
GOTO WAIT
MOVF RCREG，0
MOVWF TEMP
MOVWF INDF
INCF FSR
DECFSZ TEMP ；接收到的數(shù)據(jù)為1，則接收
GOTO TXW ；否則發(fā)送數(shù)據(jù)
MOVLW 0X06
MOVWF TEMP
WAIT1 BTFSS PIR1，RCIF ；接收一個數(shù)據(jù)
GOTO WAIT1
MOVF RCREG，0
MOVWF COUNT
MOVWF TXREG
LOOPTX BTFSS PIR1，TXIF ；將接收到的數(shù)據(jù)送回PC機
GOTO LOOPTX
MOVF COUNT，0
MOVWF INDF
INCF FSR
DECFSZ TEMP
GOTO WAIT1
GOTO OVER ；處理完畢
TXW MOVLW 0X09 ；向PC機發(fā)送9個數(shù)據(jù)
MOVWF TEMP
MOVLW 0X30
MOVWF FSR
TXW0 MOVF INDF，0
MOVWF TXREG
INCF FSR
TXW1 BTFSS PIR1，TXIF
GOTO TXW1
DECFSZ TEMP
GOTO TXW0
OVER BCF RCSTA，CREN ；通信任務完成，關(guān)接受和發(fā)送允許
BSF STATUS，RP0
BCF TXSTA，TXEN
BCF 電感器應用STATUS，RP0
CALL LED ；調(diào)用顯示子程序，將發(fā)送（或接收）的數(shù)據(jù)顯示出來
END ；程序完