首页 > 学院 > 开发设计 > 正文

智能电子钟

2019-11-10 18:30:16
字体:
来源:转载
供稿:网友
//main.c
#include <reg52.h> #include <stdio.h> #include<intrins.h>       #include "i2c.h"#include "delay.h"#include "1602.h"#define AddWr 0x90   //写数据地址 #define AddRd 0x91   //读数据地址extern bit ack;sbit SPK = P2^2;char hour = 5;char min = 41;char sec = 50;char msec = 0;bit spk_flag;unsigned char num;unsigned char ReadADC(unsigned char Chl);bit WriteDAC(unsigned char dat);void time0_isr(void) interrupt 1{	unsigned char count;	ET0 = 0;	TH0 = 0XFC;	TL0 = 0X18;	count++;	if(spk_flag)	{		SPK = ~SPK;	}	if(count == 10)	{		  			count = 0;		msec++;			if(msec == 100)		{			if(spk_flag)				spk_flag = 0;			msec = 0;			sec++;			if(sec == 60)			{				sec = 0;				min++;				if(min == 60)				{					min = 0;					hour++;					spk_flag = 1;					if(hour == 24)					hour = 0;				}					}	  		}	}	if( hour == 5 && min >= 30)	{		num = (min - 30) * 8;	}	else if(hour == 6 || (hour >= 18 && hour <= 22))		num = 255;	else		num = 0;	ET0  = 1;	}void exit0_isr(void) interrupt 0{	EX0 = 0;	ET0 = ~ET0;	EX0 = 1;}void exit1_isr(void) interrupt 2{	EX1 = 0;					hour = 0;	min = 0;	sec = 0;	msec = 0;		EX1 = 1;}void main(void)//静态显示 {	LCD_Init(); 	LCD_Clear();//清屏	TMOD = 0X01;	TH0 = 0XFC;	TL0 = 0X18;	EA = 1;	ET0 = 1;	TR0 = 1;	EX0 = 1;	IT0 = 1;		EX1 = 1;	IT1 = 1;		while (1)  	{		LCD_Write_String(0,0,"Time:");		LCD_Write_Char(0,1,0x30+hour/10);		LCD_Write_Char(1,1,0x30+hour%10);		LCD_Write_Char(2,1,':');		LCD_Write_Char(3,1,0x30+min/10);		LCD_Write_Char(4,1,0x30+min%10);		LCD_Write_Char(5,1,':');		LCD_Write_Char(6,1,0x30+sec/10);		LCD_Write_Char(7,1,0x30+sec%10);		LCD_Write_Char(8,1,':');		LCD_Write_Char(9,1,0x30+msec/10);		LCD_Write_Char(10,1,0x30+msec%10);				WriteDAC(255-num);	 	}}/*------------------------------------------------             读AD转值程序输入参数 Chl 表示需要转换的通道,范围从0-3返回值范围0-255------------------------------------------------*/unsigned char ReadADC(unsigned char Chl) {   unsigned char Val;   Start_I2c();               //启动总线   SendByte(AddWr);             //发送器件地址     if(ack==0)return(0);   SendByte(0x40|Chl);            //发送器件子地址     if(ack==0)return(0);   Start_I2c();   SendByte(AddWr+1);      if(ack==0)return(0);   Val=RcvByte();   NoAck_I2c();                 //发送非应位   Stop_I2c();                  //结束总线  return(Val); }/*------------------------------------------------               写入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();  }
//1602.c
/*-----------------------------------------------  名称:LCD1602  论坛:www.doflye.net  编写:shifang  日期:2009.5  修改:无  内容:  引脚定义如下:1-VSS 2-VDD 3-V0 4-RS 5-R/W 6-E 7-14 DB0-DB7 15-BLA 16-BLK------------------------------------------------*/#include "1602.h"#include "delay.h"sbit RS = P2^4;   //定义端口 sbit RW = P2^5;sbit EN = P2^6;#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/*------------------------------------------------              判忙函数------------------------------------------------*/ bit LCD_Check_Busy(void)  {  DataPort= 0xFF;  RS_CLR;  RW_SET;  EN_CLR;  _nop_();  EN_SET; return (bit)(DataPort & 0x80); }/*------------------------------------------------              写入命令函数------------------------------------------------*/ 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);    /*显示开及光标设置*/   }/*------------------------------------------------   设定二个自定义字符,LCD1602中自定义字符的地址为0x00--0x07,即可定义8个字符这里我们设定把一个自定义字符放在0x00位置(000),另一个放在0x01位子(001)------------------------------------------------*/void Lcd_User_Chr(void){ //第一个自定义字符 LCD_Write_Com(0x40); //"01 000 000"  第1行地址 (D7D6为地址设定命令形式D5D4D3为字符存放位置(0--7),D2D1D0为字符行地址(0--7)) LCD_Write_Data(0x00); //"XXX 11111" 第1行数据(D7D6D5为XXX,表示为任意数(一般用000),D4D3D2D1D0为字符行数据(1-点亮,0-熄灭) LCD_Write_Com(0x41); //"01 000 001"  第2行地址 LCD_Write_Data(0x04); //"XXX 10001" 第2行数据 LCD_Write_Com(0x42); //"01 000 010"  第3行地址 LCD_Write_Data(0x0e); //"XXX 10101" 第3行数据 LCD_Write_Com(0x43); //"01 000 011"  第4行地址 LCD_Write_Data(0x0e); //"XXX 10001" 第4行数据 LCD_Write_Com(0x44); //"01 000 100"  第5行地址 LCD_Write_Data(0x0e); //"XXX 11111" 第5行数据 LCD_Write_Com(0x45); //"01 000 101"  第6行地址 LCD_Write_Data(0x1f); //"XXX 01010" 第6行数据 LCD_Write_Com(0x46); //"01 000 110"  第7行地址 LCD_Write_Data(0x04); //"XXX 11111" 第7行数据 LCD_Write_Com(0x47); //"01 000 111"  第8行地址   LCD_Write_Data(0x00); //"XXX 00000" 第8行数据  //第二个自定义字符 LCD_Write_Com(0x48); //"01 001 000"  第1行地址   LCD_Write_Data(0x03); //"XXX 00001" 第1行数据  LCD_Write_Com(0x49); //"01 001 001"  第2行地址 LCD_Write_Data(0x03); //"XXX 11011" 第2行数据 LCD_Write_Com(0x4a); //"01 001 010"  第3行地址 LCD_Write_Data(0x00); //"XXX 11101" 第3行数据 LCD_Write_Com(0x4b); //"01 001 011"  第4行地址 LCD_Write_Data(0x00); //"XXX 11001" 第4行数据 LCD_Write_Com(0x4c); //"01 001 100"  第5行地址 LCD_Write_Data(0x00); //"XXX 11101" 第5行数据 LCD_Write_Com(0x4d); //"01 001 101"  第6行地址 LCD_Write_Data(0x00); //"XXX 11011" 第6行数据 LCD_Write_Com(0x4e); //"01 001 110"  第7行地址 LCD_Write_Data(0x00); //"XXX 00001" 第7行数据 LCD_Write_Com(0x4f); //"01 001 111"  第8行地址 LCD_Write_Data(0x00); //"XXX 00000" 第8行数据  }
//i2c.c
/*-----------------------------------------------  名称:IIC协议   论坛:www.doflye.net  编写:shifang  修改:无  内容:函数是采用软件延时的方法产生SCL脉冲,固对高晶振频率要作 一定的修改....(本例是1us机器		周期,即晶振频率要小于12MHZ)------------------------------------------------*/                  #include "i2c.h"#include "delay.h"#define  _Nop()  _nop_()  //定义空指令                         bit ack;	              //应答标志位sbit SDA=P2^1;sbit SCL=P2^0;/*------------------------------------------------                    启动总线------------------------------------------------*/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);}*/
//delay.c
#include "delay.h"/*------------------------------------------------ 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); }}
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表