PIC16F877A万年历程序.pdf-资料库

weixin_38656226-12711518-4744300845391947648.pdf-第1页.png

第1页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第2页.png

第2页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第3页.png

第3页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第4页.png

第4页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第5页.png

第5页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第6页.png

第6页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第7页.png

第7页 / 共28页

weixin_38656226-12711518-4744300845391947648.pdf-第8页.png

第8页 / 共28页

PIC16F877A万年历程序万年历程序为了把KS0108系列的液晶吃透,特别制作了这款万年历,感觉效果还是不错的.希望大家分享我的喜悦,毕竟有了更多志同道合的朋友支持,我才能更进一步提高. 为了把KS0108系列的液晶吃透,特别制作了这款万年历,感觉效果还是不错的.希望大家分享我的喜悦,毕竟有了更多志同道合的朋友支持,我才能更进一步提高. 一,原理介绍说明: 1.单片机还是采用PIC中最经典的PIC16F877A,端口多,功能全,特别是他有8K的ROM,这是我选择的主要原因,因为储存液晶的字库需要很大的空间. 2.液晶显示还是用的KS0108系列,主要是他性价比高,指令简单,特别是公司也在用. 3.时钟/日历芯片用的DALLOS的DS1302芯片,他可以储存从2000-2099年的日历,及实时时钟,可以方便的读写. 4.温度测量还是用的DS18B20,这在我上一实例中已经用过,有兴趣可以查阅. 5.本万年历可以显示实时时钟,精确到秒,年,月,日,星期,阴历,温度,生肖等,显示的信息量大. 6,可以通过按键自由设定时钟及日历,按"设置"键可以在秒,分,时,日,月,星期,年之间来回切换,要设置的单元以闪烁提醒.通过"+"."-"按键可以把要设置的单元设定到预想状态. 二,程序说明: 本程序有许多小的模块,现分列如下: 1.主程序 /*************************************************** * 标题：万年历 * * 作者：Wujieflash * * 日期：2008年1月13日 * * 说明：包含文件 ***************************************************/ #include #include "ziku.h" #include "lcd_init.h" #include "ds1302.h"

#include "ds18b20.h" #include "keyscan.h" #include "yinli.h" //子程序 //LCD显示空白边框子程序 void LCDShowTable() { uch i; SlectScreen(1); //写左半屏 SetLine(0); //起使页 SetColumn(0); //起使列 for(i=0;i //显示固定字符子程序 void LCDShowGudingWord() { Show8X16_2(0,24,s0); Show8X16_2(0,32,s0); Show8X16(2,1,s0); Show8X16(2,9,s0); Show16X16_3(6,40,ri); Show16X32(2,24,ss0); Show16X32(2,40,ss0); Show8X16_2(0,64,s0); Show8X16_2(0,72,s0); Show8X16_2(0,80,maohao); Show8X16_2(0,88,s0); Show8X16_2(0,96,s0); Show8X16_2(0,104,maohao); Show8X16_2(0,112,s0); Show8X16_2(0,119,s0); Show8X16(2,80,s0); Show8X16(2,88,s0); Show16X16_2(4,64,shiyi); Show16X16_2(4,80,yue); Show16X16_2(4,95,chu); Show16X16_2(4,111,yi); Show16X16_3(6,72,sheng);

Show16X16_3(6,88,xiao); Show16X16_3(6,104,shu); Show16X16_2(0,40,nian); Show16X16(4,2,yue); Show16X16_3(6,8,xing); Show16X16_3(6,24,qi); Show16X16(2,96,danwei1); Show8X16_2(0,8,s2); Show8X16_2(0,16,s0); } /*----------------------------------------------------------*/ //TRM1初始化子程序 void TMR1init() { //TRM1 INITIAL T1CON=0X30; //8分频 TMR1IF=0; //清中断标志 TMR1IE=1; //使能定时器1中断 TMR1L=0XDB; //初始值（定时0.5S） TMR1H=0X0B; TMR1ON=1; //开定时器1 } //冒号闪烁子程序 void FlashMaohao() { static uch timecount=0; if(TMR1IF==1) { TMR1ON=0; TMR1IF=0; TMR1L=0XDB; //重新付初值 TMR1H=0X0B; flag++; flag=flag%2; //闪烁标志在0-1间翻转 TMR1ON=1; timecount++; if(timecount==120)//1分钟采样一次温度

{ timecount=0; get_temp(); //温度转换子程序 } } if(flag==0) { Show8X16_2(0,80,maohao); Show8X16_2(0,104,maohao); } if(flag==1) { Show8X16_2(0,80,noshu);//清除 Show8X16_2(0,104,noshu); } } //主程序 void main() { TMR1init(); //定时器1初始化 keyinit(); //键盘初始化 LCDinit(); //LCD操作初始化 LCDShowTable(); //显示空白表格 LCDShowGudingWord(); //显示固定字符 //Set1302(DisCash); //设置初始时间（默认写入我写程序的时间） get_temp(); //读取温度 while(1) { v_Get1302(clock); //读取时间、日历 display(); YangToYin(clock[6]/16*10+clock[6]&0x0f,clock[4]/16*10+clock[4]&0x0f,clock[3]/16*10+clock[3]&0x0f); FlashMaohao(); //冒号闪烁 KeyScan(); //键盘扫描 } } 2.测温程序: /***************************************************

* 标题：DS18B20测温 * * 作者：Wujieflash * * 日期：2008年1月13日 * * 说明：使用DS18B20芯片测温 * ***************************************************/ # define DQ RC3 //定义18B20数据端口 # define DQ_DIR TRISC3 //定义18B20D口方向寄存器 # define DQ_HIGH() DQ_DIR =1 //设置数据口为输入 # define DQ_LOW() DQ = 0; DQ_DIR = 0 //设置数据口为输出 unsigned char TLV=0 ; //采集到的温度高8位 unsigned char THV=0; //采集到的温度低8位 unsigned char TZ=0; //转换后的温度值整数部分 //------------------------------------------------ //延时函数 //系统初始化函数 void init() { ADCON1=0X07; //设置A口为普通数字口 TRISA=0X00; //设置A口方向为输出 //TRISC3=0; //设置D口方向为输出 } //----------------------------------------------- //复位DS18B20函数 reset(void) { char presence=1; while(presence) { DQ_LOW() ; //主机拉至低电平 delay(2,90); //延时503us DQ_HIGH(); //释放总线等电阻拉高总线,并保持15~60us delay(2,8); //延时70us if(DQ==1) presence=1; //没有接收到应答信号，继续复位 else presence=0; //接收到应答信号 delay(2,70); //延时430us } }

//----------------------------------------------- //写18b20写字节函数 void write_byte(uch val) { uch i; uch temp; for(i=8;i>0;i--) { temp=val&0x01; //最低位移出 DQ_LOW(); NOP(); NOP(); NOP(); NOP(); NOP(); //从高拉至低电平,产生写时间隙 if(temp==1) DQ_HIGH(); //如果写1,拉高电平 delay(2,7); //延时63us DQ_HIGH(); NOP(); NOP(); val=val>>1; //右移一位 } } //------------------------------------------------ //18b20读字节函数 uch read_byte(void) { uch i; uch value=0; //读出温度 static bit j; for(i=8;i>0;i--) { value>>=1; DQ_LOW(); NOP(); NOP(); NOP();

NOP(); //6us DQ_HIGH(); //拉至高电平 NOP(); NOP(); NOP(); //4us j=DQ; if(j) value|=0x80; delay(2,7); //63us } return(value); } //------------------------------------------------- //启动温度转换函数 void get_temp() { int i; DQ_HIGH(); reset(); //复位等待从机应答 write_byte(0XCC); //忽略ROM匹配 write_byte(0X44); //发送温度转化命令 for(i=10;i>0;i--) { delay(201,132); //调用多次延迟函数，确保温度转换完成所需要的时间 } reset(); //再次复位，等待从机应答 write_byte(0XCC); //忽略ROM匹配 write_byte(0XBE); //发送读温度命令 TLV=read_byte(); //读出温度低8 THV=read_byte(); //读出温度高8位 DQ_HIGH(); //释放总线 TZ=(TLV>>4)|(THV<<4); } 3.日历显示程序 /*************************************************** * 标题：DS1302读写 * * 作者：Wujieflash * * 日期：2008年1月14日 *

* 说明：日历显示范围：2000年--2099年 * ***************************************************/ #define RST RC0 #define SCLK RC1 #define IO RC2 uch flag=0; uch second=1,minute=1,hour=1,year=1,month=1,date=1,day=1; uch clock[]={0}; uch DisCash[]={0x00,0x30,0x09,0x16,0x01,0x03,0x09}; /////往1302写入1Byte数据//////////////////////// void RTInputByte(uch d) { uch i; TRISC=0x00; for(i=8; i>0; i--) { IO = d&0x01; //取最低位 SCLK = 1; //上升沿发送 SCLK = 0; //恢复 d = d >> 1; } } ///////从1302读取1Byte数据//////////////////////// uch RTOutputByte(void) { uch i,val=0; TRISC2=1; //设置为输入 for(i=8; i>0; i--) { val = val >>1; if(IO)val=val|0x80;// 从最低位开始接收 SCLK = 1; //下降沿接收 SCLK = 0; } return(val); } ///////先写地址，后写命令/数据//////////////////////////

资料库

PIC16F877A万年历程序.pdf

相关推荐

开发技术

热门标签

最新资料