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

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

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);                        /*讀一次線路狀態(tài)寄存器，使其復位*/
  {
    printf("ttsend data or receive data: (s or r?)nnn");
    c=getchar();
     switch(c)
     {
      case ’s’:
      case ’S’:
      {
      while(!(inportb(port+5)&0x20));            /*發(fā)送保持器滿則等待*/
       outportb(port,0x01);                /*否則發(fā)送數據01通知單片機準備接收*/
       for(i=0;i<6;i++)                    /*共發(fā)送6個數據*/
    {
      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));            /*接收單片機送回的數據*/
      ch[i]=inport(port);                    /*保存*/
      }
      delay(10);
      for(j=0;j<8;j++)                    /*顯示接收的回送數據*/
      printf("n%dn",ch[j]);
      getch();
      break;
      }
      case’r’:                            /*接收數據*/
      case’R’:
      {
        while(!(inportb(port+5)&0x20));       
        outportb(port,0x02);                /*發(fā)送數據02通知單片機發(fā)送數據*/
        for(j=0;j<9;j++)                    /*共接收9個數據*/
        {
         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            ；接收到的數據為1，則接收
        GOTO    TXW                ；否則發(fā)送數據
        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機發(fā)送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        ；通信任務完成，關接受和發(fā)送允許
        BSF        STATUS，RP0
        BCF        TXSTA，TXEN
        BCF        STATUS，RP0
        CALL    LED                ；調用顯示子程序，將發(fā)送（或接收）的數據顯示出來
        END                        ；程序完