PIC16F877單片機與PC機通訊的匯編程序

;PIC16F877單片機程序
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 ；發送允許
BCF STATUS，RP0
WAIT BTFSS PIR1，RCIF ；接收PC機命令
GOTO WAIT
MOVF RCREG，0
MOVWF TEMP
MOVWF INDF
INCF FSR
DECFSZ TEMP ；接收到的數據為1，則接收
GOTO TXW ；否則發送數據
MOVLW 0X06
MOVWF TEMP
WAIT1 BTFSS PIR1，RCIF ；接收一個數據
GOTO WAIT1
MOVF RCREG，0
MOVWF COUNT
MOVWF TXREG
LOOPTX BTFSS PIR1，TXIF ；將接收到的數據送回PC機
GOTO LOOPTX
MOVF COUNT，0
MOVWF INDF
INCF FSR
DECFSZ TEMP
GOTO WAIT1
GOTO OVER ；處理完畢
TXW MOVLW 0X09 ；向PC機發送9個數據
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 ；通信任務完成，關接受和發送允許
BSF STATUS，RP0
BCF TXSTA，TXEN
BCF STATUS，RP0
CALL LED ；調用顯示子程序，將發送（或接收）的數據顯示出來
END ；程序完

PC 機程序
PC采用Toubr C 進行編寫。程序如下：
#includestdio.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位數據位，奇偶檢驗，1位停止位*/
outportb(port+1,0x00); /*關中斷*/
inportb(port+5); /*讀一次線路狀態寄存器，使其復位*/
{
printf("ttsend data or receive data: (s or r?)");
c=getchar();
switch(c)
{
case 's':
case 'S':
{
while(!(inportb(port+5)0x20)); /*發送保持器滿則等待*/
outportb(port,0x01); /*否則發送數據01通知單片機準備接收*/
for(i=0;i6;i++) /*共發送6個數據*/
{
a=b[i];
while(!(inportb(port+5)0x20))
delay(100); /*發送保持器滿，等待*/
outportb(port,a); /*發送a*/
printf("%d",a); /*顯示a*/
while(!(inport(port+5)1)); /*接收單片機送回的數據*/
ch[i]=inport(port); /*保存*/
}
delay(10);
for(j=0;j8;j++) /*顯示接收的回送數據*/
printf("%d",ch[j]);
getch();
break;
}
case'r': /*接收數據*/
case'R':
{
while(!(inportb(port+5)0x20));
outportb(port,0x02); /*發送數據02通知單片機發送數據*/
for(j=0;j9;j++) /*共接收9個數據*/
{
while(!(inportb(port+5)1));
ch[j]=inportb(port);
}
for(j=0;j9;j++)
printf("%d",ch[j]);
getch();
break;
}
}
}
}