智能电子时钟（定时、报警、灯光自动调节）
#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义#include<intrins.h>unsigned char sec = 0;unsigned char min = 0;unsigned char hour = 0;unsigned char count = 0;unsigned char flag = 0;unsigned char flag1 = 0;unsigned char p[3] = {0};unsigned char num=255;bit ack; //应答标志位sbit SDA=P2^1;sbit SCL=P2^0;sbit RS = P2^4; //定义端口 sbit RW = P2^5;sbit EN = P2^6;sbit key1 = P1^0;sbit key2 = P1^1;sbit key3 = P1^2;sbit key4 = P1^3;sbit key5 = P1^4;sbit key6 = P1^5;sbit key7 = P1^6;sbit key8 = P1^7;sbit buzz = P2^2;#define AddWr 0x90 //写数据地址 #define AddRd 0x91 //读数据地址extern bit ack;bit WriteDAC(unsigned char dat);#define _Nop() _nop_() //定义空指令 #define RS_CLR RS=0 #define RS_SET RS=1#define RW_CLR RW=0 #define RW_SET RW=1 #define EN_CLR EN=0#define EN_SET EN=1#define DataPort P0/*------------------------------------------------ uS延时函数，含有输入参数 unsigned char t，无返回值 unsigned char 是定义无符号字符变量，其值的范围是 0~255 这里使用晶振12M，精确延时请使用汇编,大致延时 长度如下 T=tx2+5 uS ------------------------------------------------*/void DelayUs2x(unsigned char t){ while(--t);}/*------------------------------------------------ mS延时函数，含有输入参数 unsigned char t，无返回值 unsigned char 是定义无符号字符变量，其值的范围是 0~255 这里使用晶振12M，精确延时请使用汇编------------------------------------------------*/void DelayMs(unsigned char t){ while(t--) { //大致延时1mS DelayUs2x(245); DelayUs2x(245); }}/*------------------------------------------------ 启动总线------------------------------------------------*/void Start_I2c(){ SDA=1; //发送起始条件的数据信号 _Nop(); SCL=1; _Nop(); //起始条件建立时间大于4.7us,延时 _Nop(); _Nop(); _Nop(); _Nop(); SDA=0; //发送起始信号 _Nop(); //起始条件锁定时间大于4μ _Nop(); _Nop(); _Nop(); _Nop(); SCL=0; //钳住I2C总线，准备发送或接收数据 _Nop(); _Nop();}/*------------------------------------------------ 结束总线------------------------------------------------*/void Stop_I2c(){ SDA=0; //发送结束条件的数据信号 _Nop(); //发送结束条件的时钟信号 SCL=1; //结束条件建立时间大于4μ _Nop(); _Nop(); _Nop(); _Nop(); _Nop(); SDA=1; //发送I2C总线结束信号 _Nop(); _Nop(); _Nop(); _Nop();}/*---------------------------------------------------------------- 字节数据传送函数 函数原型: void SendByte(unsigned char c);功能: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对 此状态位进行操作.(不应答或非应答都使ack=0 假) 发送数据正常，ack=1; ack=0表示被控器无应答或损坏。------------------------------------------------------------------*/void SendByte(unsigned char c){ unsigned char BitCnt; for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位 { if((c<<BitCnt)&0x80)SDA=1; //判断发送位 else SDA=0; _Nop(); SCL=1; //置时钟线为高，通知被控器开始接收数据位 _Nop(); _Nop(); //保证时钟高电平周期大于4μ _Nop(); _Nop(); _Nop(); SCL=0; } _Nop(); _Nop(); SDA=1; //8位发送完后释放数据线，准备接收应答位 _Nop(); _Nop(); SCL=1; _Nop(); _Nop(); _Nop(); if(SDA==1)ack=0; else ack=1; //判断是否接收到应答信号 SCL=0; _Nop(); _Nop();}/*---------------------------------------------------------------- 字节数据传送函数 函数原型: unsigned char RcvByte();功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)， 发完后请用应答函数。 ------------------------------------------------------------------*/ unsigned char RcvByte(){ unsigned char retc; unsigned char BitCnt; retc=0; SDA=1; //置数据线为输入方式 for(BitCnt=0;BitCnt<8;BitCnt++) { _Nop(); SCL=0; //置时钟线为低，准备接收数据位 _Nop(); _Nop(); //时钟低电平周期大于4.7us _Nop(); _Nop(); _Nop(); SCL=1; //置时钟线为高使数据线上数据有效 _Nop(); _Nop(); retc=retc<<1; if(SDA==1)retc=retc+1; //读数据位,接收的数据位放入retc中 _Nop(); _Nop(); } SCL=0; _Nop(); _Nop(); return(retc);}/*---------------------------------------------------------------- 应答子函数原型: void Ack_I2c(void); ----------------------------------------------------------------*/void Ack_I2c(void){ SDA=0; _Nop(); _Nop(); _Nop(); SCL=1; _Nop(); _Nop(); //时钟低电平周期大于4μ _Nop(); _Nop(); _Nop(); SCL=0; //清时钟线，钳住I2C总线以便继续接收 _Nop(); _Nop(); }/*---------------------------------------------------------------- 非应答子函数原型: void NoAck_I2c(void); ----------------------------------------------------------------*/void NoAck_I2c(void){ SDA=1; _Nop(); _Nop(); _Nop(); SCL=1; _Nop(); _Nop(); //时钟低电平周期大于4μ _Nop(); _Nop(); _Nop(); SCL=0; //清时钟线，钳住I2C总线以便继续接收 _Nop(); _Nop(); }/*---------------------------------------------------------------- 向无子地址器件发送字节数据函数 函数原型: bit ISendByte(unsigned char sla,ucahr c); 功能: 从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla. 如果返回1表示操作成功，否则操作有误。注意： 使用前必须已结束总线。----------------------------------------------------------------*//*bit ISendByte(unsigned char sla,unsigned char c){ Start_I2c(); //启动总线 SendByte(sla); //发送器件地址 if(ack==0)return(0); SendByte(c); //发送数据 if(ack==0)return(0); Stop_I2c(); //结束总线 return(1);}*//*---------------------------------------------------------------- 向有子地址器件发送多字节数据函数 函数原型: bit ISendStr(unsigned char sla,unsigned char suba,ucahr *s,unsigned char no); 功能: 从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件 地址sla，子地址suba，发送内容是s指向的内容，发送no个字节。 如果返回1表示操作成功，否则操作有误。注意： 使用前必须已结束总线。----------------------------------------------------------------*/bit ISendStr(unsigned char sla,unsigned char suba,unsigned char *s,unsigned char no){ unsigned char i; for(i=0;i<no;i++) { Start_I2c(); //启动总线 SendByte(sla); //发送器件地址 if(ack==0)return(0); SendByte(suba); //发送器件子地址 if(ack==0)return(0); SendByte(*s); //发送数据 if(ack==0)return(0); Stop_I2c(); //结束总线 DelayMs(1); //必须延时等待芯片内部自动处理数据完毕 s++; suba++; } return(1);}/*---------------------------------------------------------------- 向无子地址器件读字节数据函数 函数原型: bit IRcvByte(unsigned char sla,ucahr *c); 功能: 从启动总线到发送地址，读数据，结束总线的全过程,从器件地 址sla，返回值在c. 如果返回1表示操作成功，否则操作有误。注意： 使用前必须已结束总线。----------------------------------------------------------------*//*bit IRcvByte(unsigned char sla,unsigned char *c){ Start_I2c(); //启动总线 SendByte(sla+1); //发送器件地址 if(ack==0)return(0); *c=RcvByte(); //读取数据 NoAck_I2c(); //发送非就答位 Stop_I2c(); //结束总线 return(1);}*//*---------------------------------------------------------------- 向有子地址器件读取多字节数据函数 函数原型: bit ISendStr(unsigned char sla,unsigned char suba,ucahr *s,unsigned char no); 功能: 从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件 地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。 如果返回1表示操作成功，否则操作有误。注意： 使用前必须已结束总线。----------------------------------------------------------------*/bit IRcvStr(unsigned char sla,unsigned char suba,unsigned char *s,unsigned char no){ unsigned char i; Start_I2c(); //启动总线 SendByte(sla); //发送器件地址 if(ack==0)return(0); SendByte(suba); //发送器件子地址 if(ack==0)return(0); Start_I2c(); SendByte(sla+1); if(ack==0)return(0); for(i=0;i<no-1;i++) { *s=RcvByte(); //发送数据 Ack_I2c(); //发送就答位 s++; } *s=RcvByte(); NoAck_I2c(); //发送非应位 Stop_I2c(); //结束总线 return(1);}/*------------------------------------------------ 判忙函数------------------------------------------------*/ bit LCD_Check_Busy(void) { DataPort= 0xFF; RS_CLR; RW_SET; EN_CLR; _nop_(); EN_SET; return (bit)(DataPort & 0x80); } /*------------------------------------------------ 写入DA转换数值输入参数：dat 表示需要转换的DA数值，范围是0-255------------------------------------------------*/bit WriteDAC(unsigned char dat){ Start_I2c(); //启动总线 SendByte(AddWr); //发送器件地址 if(ack==0)return(0); SendByte(0x40); //发送器件子地址 if(ack==0)return(0); SendByte(dat); //发送数据 if(ack==0)return(0); Stop_I2c(); } /*--------------------------------------------------- 按键控制 --------------------------------------------------*/void push_button(){ if(!key5) { DelayMs(10); if(!key5) { while(!key5); EA = 0; } } if(!key1) //1 { DelayMs(10); if(!key1) { while(!key1); sec++; if(sec == 60) { sec = 0; min++; } } } if(!key2) //2 { DelayMs(10); if(!key2) { while(!key2); sec--; if(sec == 255) { sec = 59; min--; } } } if (!key3)//3 { DelayMs(10); if(!key3) { while(!key3); min++; if(min == 60) { min = 0; hour++; } } } if(!key4)//4 { DelayMs(10); if(!key4) { while(!key4); min--; if(min == 255) { min = 59; if((hour-1) == 255) { hour = 23; } } } } if(!key7) //7 { EA = 1; } if(!key6)//6 { sec = 0; min = 0; hour = 0; EA = 1; } if(!key8)//8 { DelayMs(10); if(!key8) { while(!key8); hour++; if(hour == 24) { hour = 0; } } }}/*------------------------------------------------ 写入命令函数------------------------------------------------*/ void LCD_Write_Com(unsigned char com) { // while(LCD_Check_Busy()); //忙则等待 DelayMs(5); RS_CLR; RW_CLR; EN_SET; DataPort= com; _nop_(); EN_CLR; }/*------------------------------------------------ 写入数据函数------------------------------------------------*/ void LCD_Write_Data(unsigned char Data) { //while(LCD_Check_Busy()); //忙则等待 DelayMs(5); RS_SET; RW_CLR; EN_SET; DataPort= Data; _nop_(); EN_CLR; }/*------------------------------------------------ 清屏函数------------------------------------------------*/ void LCD_Clear(void) { LCD_Write_Com(0x01); DelayMs(5); }/*------------------------------------------------ 写入字符串函数------------------------------------------------*/ void LCD_Write_String(unsigned char x,unsigned char y,unsigned char *s) { if (y == 0) { LCD_Write_Com(0x80 + x); } else { LCD_Write_Com(0xC0 + x); } while (*s) { LCD_Write_Data( *s); s ++; } }/*------------------------------------------------ 写入字符函数------------------------------------------------*/ void LCD_Write_Char(unsigned char x,unsigned char y,unsigned char Data) { if (y == 0) { LCD_Write_Com(0x80 + x); } else { LCD_Write_Com(0xC0 + x); } LCD_Write_Data( Data); }/*------------------------------------------------ 初始化函数------------------------------------------------*/ void LCD_Init(void) { LCD_Write_Com(0x38); /*显示模式设置*/ DelayMs(5); LCD_Write_Com(0x38); DelayMs(5); LCD_Write_Com(0x38); DelayMs(5); LCD_Write_Com(0x38); LCD_Write_Com(0x08); /*显示关闭*/ LCD_Write_Com(0x01); /*显示清屏*/ LCD_Write_Com(0x06); /*显示光标移动设置*/ DelayMs(5); LCD_Write_Com(0x0C); /*显示开及光标设置*/ } /*------------------------------------------------ 主函数------------------------------------------------*/ void main(void) { IRcvStr(0xae,0,p,8); hour = p[2]; min = p[1]; sec = p[0]; LCD_Init(); TMOD = 0x01; TL0 = 0xb0; TH0 = 0x3c; EA = 1; ET0 = 1; TR0 = 1; while(1) { LCD_Write_Char(7,0,0X30 + sec%10);// p[0] = sec%10 + 0x30; LCD_Write_Char(6,0,0X30 + sec/10); p[0] = sec; LCD_Write_Char(5,0,0x3a); LCD_Write_Char(4,0,0X30 + min%10); p[1] = min; LCD_Write_Char(3,0,0X30 + min/10);// p[3] = min/10 + 0x30; LCD_Write_Char(2,0,0x3a); LCD_Write_Char(1,0,0X30 + hour%10); p[2] = hour; LCD_Write_Char(0,0,0X30 + hour/10);// p[5] = hour/10 + 0x30; ISendStr(0xae,0,p,8); p[0] = 0; p[1] = 0; p[2] = 0; push_button(); if(flag1) //等于10秒时，LED慢慢变亮，等于40秒时LED自动关闭 { WriteDAC(num); if(num != 0 ) { num--; } } else { num = 255; WriteDAC(num); } }}void time0_isr(void) interrupt 1{ count++; EA = 0; TH0 = 0x3C; TL0 = 0xb0; if(count == 20) { count = 0; sec++; if(sec == 60)//用于显示0~9 { sec = 0; min++; flag = 0; } if(min == 60) { min = 0; hour++; flag = 1; } if(hour == 24) { hour = 0; } if(sec == 10) { flag1 = 1; } if(sec == 40) { flag1 = 0; } } EA = 1; if(flag) { buzz = ~buzz; P3 = 0x00; DelayMs(10); P3 = 0xff; DelayMs(10); } }
新闻热点
疑难解答
