2.数码管显示串口发送数据_第1页
2.数码管显示串口发送数据_第2页
2.数码管显示串口发送数据_第3页
2.数码管显示串口发送数据_第4页
免费预览已结束,剩余1页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、1.数码管显示学号 #include int ms,ij;codecharta b = (0 x5 b, 0 x3f, 0 x6d, 0 x4f, 0 x5b,0 x3f,0 x3f,0 x4f,0 x3f,0 x07); codecharTABl=(0 xFE,0 xFD,0 xFB,0 xF 7,0 xEF,0 xDF,0 xBF,0 x7F); void delay(int ms)int ij;for(i=0;ims;i+)for(j=0;j110;j+);)void main(void)TMOD=0X10;EA=1;ET1 = 1;TR1 = 1;THl=(65536-1000)/25

2、6;TLl=(65536-1000)%256;while(l)for(i = 0;ij;i +)if(i 二 7)PO=tabj-i-l;P2=TABli;delay(l);)/P2 二 JP3,P0 二P2;void time_l() interrupt 3(THl=(65536-1000)/256;TL1=(65536-1000)%256;ms+ + ;if(ms 二二 1000)ms=0;j +;j 二 1;)2.数码管显示键盘序号值 #includecodechartab=0 x3F,0 x06,0 x5B,0 x4F, 0 x66,0 x6D,0 x7D,0 x07,0 x7F,0

3、x6F);sbit P10=PlA0;void main()P0=0XFF;TMOD=0X10;EA=1;ET1 = 1;TH1=(65536-1000)/256;TL1=(65536-1000)%256;while(l)P10=0;if(P3=0X7f)P2=0Xfe;P0=ta bl;TRl=0;)elseif(P3=0XBF)P2=0Xfe;P0=tab2;TRl=l;elseif(P3 二二 0XDF)P2 二 OXfepO 二 t ab3;TRl=0;)elseif(P3=0XEF)(P2=0Xfe;P0=t ab ;TR1=1;elsejf(P3=0XF7)P2=0 xfe;P0=

4、ta b5;TRl=0;elseif(P3=0XFB)P2=0Xfe;P0=t ab6;TRl=l;)elseif(P3=0XFD)(P2=0Xfe;P0=tab7;TRl=0;elseif(P3=0XFE)P2=0Xfe;P0=tab8;TRl=l;)void time_0() interrupt 3TH1 二(65536-1000)/256;TLl=(65536-1000)%256;PIO 二PIO;)/JP0=JP7,JP8=JP2,P10=PlA0;2.数码管显示串口发送数据#includeUnsignedcharTabQ=0 x3F,0 x06,0 x5B,0 x4F10 x66,0

5、 x6D,0 x7D,0 x07,0 x7F,0 x6F,0 x77,0 x7c,0 x39,0 x5E,0 x7 9,0 x71);sbit feng=P2A0;void main(void)/2400bps12.000MHz(char i;SCON 二 0 x50;/8 位数据,可变波特率TMOD = 0 x21; 设定 定时器1为8位自动重装方 式TH0 二(65536-1000)/256;设定定时初值TLO = (65536-1000)%256;THl=0 xE6;TLl=0 xE6; 设 定定 时器重装值禁止定时 器1中断TRI = 1; 启动定时器1)/GND=8,P20=BO,P

6、10=A;while(l)void TimeO(void) interrupt 1(while(RI)THO = (65536-1000)/256;(设定定时初值i=SBUF;TLO 二(65536-1000)%256;Pl=Tabi;feng 二feng;RI=O; if(i%2 二二 0)(4.传感器控制蜂鸣器发饷EA=1;#includeET0=l;sbit P22=P1AO;TR0=l;sbit P20=P2A0;)sbit P21=P2A1;elsevoid main(void)(EA 二 0;TMOD=0 x01;ET0=0;THO 二(65536-100)/256;TR0=0;TL0=(65536-100)%256;EA=1;)ETO=1;TRO=1;while(l)if(P21=0)TRO=O;P22=l;elseTRO=1;P22=0;)/

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论