1. PC机编程
PC选用Toubr C 进行编写。程序如下：
#include
#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（“\t\tsend dataorreceive data： （sorr？）\n\n\n”）;
c=getchar（）;
switch（c）
{
case ’s’：
case ’S’：
{
while（！（inportb（port 5）&0x20））; /*发送坚持器满则等候*/
outportb（port，0x01）; /*不然发送数据01告诉 单片机 预备接纳*/
for（i=0;i《6;i ） /*共发送6个数据*/
{
a=b［i］;
while（！（inportb（port 5）&0x20））
delay（100）; /*发送坚持器满，等候*/
outportb（port，a）; /*发送a*/
printf（“%d\n”，a）; /*显现a*/
while（！（inport（port 5）&1））; /*接纳 单片机 送回的数据*/
ch［i］=inport（port）; /*保存*/
}
delay（10）;
for（j=0;j《8;j ） /*显现接纳的回送数据*/
printf（“\n%d\n”，ch［j］）;
getch（）;
break;
}
case’r’： /*接纳数据*/
case’R’：
{
while（！（inportb（port 5）&0x20））;
outportb（port，0x02）; /*发送数据02告诉 单片机 发送数据*/
for（j=0;j《9;j ） /*共接纳9个数据*/
{
while（！（inportb（port 5）&1））;
ch［j］=inportb（port）;
}
for（j=0;j《9;j ）
printf（“\n %d\n”，ch［j］）;
getch（）;
break;
}
}
}
}
2. 单片机 编程
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 ；程序完
