程序(4)

2019-08-30 17:48

SCLK=1; ACC=ACC>>1; } }

uchar read_byte()//读一个字节 { RST=1; for(a=8;a>0;a--) { ACC7=IO; SCLK=1; SCLK=0; ACC=ACC>>1; } return (ACC); }

//----------------------------------------

void write_1302(uchar add,uchar dat)//向1302芯片写函数,指定写入地址,数据 { RST=0; SCLK=0; RST=1; write_byte(add); write_byte(dat); SCLK=1; RST=0; }

uchar read_1302(uchar add)//从1302读数据函数,指定读取数据来源地址 { uchar temp; RST=0; SCLK=0; RST=1; write_byte(add); temp=read_byte(); SCLK=1; RST=0; return(temp); }

uchar BCD_Decimal(uchar bcd)//BCD码转十进制函数,输入BCD,返回十进制 { uchar Decimal;

Decimal=bcd>>4; return(Decimal=Decimal*10+(bcd&=0x0F)); }

//--------------------------------------

void ds1302_init() //1302芯片初始化子函数(2010-01-07,12:00:00,week4) { RST=0; SCLK=0; write_1302(0x8e,0x00); //允许写,禁止写保护 //write_1302(0x80,0x00); //向DS1302内写秒寄存器80H写入初始秒数据00 //write_1302(0x82,0x00);//向DS1302内写分寄存器82H写入初始分数据00 //write_1302(0x84,0x12);//向DS1302内写小时寄存器84H写入初始小时数据12 //write_1302(0x8a,0x04);//向DS1302内写周寄存器8aH写入初始周数据4 //write_1302(0x86,0x07);//向DS1302内写日期寄存器86H写入初始日期数据07 //write_1302(0x88,0x01);//向DS1302内写月份寄存器88H写入初始月份数据01 //write_1302(0x8c,0x10);//向DS1302内写年份寄存器8cH写入初始年份数据10 write_1302(0x8e,0x80); //打开写保护 }

//------------------------------------ //温度显示子函数

void write_temp(uchar add,uint dat)//向LCD写温度数据,并指定显示位置 { uint gw,sw,bw; bw=dat/100;//取得百位 sw=dat0/10;//取得十位数字 gw=dat;//取得个位数字 write_1602com(er+add);//er是头文件规定的值0x80+0x40 write_1602dat(0x30+bw); write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码 write_1602dat('.'); write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码

write_1602dat(0xdf);//显示温度的小圆圈符号,0xdf是液晶屏字符库的该符号地址码 write_1602dat(0x43); //显示\符号,0x43是液晶屏字符库里大写C的地址码 }

//------------------------------------ //时分秒显示子函数

void write_sfm(uchar add,uchar dat)//向LCD写时分秒,有显示位置加、现示数据,两个参数 {

uchar gw,sw; gw=dat;//取得个位数字 sw=dat/10;//取得十位数字 write_1602com(er+add);//er是头文件规定的值0x80+0x40 write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码 write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码 }

//------------------------------------- //年月日显示子函数

void write_nyr(uchar add,uchar dat)//向LCD写年月日,有显示位置加数、显示数据,两个参数 { uchar gw,sw; gw=dat;//取得个位数字 sw=dat/10;//取得十位数字 write_1602com(yh+add);//设定显示位置为第一个位置+add write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码 write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码 }

//------------------------------------ //农历显示子函数

void write_nl(uchar add,uchar dat)//向LCD写时分秒,有显示位置加、现示数据,两个参数 { uchar gw,sw; //gw=dat;//取得个位数字 //sw=dat/10;//取得十位数字 gw=dat;//取得个位数字 sw=dat/16;//取得十位数字 write_1602com(er+add);//er是头文件规定的值0x80+0x40

// write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码 // write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码 write_1602dat('0'+sw);//数字+30得到该数字的LCD1602显示码 write_1602dat('0'+gw);//数字+30得到该数字的LCD1602显示码 }

//-------------------------------------------

void write_week(uchar week)//写星期函数 { write_1602com(yh+0x0c);//星期字符的显示位置 switch(week)

{ case 1:write_1602dat('M');//星期数为1时,显示 write_1602dat('O'); write_1602dat('N'); break; case 2:write_1602dat('T');//星期数据为2时显示 write_1602dat('U'); write_1602dat('E'); break; case 3:write_1602dat('W');//星期数据为3时显示 write_1602dat('E'); write_1602dat('D'); break; case 4:write_1602dat('T');//星期数据为4是显示 write_1602dat('H'); write_1602dat('U'); break; case 5:write_1602dat('F');//星期数据为5时显示 write_1602dat('R'); write_1602dat('I'); break; case 6:write_1602dat('S');//星期数据为6时显示 write_1602dat('T'); write_1602dat('A'); break; case 0:write_1602dat('S');//星期数据为7时显示 write_1602dat('U'); write_1602dat('N'); break; } write_1602dat(' '); }

//****************键盘扫描有关函数********************** void keyscan() { if(ensure==0)

{ delay(9); if(ensure==0) { buzzer=0;//蜂鸣器短响一次 delay(20); buzzer=1; led1=1; //背光灭 setn=0; //退出任何当前的设置 setNZn=0; T_NL_NZ=0; write_1602com(0x0c); //设置光标不闪烁 TR0=1; //打开定时器 temp=(miao)/10*16+(miao); write_1302(0x8e,0x00); write_1302(0x80,0x00|temp); //miao数据写入DS1302 write_1302(0x8e,0x80); } LED=!LED; led1=LED; while(menu==0); } if(menu==0) { delay(9); if(menu==0) { led1=0; bltime=0; if((setn==0)&&(setNZn==0)) 时模式时才可按动 { buzzer=0;//蜂鸣器短响一次 delay(20); buzzer=1; if(TR1==1) { TR1=0; } else {

//在没有进入调


程序(4).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:AutoCAD三维建模系列教程 - 图文

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: