下载此文档

单片机串行通信实验报告.docx


文档分类:高等教育 | 页数:约18页 举报非法文档有奖
1/18
下载提示
  • 1.该资料是网友上传的,本站提供全文预览,预览什么样,下载就什么样。
  • 2.下载该文档所得收入归上传者、原创者。
  • 3.下载的文档,不会出现我们的网址水印。
1/18 下载此文档
文档列表 文档介绍
单片机串行通信实验报告.docx实验六串行通信实验报告班级: 学号: 姓名: 教师:一、双机通信由两套单片机试验装置(两个实验小组)共同完成该实验。我们U1为卬机,U2为乙机。甲机发送木机(学生木人)学号后8位给乙机,乙机接收该8位数据,并显示在8位数码管上。电路如图1所示。要求串行通信方式为方式1,波特率为2400bit/s,不加倍,:U117XTM11-XTAUPOO/ADDPO1/AO1P02/A02P03/ACDP04/AD4P05/AD5P07/AD7P2gP21//6P22/A10P23/A11P24/A12P2O/A13刃SMP2UM<Ttx|R3D/RXDP31/TXDW34nHP3<TOROVT1R37/WJ>XTM1RD0/00XTAUFO1/AO1F02/AO2F03/AO3RSTPD4/AOIF05/A05PDO/AOOAL£FIO削」PI2PUPI4PI0piePl?F21/2F22/-VA12P25/AI3F2S/AMF27/AI5F)1/TXDR3J/IRTT«5/TIR37/1®I;121、c源程序清单甲机(U1)代码:#include<>#defineucharunsignedcharvoiddelay(uchari);voidsend(uchartemp);voidinit(void);voidmdin(void){initO;delay(200);whi1e(1){send(,,);send(l);send(2);send(1);send(3);send(2);send(2);send(3);send(1);voidinit(void){SCON=0x40;TMOD二0x20;THl=0xf4;TL1二0xf4;//串口模式1//Tl工作模式2//波特率2400只发送不接收PCON=0x00;//不加倍 SMOD=OTI=0;TR1=1;//开定时屮断/*********发送函数**********/voidsend(uchartemp){SBUE=tcmp;while(TI==0);TI=0;delay(50);voiddelay(uchari)unsignedintj;for(i;i>0;i―)for(j=0;j<100;j++);乙机(U2)代码:#include<>#dcfineucharunsignodchar#defineuintunsignedintvoidinit(void);voiddelay(uchart);voidxianshi(void);ucharcodedistable[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//共阴数码管段码ucharcodewi[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};uchartab[9]={0,0,0,0,0,0,0,0,0};uchari=0,temp;uinta,b,c,d,e,f,g,h;voidmain(){init();while(l){xianshi();/////////////初始化///////////////voidinit(void)PCON=0x00;//不加倍SMOD=OSCON=0x50;//设置串口方式1且允许串口接收TMOD=0x20;〃设置T1为方式2TH1二:0xf4;TL1=:0xf4;//设置波特率2400TRI=:1;〃开启定吋器1ES=1;//允许串行口中断EA=1;//允许全局中断RE21////////////串口中断接收程序////////////voidreceive()interrupt4temp=SBUF;while(RI==0);RI=0;if(tcmp==,")temp=0;tab[i]二temp;i++;if(i=9){i=0;a二tab[l]b=tab[2]c二tab[3]d=tab[4]e二tab[5]f=tab[6]g=tab[7]h=tab[8]}/////////////数码管显示/////////////voidxianshi(void){uchari,dm,wx;11二开漏输岀//ml:m000二标准; 01二推挽; 10二输入;P1M1=0X00;P1M0=OXff;P2M1=0X00;P2M0=OXff;//设定P1,P2推挽输出whi1e(1){for(i=l;i〈9;i++){//ram[i]=tab[i];dm=distab1e[tab[i]]; //取显示段码wx二\vi[iT]; //取位选码Pl二0x00; //关显示P2二dm; //

单片机串行通信实验报告 来自淘豆网m.daumloan.com转载请标明出处.

非法内容举报中心
文档信息
  • 页数18
  • 收藏数0 收藏
  • 顶次数0
  • 上传人pppccc8
  • 文件大小407 KB
  • 时间2019-07-11
最近更新