天堂草原最受欢迎的角色,天堂动漫,天堂在线,色天堂下载,天堂中文在线资源,亚洲男人天堂

技術熱線: 4007-888-234
設計開發

專注差異化嵌入式產品解決方案 給智能產品定制注入靈魂給予生命

開發工具

提供開發工具、應用測試 完善的開發代碼案例庫分享

技術支持

從全面的產品導入到強大技術支援服務 全程貼心伴隨服務,創造無限潛能!

新聞中心

提供最新的單片機資訊,行業消息以及公司新聞動態

單片機與PC機通信的程序

更新時間: 2019-03-23
閱讀量:1553

十年專注單片機方案開發的方案公司英銳恩,分享單片機與PC機通信的程序。英銳恩現提供服務產品涉及主控芯片:8位單片機、16位單片機、32位單片機及各類運算放大器等。


pc機程序用c語言來編寫,單片機程序用匯編語言來編寫
1. PC機編程
PC采用Toubr C 進行編寫。程序如下:
#include
#define    port     0x3f8                   
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);                   
  outportb(port+1,0x00);
  outportb(port+3,0x03);                   
  outportb(port+1,0x00);                   
  inportb(port+5);                       
  {
    printf("\t\tsend data or receive data: (s or r?)\n\n\n");
    c=getchar();
     switch(c)
     {
      case ’s’:
      case ’S’:

    {
      while(!(inportb(port+5)&0x20));           
       outportb(port,0x01);               
       for(i=0;i<6;i++)                   
    {
      a=b[i];
      while(!(inportb(port+5)&0x20))
      delay(100);                       
      outportb(port,a);                   
      printf("%d\n",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);               
        for(j=0;j<9;j++)                   
        {
         while(!(inportb(port+5)&1));
        ch[j]=inportb(port);

 }
        for(j=0;j<9;j++)
        printf("\n %d\n",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        ;發送允許
        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                        ;程序完

(文源網絡,侵刪)


联系我们: 赤壁市| 宜阳县| 宿迁市| 屯门区| 稻城县| 罗田县| 武胜县| 丰县| 承德县| 荣成市| 桐柏县| 同仁县| 广昌县| 尤溪县| 莆田市| 定南县| 天台县| 尼玛县| 农安县| 托克托县| 海口市| 深州市| 吉隆县| 扶余县| 和平县| 韶关市| 衡水市| 上栗县| 昌平区| 东台市| 安多县| 金山区| 大新县| 客服| 六安市| 宜昌市| 湾仔区| 黄石市| 黑山县| 从化市| 江西省|