LCD1602显示及日历时钟

/************************************************************************ 烟叶烘烤过程温湿度报警系统 系统描述：在LCD1602上实时显示时钟，温度，湿度，系统运行时间。利用ds18b20 检测当前温度，通过和设定参数的比较，给ISD1420发出报警脉冲，通过 功率放大器LM386 驱动喇叭报警。 *************************************************************************/ #include<reg51.h> #include<intrins.h> #include <absacc.h> #define uchar unsigned char #define uint unsigned int #define BUSY 0x80 //lcd忙检测标志 #define DATAPORT P0 //定义P0口为LCD通讯端口 #define ADC_adress XBYTE[0X7FFF] //AD的地址 #define PLAYE_ADDR XBYTE[0XBFFF] //语音报警地址 #define alarm_delay_time 10 sbit RED_ALARM=P1^0; //红色指示灯 sbit GREEN_ALARM=P1^1; //绿色指示灯 sbit P1_4=P1^4; //时钟调整 sbit P1_5=P1^5; //时钟加 sbit P1_6=P1^6; //时钟减 sbit DQ = P1^7; //定义ds18b20通信端口 sbit LCM_RS=P2^0; //数据/命令端 sbit LCM_RW=P2^1; //读/写选择端 sbit LCM_EN=P2^2; //LCD使能信号 sbit ad_busy=P3^2; //adc中断方式接口 sbit RECLED_EOC=P3^5; //ISD1420放音结束查询标志 uchar ad_data; //ad采样值存储 uchar seconde=0; //定义并初始化时钟变量 uchar minite=0; uchar hour=12; uchar mstcnt=0; uchar temp1,temp2,temp; //温度显示变量 uchar damp1,damp2; //湿度显示变量 uchar t,set; uchar runtime; //系统运行时间 uchar code str0[]={"C: : : SR: "}; uchar code str1[]={"T: . C D: %OK"}; void delay_LCM(uint); //LCD延时子程序 void initLCM( void); //LCD初始化子程序 void lcd_wait(void); //LCD检测忙子程序 void WriteCommandLCM(uchar WCLCM,uchar BusyC); //写指令到ICM子函数 void WriteDataLCM(uchar WDLCM); //写数据到LCM子函数 void DisplayOneChar(uchar X,uchar Y,uchar DData); //显示指定坐标的一个字符子函数 void DisplayListChar(uchar X,uchar Y,uchar code *DData); //显示指定坐标的一串字符子函数 void init_timer0(void); //定时器初始化 void displayfun1(void); void displayfun2(void); void displayfun3(void); void keyscan(void ); //键盘扫描子程序 void set_adj(void); void inc_key(void); void dec_key(void); void delay_18B20(unsigned int i); void Init_DS18B20(void) ; uchar ReadOneChar(void); void WriteOneChar(unsigned char dat); void ReadTemperature(void); void ad0809(void); void playup(void); void playdown(void); void playconst(void); void system_alarm(void); /*********延时K*1ms,12.000mhz**********/ void delay_LCM(uint k) { uint i,j; for(i=0;i<k;i++) { for(j=0;j<60;j++) {;} } } /**********写指令到ICM子函数************/ void WriteCommandLCM(uchar WCLCM,uchar BusyC) { if(BusyC)lcd_wait(); DATAPORT=WCLCM; LCM_RS=0; // 选中指令寄存器 LCM_RW=0; // 写模式 LCM_EN=1; _nop_(); _nop_(); _nop_(); LCM_EN=0; } /**********写数据到LCM子函数************/ void WriteDataLCM(uchar WDLCM) { lcd_wait( ); //检测忙信号 DATAPORT=WDLCM; LCM_RS=1; // 选中数据寄存器 LCM_RW=0; // 写模式 LCM_EN=1; _nop_(); _nop_(); _nop_(); LCM_EN=0; } /***********lcm内部等待函数*************/ void lcd_wait(void) { DATAPORT=0xff; LCM_EN=1; LCM_RS=0; LCM_RW=1; _nop_(); _nop_(); _nop_(); while(DATAPORT&BUSY); LCM_EN=0; } /**********LCM初始化子函数***********/ void initLCM( ) { DATAPORT=0; delay_LCM(15); WriteCommandLCM(0x38,0); //三次显示模式设置，不检测忙信号 delay_LCM(5); WriteCommandLCM(0x38,0); delay_LCM(5); WriteCommandLCM(0x38,0); delay_LCM(5); WriteCommandLCM(0x38,1); //8bit数据传送，2行显示，5*7字型，检测忙信号 WriteCommandLCM(0x08,1); //关闭显示，检测忙信号 WriteCommandLCM(0x01,1); //清屏，检测忙信号 WriteCommandLCM(0x06,1); //显示光标右移设置，检测忙信号 WriteCommandLCM(0x0c,1); //显示屏打开，光标不显示，不闪烁，检测忙信号 } /****************显示指定坐标的一个字符子函数*************/ void DisplayOneChar(uchar X,uchar Y,uchar DData) { Y&=1; X&=15; if(Y)X|=0x40; //若y为1（显示第二行），地址码+0X40 X|=0x80; //指令码为地址码+0X80 WriteCommandLCM(X,0); WriteDataLCM(DData); } /***********显示指定坐标的一串字符子函数***********/ void DisplayListChar(uchar X,uchar Y,uchar code *DData) { uchar ListLength=0; Y&=0x01; X&=0x0f; while(X<16) { DisplayOneChar(X,Y,DData[ListLength]); ListLength++; X++; } } /***********ds18b20延迟子函数（晶振12MHz ）*******/ void delay_18B20(unsigned int i) { while(i--); } /**********ds18b20初始化函数**********************/ void Init_DS18B20(void) { unsigned char x=0; DQ = 1; //DQ复位 delay_18B20(8); //稍做延时 DQ = 0; //单片机将DQ拉低 delay_18B20(80); //精确延时 大于 480us DQ = 1; //拉高总线 delay_18B20(14); x=DQ; //稍做延时后 如果x=0则初始化成功 x=1则初始化失败 delay_18B20(20); } /***********ds18b20读一个字节**************/ unsigned char ReadOneChar(void) { uchar i=0; uchar dat = 0; for (i=8;i>0;i--) { DQ = 0; // 给脉冲信号 dat>>=1; DQ = 1; // 给脉冲信号 if(DQ) dat|=0x80; delay_18B20(4); } return(dat); } /*************ds18b20写一个字节****************/ void WriteOneChar(uchar dat) { unsigned char i=0; for (i=8; i>0; i--) { DQ = 0; DQ = dat&0x01; delay_18B20(5); DQ = 1; dat>>=1; } } /**************读取ds18b20当前温度************/ void ReadTemperature(void) { unsigned char a=0; unsigned char b=0; unsigned char t=0; Init_DS18B20(); WriteOneChar(0xCC); // 跳过读序号列号的操作 WriteOneChar(0x44); // 启动温度转换 delay_18B20(100); // this message is wery important Init_DS18B20(); WriteOneChar(0xCC); //跳过读序号列号的操作 WriteOneChar(0xBE); //读取温度寄存器等（共可读9个寄存器） 前两个就是温度 delay_18B20(100); a=ReadOneChar(); //读取温度值低位 b=ReadOneChar(); //读取温度值高位 temp1=b<<4; temp1+=(a&0xf0)>>4; temp2=a&0x0f; temp=((b*256+a)>>4); //当前采集温度值除16得实际温度值 } /***************液晶显示子函数1正常显示*****************/ void displayfun1(void) { WriteCommandLCM(0x0c,1); //显示屏打开，光标不显示，不闪烁，检测忙信号 DisplayListChar(0,0,str0); DisplayListChar(0,1,str1); DisplayOneChar(2,0,hour/10+0x30); DisplayOneChar(3,0,hour%10+0x30); DisplayOneChar(5,0,minite/10+0x30); DisplayOneChar(6,0,minite%10+0x30); DisplayOneChar(8,0,seconde/10+0x30); DisplayOneChar(9,0,seconde%10+0x30); DisplayOneChar(14,0,runtime/10+0x30); DisplayOneChar(15,0,runtime%10+0x30); DisplayOneChar(2,1,temp1/10+0x30); DisplayOneChar(3,1,temp1%10+0x30); DisplayOneChar(5,1,temp2/10+0x30); DisplayOneChar(11,1,damp1+0x30); DisplayOneChar(12,1,damp2+0x30); } /************液晶显示子函数2 调整小时显示***************/ void displayfun2(void) { WriteCommandLCM(0x0c,1); //显示屏打开，光标不显示，不闪烁，检测忙信号 DisplayListChar(0,0,str0); DisplayListChar(0,1,str1); DisplayOneChar(5,0,minite/10+0x30); DisplayOneChar(6,0,minite%10+0x30); DisplayOneChar(8,0,seconde/10+