📄 ds1307.c

📁 这是8051单片机模拟IIC总线
💻 C
📖 第 1 页 / 共 2 页
字号:
上一页 12
      lcd_wrc(0x98+l);
      break;
    }
  }
}


unsigned char key_data()      //判断键值
{
	uchar a=0,b=0,c=0,d=0,i=0;
  	a = 0xef;
  	for(i = 0;i<4;i++)      //读行
	{
	    P1 = a;
		delay(10);
	    b = P1;
		b = b&0x0f;
//    	b = b>>4;
	    if(b!=0x0F)   //表示有键按下
    	{
			delay(200);   //软件延时   确认有键按下
			b = P1&0X0F;
//	    	b = b>>4;
      		if(b != 0x0F)
      		{  
//	        	return b;

				c=b;
		        if(c==0X07)
		        {
	          		d=i*4+3;
		        }
		        else if(c==0X0B)
		        {
		          	d=i*4+2;
		        }
		        else if(c==0X0D)
		        {
		          	d=i*4+1;
		        }
		        else if(c==0X0E)
		        {
		          	d=i*4;
		        }
			    break;
			}
		}
    	else
	    {
	      	a = a<<1;
			a = a+0x01;
	      	if(a==0xFF)
	      	{
//	        	return 0x0f;
				d = 0x0f+1;
				break;
	      	}
    	}
	}
//	d=d-1;
	return d;



}


/*******************************************************************
                     起动总线函数               
函数原型: void  Start_I2c();  
功能:       启动I2C总线,即发送I2C起始条件.
  
********************************************************************/

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();  
功能:       结束I2C总线,即发送I2C结束条件.
  
********************************************************************/
void Stop_I2c()		//结束总线函数
{
	SDA=0;  /*发送结束条件的数据信号*/
	_Nop();   /*发送结束条件的时钟信号*/
	SCL=1;  /*结束条件建立时间大于4*/
	_Nop();
	_Nop();
	_Nop();
	_Nop();
	_Nop();
	SDA=1;  /*发送I2C总线结束信号*/
	_Nop();
	_Nop();
	_Nop();
	_Nop();
}




/*******************************************************************
                 字节数据传送函数               
函数原型: void  SendByte(uchar c);
功能:  将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
     此状态位进行操作.(不应答或非应答都使ack=0 假)     
     发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void  SendByte(uchar c)		//字节数据传送函数send
{
 	uchar 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();
}






/*******************************************************************
                 字节数据传送函数               
函数原型: uchar  RcvByte();
功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
     发完后请用应答函数。  
********************************************************************/	
uchar  RcvByte()		//字节数据传送函数 receive
{
  	uchar retc;
  	uchar BitCnt;
    retc=0; 
  	SDA=1;             /*置数据线为输入方式*/
  	for(BitCnt=0;BitCnt<8;BitCnt++)
    {
    	_Nop();           
        SCL=0;       /*置时钟线为低，准备接收数据位*/
        _Nop();
        _Nop();         /*时钟低电平周期大于4.7μs*/
        _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(bit a);
 
功能:主控器进行应答信号,(可以是应答或非应答信号)
********************************************************************/
void Ack_I2c(bit a)		//主控器进行应答信号
{
  
  	if(a==0)SDA=0;     /*在此发出应答或非应答信号 */
    else SDA=1;
  	_Nop();
  	_Nop();
  	_Nop();      
  	SCL=1;
    _Nop();
    _Nop();              //时钟低电平周期大于4μ
    _Nop();
    _Nop();
    _Nop();  
 	SCL=0;                /*清时钟线，钳住I2C总线以便继续接收*/
    _Nop();
    _Nop();    
}




/*******************************************************************
                    向有子地址器件发送多字节数据函数               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件
          地址sla，子地址suba，发送内容是s指向的内容，发送no个字节。
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
//bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no)		//向有子地址器件发送多字节数据函数 
//子地址为8位的数据传送
bit ISendStr_8(uchar add,uchar son_add,uchar dat)		//向子地址为8位的器件发送多字节数据函数 
{
	Start_I2c();               /*启动总线*/
   	SendByte(add);            /*发送器件地址*/
    if(ack==0)return(0);
	SendByte(son_add);            /*发送器件子地址*/
    if(ack==0)return(0);
    SendByte(dat);               /*发送数据*/
    if(ack==0)return(0);
 	Stop_I2c();                 /*结束总线*/ 
  	return(1);
}
//子地址为16位的数据传送
bit ISendStr_16(uchar add,uint son_add,uchar dat)		//向子地址为16位的器件发送多字节数据函数 
{
	Start_I2c();               /*启动总线*/
   	SendByte(add);            /*发送器件地址*/
    if(ack==0)return(0);
   	SendByte(son_add/256);            /*发送器件子地址*/
    if(ack==0)return(0);
	SendByte(son_add%256);            /*发送器件子地址*/
    if(ack==0)return(0);
    SendByte(dat);               /*发送数据*/
    if(ack==0)return(0);
 	Stop_I2c();                 /*结束总线*/ 
  	return(1);
}





/*******************************************************************
                    向有子地址器件读取多字节数据函数               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件
          地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/


//bit IRcvStr(uchar sla,uchar suba,uchar *s,uchar no)		//向有子地址器件读取多字节数据函数
//子地址为8位的数据传送
uchar IRcvStr_8(uchar add,uchar son_add)		//向子地址为8位的器件读取多字节数据函数
{

	uchar i;
   	Start_I2c();               /*启动总线*/
   	SendByte(add);            /*发送器件地址*/
 	SendByte(son_add);            /*发送器件子地址2*/
   	Start_I2c();
   	SendByte(add+0x01);
   	i=RcvByte();
   	Ack_I2c(1);                 /*发送非应位*/
 	Stop_I2c();                    /*结束总线*/ 
 	return (i);
}
//子地址为16位的数据传送
uchar IRcvStr_16(uchar add,uint son_add)		//向子地址为16位的器件读取多字节数据函数
{

	uchar i;
   	Start_I2c();               /*启动总线*/
   	SendByte(add);            /*发送器件地址*/
   	SendByte(son_add/256);            /*发送器件子地址1*/
 	SendByte(son_add%256);            /*发送器件子地址2*/
   	Start_I2c();
   	SendByte(add+0x01);
   	i=RcvByte();
   	Ack_I2c(1);                 /*发送非应位*/
 	Stop_I2c();                    /*结束总线*/ 
 	return (i);
}
/*完毕*/

void lcd_dis_time(void)		//时钟显示函数
{
	uchar i=0;
	i = IRcvStr_8(0xd0,0x00);
	i = ((i&0x70)>>4)*10+(i&0x0f);
	lcd_add(3,7);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x01);
	i = ((i&0x70)>>4)*10+(i&0x0f);
	lcd_add(3,4);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x02);
	i = ((i&0x30)>>4)*10+(i&0x0f);
	lcd_add(3,1);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x03);
	i = i&0x07;
	lcd_add(2,1);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x04);
	i = ((i&0x30)>>4)*10+(i&0x0f);
	lcd_add(1,7);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x05);
	i = ((i&0x10)>>4)*10+(i&0x0f);
	lcd_add(1,4);
	lcd_dis_num(i);
	i = IRcvStr_8(0xd0,0x06);
	i = ((i&0xf0)>>4)*10+(i&0x0f);
	lcd_add(1,1);
	lcd_dis_num(i);
}

void set_time(uchar sec, uchar min, uchar hr, uchar dy, uchar dt,uchar mn,uchar yr)		//时钟设置sec, min, hr, dy, dt, mn, yr
{
	uchar i;
	lcd_add(4,1);
	i = ISendStr_8(0xd0,0x00,0);
	lcd_wrd(0x30+(uchar)i);
	sec = ((sec/10)<<4)+(sec%10);
	i = ISendStr_8(0xd0,0x00,sec);
	lcd_wrd(0x30+(uchar)i);
	min = ((min/10)<<4)+(min%10);
	i = ISendStr_8(0xd0,0x01,min);
	lcd_wrd(0x30+(uchar)i);
	hr = ((hr/10)<<4)+(hr%10);
	i = ISendStr_8(0xd0,0x02,hr);
	lcd_wrd(0x30+(uchar)i);

	i = ISendStr_8(0xd0,0x03,dy);
	lcd_wrd(0x30+(uchar)i);
	dt = ((dt/10)<<4)+(dt%10);
	i = ISendStr_8(0xd0,0x04,dt);
	lcd_wrd(0x30+(uchar)i);
	mn = ((mn/10)<<4)+(mn%10);
	i = ISendStr_8(0xd0,0x05,mn);
	lcd_wrd(0x30+(uchar)i);
	yr = ((yr/10)<<4)+(yr%10);
	i = ISendStr_8(0xd0,0x06,yr);
	lcd_wrd(0x30+(uchar)i);
}
void lcd_dis_int(long dat,uint int_bits)	//显示一个有符号的整数，显示为dat的低int_bits位
{
	long a = 0;
	uchar n = 0;
	long tmp = 0;
	if(dat<0)
	{
		lcd_wrd(0x2d);
	}
	tmp = pow(10,int_bits);
	dat = fabs(dat);
	dat = dat%tmp;
	for(n=int_bits;n>1;n--)
	{
		tmp = pow(10,n-1);
		a = dat/tmp;
		lcd_wrd(0x30+a);
	    dat =dat%tmp;
	}
	lcd_wrd(0x30+(uchar)dat);
}
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -