机电之家资源网
单片机首页|单片机基础|单片机应用|单片机开发|单片机文案|软件资料下载|音响制作|电路图下载 |嵌入式开发
培训信息
赞助商
115.2K串行通信C语言例子
115.2K串行通信C语言例子
 更新时间:2010-1-29 16:23:58  点击数:0
【字体: 字体颜色

//115.2k串行口通信程序,校验方式为简单双向校验,
//而且是必要的,因为任何采用中断、crc等的方法
//均很难保证速度和避免错误.
//总体速度5KB/秒

 

//单片机程序
//使用22.1184晶振
unsigned char time,b_break,b_break_3;
//35.555ms
void int_t0(void) interrupt 1 {
 TH0=0;
 if ((++b_break_3)>2) b_break=1;
 time++;
}

//

unsigned char rec(void) {
 TH0=0;b_break_3=0;b_break=0;
 while (RI==0) {
  if (b_break) return(1);  //等待pc发送100ms超时
 }
 RI=0;
 SBUF=SBUF;
 return(SBUF);
}
/*返回1表示失败*/
bit sen(unsigned char d) {
 SBUF=d;
 TH0=0;b_break_3=0;b_break=0;
 while (RI==0) {
  if (b_break) return(1);  //等待pc送回相同字节数据,100ms超时
 }
 RI=0;
 if (SBUF!=d) return(1);
 return(0);
}

void main(void) {
 unsigned int i;
 unsigned char d;
 EA=1;
 SCON=0xd8;PCON=0x80;
 TMOD=0x21;
 TL1=TH1=0xff;TR1=1;
 TH0=0;ET0=TR0=1;
 while (1) {
  d=rec();
  if ((!b_break)&&(d==0x55)) {
   d=rec();
   if (!b_break) {
    if (d==0xaa) {
     //接收到pc送来的要求发送指令0xaa55
     for (i=0;i<1000;i++) {
      if (sen(i)) {
       //发送错误
       break;
      }
     }
    } else if (dd==0xaa) {
     //接收到pc送来的要求接收指令0xaaaa
     for (i=0;i<1000;i++) {
      d=rec();
      if (!b_break) {
       //正确接收处理
      } else {
       //接收错误处理
       break;
      }
     }
    }
   }
  }
 }
}

 

//电脑程序tc2.0
#i nclude "stdio.h"
#i nclude "dos.h"
#i nclude "process.h"
#i nclude "string.h"
#i nclude "conio.h"
#i nclude <dir.h>


unsigned char time_out;

void init_com1(void) {
 outportb(0x3fb,0x80);
 outportb(0x3f8,1);
 outportb(0x3f9,0x0);
 outportb(0x3fb,0x3);
}
void sen_com1(unsigned char d) {
 long i;
 time_out=0;
 while (!(inportb(0x3fd)&0x20));
 outportb(0x3fd,0x0);
 outportb(0x3f8,d);
 i=clock();
 while (1) {
  if (clock()>(i+8)) {time_out=1;return;}
  if ((inp(0x3fd)&0x1)==1) break;
 }
 if (inp(0x3f8)!=d) {time_out=2;return;}
}
unsigned char rec_com1(void) {
 long i;
 unsigned char d;
 time_out=0;
 i=clock();
 while (1) {
  if (clock()>(i+8)) {time_out=1;return(0);}
  if ((inp(0x3fd)&1)==1) break;
 }
 d=inp(0x3f8);
 while (!(inportb(0x3fd)&0x20));
 outportb(0x3fd,0x0);
 outportb(0x3f8,d);
 return(d);
}
void main(void) {
 int i;
 long st;
 init_com1();
 st=clock();
 sen_com1(0xaa);
 if (time_out) {printf("CPU not ready!");exit(-1);}
 sen_com1(0xaa);
 if (time_out) {printf("CPU not ready!");exit(-1);}
 for (i=0;i<1000;i++) {
  sen_com1(i);
  if (time_out) {printf("CPU not ready!");exit(-1);}
 }
 printf("Total use %3.2f S.",(clock()-st)/18.2);
 exit(1);
}

  • 上一篇: Delphi 中串口通讯的实现
  • 下一篇: 没有了
  • 发表评论   告诉好友   打印此文  收藏此页  关闭窗口  返回顶部
    热点文章
     
    推荐文章
     
    相关文章
    网友评论:(只显示最新5条。)
    关于我们 | 联系我们 | 广告合作 | 付款方式 | 使用帮助 | 机电之家 | 会员助手 | 免费链接

    点击这里给我发消息66821730(技术支持)点击这里给我发消息66821730(广告投放) 点击这里给我发消息41031197(编辑) 点击这里给我发消息58733127(审核)
    本站提供的机电设备,机电供求等信息由机电企业自行提供,该企业负责信息内容的真实性、准确性和合法性。
    机电之家对此不承担任何保证责任,有侵犯您利益的地方请联系机电之家,机电之家将及时作出处理。
    Copyright 2007 机电之家 Inc All Rights Reserved.机电之家-由机电一体化网更名-声明
    电话:0571-87774297 传真:0571-87774298
    杭州滨兴科技有限公司提供技术支持

    主办:杭州市高新区(滨江)机电一体化学会
    中国行业电子商务100强网站

    网站经营许可证:浙B2-20080178-1