第七届蓝桥杯大赛模拟题.docx_第1页
第七届蓝桥杯大赛模拟题.docx_第2页
第七届蓝桥杯大赛模拟题.docx_第3页
第七届蓝桥杯大赛模拟题.docx_第4页
第七届蓝桥杯大赛模拟题.docx_第5页
已阅读5页,还剩3页未读 继续免费阅读

下载本文档

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

文档简介

main.c#include#include#includehead.h#define uchar unsigned char#define uint unsigned int#define ulong unsigned longsbit LSA=P10;sbit LSB=P11;sbit LSC=P12;sbit L1=P13;uint i,j,k,t,s,cs;uchar KeyValue;uchar code DATA17=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71;uint code ts=1,5,30,60;uchar code jump=0x40,0x00;uchar displaydata8;uint Tempdata10=0,0,0,0,0,0,0,0,0,0;void KeyDown();void main()float tp;TMOD=0x10;TH1=(65536-50000)/256;TL1=(65536-50000)%256;EA=1;ET1=1;TR1=0;L1=0;Ds18b20ReadTemp();one:i=0;j=0;t=1;T1:displaydata0=0x00;displaydata1=0x00;displaydata2=0x00;displaydata3=0x00;displaydata4=0x00;displaydata5=0x40;displaydata6=DATAtsj/10;displaydata7=DATAtsj%10;t=tsj;while(1)TR1=1;for(i=0;i8;i+)switch(i)case(0):LSC=0;LSB=0;LSA=0; break;case(1):LSC=0;LSB=0;LSA=1; break;case(2):LSC=0;LSB=1;LSA=0; break;case(3):LSC=0;LSB=1;LSA=1; break;case(4):LSC=1;LSB=0;LSA=0; break;case(5):LSC=1;LSB=0;LSA=1; break;case(6):LSC=1;LSB=1;LSA=0; break;case(7):LSC=1;LSB=1;LSA=1; break;P0=displaydatai;Delay1ms(1);P0=0x00;if(KeyValue=4)KeyValue=0;j+;if(j=4)j=0;goto T1;if(KeyValue=5) goto two;two:i=0;j=0;k=0;s=0;cs=0;TR1=0;Ds1302Init();while(1)Ds1302ReadTime();displaydata0=DATATime2/16;displaydata1=DATATime2%16;displaydata2=jumps;displaydata3=DATATime1/16;displaydata4=DATATime1%16;displaydata5=jumps;displaydata6=DATATime0/16;displaydata7=DATATime0%16;if(j!=displaydata7)j=displaydata7;if(k=t)k=0;Tempdatacs=Ds18b20ReadTemp();cs+;if(cs=10) goto three;k+;s+;if(s=2)s=0;for(i=0;i8;i+)switch(i)case(0):LSA=0;LSB=0;LSC=0; break;case(1):LSA=1;LSB=0;LSC=0; break;case(2):LSA=0;LSB=1;LSC=0; break;case(3):LSA=1;LSB=1;LSC=0; break;case(4):LSA=0;LSB=0;LSC=1; break;case(5):LSA=1;LSB=0;LSC=1; break;case(6):LSA=0;LSB=1;LSC=1; break;case(7):LSA=1;LSB=1;LSC=1; break;P0=displaydatai;Delay1ms(1);P0=0x00;three:i=0;j=0;k=0;t=0;TR1=1;while(1)TH0=(65536-5000)/256; TL0=(65536-5000)%256;ET0=1;TR0=1;for(j=0;j10;j+)if(Tempdataj 0)Tempdataj=Tempdataj-1;Tempdataj=Tempdataj;tp=Tempdataj;Tempdataj=tp*0.0625*100+0.5;elsetp=Tempdataj;Tempdataj=tp*0.0625*100+0.5;T2:displaydata0=0x40;displaydata1=DATA0;displaydata2=DATAi;displaydata3=0x00;displaydata4=0x00;displaydata5=0x40;displaydata6=DATATempdatai % 10000 / 1000;displaydata7=DATATempdatai % 1000 / 100;while(1)for(j=0;j8;j+)switch(j)case(0):LSA=0;LSB=0;LSC=0; break;case(1):LSA=1;LSB=0;LSC=0; break;case(2):LSA=0;LSB=1;LSC=0; break;case(3):LSA=1;LSB=1;LSC=0; break;case(4):LSA=0;LSB=0;LSC=1; break;case(5):LSA=1;LSB=0;LSC=1; break;case(6):LSA=0;LSB=1;LSC=1; break;case(7):LSA=1;LSB=1;LSC=1; break;P0=displaydataj;Delay1ms(1);P0=0x00;if(KeyValue=6)TR0=0;L1=0;i+;if(i=10) i=0;KeyValue=0;goto T2;if(KeyValue=7) TR0=0;L1=0;goto one;void Time1() interrupt 3TH1=(65536-50000)/256;TL1=(65536-50000)%256;P2=0x0f;if(P2!=0x0f)P0=0x00;Delay1ms(10);if(P2!=0x0f)P2=0X0F;switch(P2)case(0X07):KeyValue=0;break;case(0X0b):KeyValue=4;break;case(0X0d): KeyValue=8;break;case(0X0e):KeyValue=12;break;P2=0XF0;switch(P2)case(0X70):KeyValue=KeyValue+3;break;case(0Xb0):KeyValue=KeyValue+2;break;case(0Xd0): KeyValue=KeyValue+1;break;case(0Xe0):KeyValue=KeyValue;break;while(P2!=0xf0)Delay1ms(10);void Time0() interrupt 1TH0=(65536-5000)/256;TL0=(65536-5000)%256;t+;if(t=100)L1=L1;t=0;void.c#includehead.h/-DS1302读取数据的地址命令-秒分时日月年-/uchar code READ_RTC_ADDR7 = 0x81, 0x83, 0x85, 0x87, 0x89, 0x8b, 0x8d; /-DS1302写入数据的地址命令-秒分时日月年-/uchar code WRITE_RTC_ADDR7 = 0x80, 0x82, 0x84, 0x86, 0x88, 0x8a, 0x8c;/-DS1302时钟初始化2013年1月1日星期二12点00分00秒,存储顺序是秒分时日月周年,存储格式是用BCD码-/uchar code WRITE_RTC_TIME7 = 0x50, 0x59, 0x23, 0x29, 0x11, 0x02, 0x16;uchar Time7;/* 函 数 名 : Ds1302Write* 函数功能 : 向DS1302命令(地址+数据)* 输 入 : addr,dat* 输 出 : 无*/void Ds1302Write(uchar addr, uchar dat)uchar n;RST = 0;_nop_();SCLK = 0;/先将SCLK置低电平。_nop_();RST = 1; /然后将RST(CE)置高电平。_nop_();for (n=0; n= 1;SCLK = 1;/数据在上升沿时,DS1302读取数据_nop_();SCLK = 0;_nop_();for (n=0; n= 1;SCLK = 1;/数据在上升沿时,DS1302读取数据_nop_();SCLK = 0;_nop_(); RST = 0;/传送数据结束_nop_();/* 函 数 名 : Ds1302Read* 函数功能 : 读取一个地址的数据* 输 入 : addr* 输 出 : dat*/uchar Ds1302Read(uchar addr)uchar n,dat,dat1;RST = 0;_nop_();SCLK = 0;/先将SCLK置低电平。_nop_();RST = 1;/然后将RST(CE)置高电平。_nop_();for(n=0; n= 1;SCLK = 1;/数据在上升沿时,DS1302读取数据_nop_();SCLK = 0;/DS1302下降沿时,放置数据_nop_();_nop_();for(n=0; n1) | (dat17);SCLK = 1;_nop_();SCLK = 0;/DS1302下降沿时,放置数据_nop_();RST = 0;_nop_();/以下为DS1302复位的稳定时间,必须的。SCLK = 1;_nop_();DSIO = 0;_nop_();DSIO = 1;_nop_();return dat;/* 函 数 名 : Ds1302Init* 函数功能 : 初始化DS1302.* 输 入 : 无* 输 出 : 无*/void Ds1302Init()uchar n;Ds1302Write(0x8E,0X00); /禁止写保护,就是关闭写保护功能for (n=0; n7; n+)/写入7个字节的时钟信号:分秒时日月周年Ds1302Write(WRITE_RTC_ADDRn,WRITE_RTC_TIMEn);Ds1302Write(0x8E,0x80); /打开写保护功能/* 函 数 名 : Ds1302ReadTime* 函数功能 : 读取时钟信息* 输 入 : 无* 输 出 : 无*/void Ds1302ReadTime()uchar n;for (n=0; n0; y-)for(x=110; x0; x-);/* 函 数 名 : Ds18b20Init* 函数功能 : 初始化* 输 入 : 无* 输 出 : 初始化成功返回1,失败返回0*/uchar Ds18b20Init()uchar i;DSPORT = 0; /将总线拉低480us960usi = 70;while(i-);/延时642usDSPORT = 1;/然后拉高总线,如果DS18B20做出反应会将在15us60us后总线拉低i = 0;Delay1ms(1); /等待DS18B20拉低总线while(DSPORT)return 0;/初始化失败return 1;/初始化成功/* 函 数 名 : Ds18b20WriteByte* 函数功能 : 向18B20写入一个字节* 输 入 : com* 输 出 : 无*/void Ds18b20WriteByte(uchar dat)uint i, j;for(j=0; j= 1;/* 函 数 名 : Ds18b20ReadByte* 函数功能 : 读取一个字节* 输 入 : com* 输 出 : 无*/uchar Ds18b20ReadByte()uchar byte, bi;uint i, j;for(j=8; j0; j-)DSPORT = 0;/先将总线拉低1usi+;DSPORT = 1;/然后释放总线i+;i+;/延时6us等待数据稳定bi = DSPORT; /读取数据,从最低位开始读取/*将byte左移一位,然后与上右移7位后的bi,注意移动之后移掉那位补0。*/byte = (byte 1) | (bi 7); i = 4;/读取完之后等待48us再接着读取下一个数while(i-);return byte;/* 函 数 名 : Ds18b20ChangTemp* 函数功能 : 让18b20开始转换温度* 输 入 : com* 输 出 : 无*/void Ds18b20ChangTemp()Ds18b20Init();Delay1ms(1);Ds18b20WriteByte(0xcc);/跳过ROM操作命令 Ds18b20WriteByte(0x44); /温度转换命令Delay1ms(1);/* 函 数 名 : Ds18b20ReadTempCom* 函数功能 : 发送读取温度命令* 输 入 : com* 输 出 : 无*/void Ds18b20ReadTempCom()Ds18b20Init();Delay1ms(1);Ds18b20WriteByte(0xcc); /跳过ROM操作命令Ds18b20WriteByte(0xbe); /发送读取温度命令/* 函 数 名 : Ds18b20ReadTemp* 函数功能 : 读取温度* 输 入 : com* 输 出 : 无*/int Ds18b20ReadTemp()int temp = 0;uchar tmh, tml;Ds18b20ChangTemp(); /先写入转换命令Ds18b20ReadTempCom();/然后等待转换完后发送读取温度命令tml = Ds18b20ReadByte(

温馨提示

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

评论

0/150

提交评论