newmain.c

这是运用c51单片机测试电压电流的完整工程项目文件

#include <reg52.H>
#include <absacc.h>
#include <string.h>
#include <intrins.h>
#include <math.h>
#define uint  		unsigned int
#define uchar 		unsigned char
#define ulong		unsigned long
sbit BUSY = P3^0;
// LCD192*64 数据线
#define uint unsigned int
#define uchar unsigned char
#define ulong unsigned long


//打印位定义区
sbit TX = P3^0;
sbit CS = P3^1;
bit bfdayin=0;  //设置位 置0  设置电流 ，置1  设置打印

//AD位定义区
sbit adclk = P3^2; //ad0832时钟信号源
sbit ado  = P3^3; //ad0832输出值
sbit adi  = P3^3; //ad0832输出值

sbit adcs  = P1^0; //adc0832片选

// LCD192*64 I/O 信号管脚 定义区
sbit di = P1^6; // 数据\指令 选择
sbit rw = P1^7; // 读\写 选择
sbit en = P1^3; // 读\写使能
sbit cs1 = P1^5; // 片选1,低有效(前64列)
sbit cs2 = P1^4; // 片选2,低有效(中64列)
sbit cs3 = P2^2; // 片选3,低有效(后64列)


//I2C定义位

sbit SDA=P2^1;            //模拟I2C数据传送位
sbit SCL=P2^0;            //模拟I2C时钟控制位

bit ack;	              //应答标志位

//电池管理定义位
sbit batt1=P3^7;         //半格电判定，batt1=0
sbit batt2=P3^6;         //1/3格电判定，batt2=0

//变量定义区
uchar KeyCount = 0;   //主菜单光标停留位置标志

//时钟设置界面定义
  uchar year10=0;       //年_十位
  uchar year1=8;        //年_个位
  uchar month10=1;      //月_十位
  uchar month1=1;       //月_个位
  uchar day10=2;        //日_十位
  uchar day1=1;         //日_个位
  uchar hour10=1;       //时_十位
  uchar hour1=5;        //时_个位
  uchar minute10=2;     //分_十位
  uchar minute1=9;      //分_个位it

//显示缓冲区
uchar  TmpBuf[7] = {2,6,8,1,9,8,9};
bit daFlag = 0;
uint daCount = 0;  // D/A计数 最大值为1024
//函数声明区
void tlc5615(uint daTmp);
void Shipin_UI_dispose();
void dierping()
// iic begin
//uchar P8563_Store[5]; /*时间交换区,全局变量声明*/
//uchar code CP8563_Store[5]={0x00,0x00,0x20,0x11,0x08}; /*写入时间初值：08-11-20 00:00*/


/********************************************
内部函数，I2C开始
********************************************/
void Start()
{
	EA=0;
    SDA=1;
    SCL=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SDA=0;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=0;
}
/********************************************
内部函数，I2C结束
********************************************/
void Stop()
{
    SDA=0;
    SCL=0;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SDA=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    EA=1;
}
/********************************************
内部函数，输出ACK ,每个字节传输完成，输出ack=0,结束读书据，ack=1;
********************************************/
void WriteACK(uchar ack)
{
    SDA=ack;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=0;
}
/********************************************
内部函数，等待ACK
********************************************/
void WaitACK()
{
    uchar errtime=20;
    SDA=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();; /*读ACK*/
    SCL=1;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    while(SDA)
    {
        errtime--;
       if(!errtime) Stop();
    }
    SCL=0;
    _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
}
/********************************************
内部函数.输出数据字节
入口:B=数据
********************************************/
void writebyte(uchar wdata)
{
    uchar i;
    for(i=0;i<8;i++)
    {
        if(wdata&0x80) SDA=1;
        else SDA=0;
        wdata<<=1;
        SCL=1;
        _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
        SCL=0;
    }
    WaitACK();      //I2C器件或通讯出错，将会退出I2C通讯
}
/********************************************
内部函数.输入数据
出口:B
********************************************/
uchar Readbyte()
{
    uchar i,bytedata;
    SDA=1;
    for(i=0;i<8;i++)
    {
       SCL=1;
       bytedata<<=1;
       bytedata|=SDA;
       SCL=0;
       _nop_();
    _nop_();             //时钟低电平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    }
    return(bytedata);
}
/********************************************
输出数据->pcf8563
********************************************/
void writeData(uchar address,uchar mdata)
{
    Start();
    writebyte(0xa2); /*写命令*/
    writebyte(address); /*写地址*/
    writebyte(mdata); /*写数据*/
    Stop();
}
/********************************************
输入数据<-pcf8563
********************************************/
uchar ReadData(uchar address) /*单字节*/
{   uchar rdata;
    Start();
    writebyte(0xa2); /*写命令*/
    writebyte(address); /*写地址*/
    Start();
    writebyte(0xa3); /*读命令*/
    rdata=Readbyte();
    WriteACK(1);
    Stop();
    return(rdata);
}
void ReadData1(uchar address,uchar count,uchar * buff) /*多字节*/
{   uchar i;
    Start();
    writebyte(0xa2); /*写命令*/
    writebyte(address); /*写地址*/
    Start();
    writebyte(0xa3); /*读命令*/
    for(i=0;i<count;i++)
    {
         buff[i]=Readbyte();
         if(i<count-1) WriteACK(0);
    }
   WriteACK(1);
    Stop();
}
/********************************************
内部函数,读入时间到内部缓冲区
********************************************/
void P8563_Read()
{    uchar time[7];
     ReadData1(0x02,0x07,time);
     P8563_Store[0]=time[1]&0x7f;  /*分*/
     P8563_Store[1]=time[2]&0x3f;  /*时*/
     P8563_Store[2]=time[3]&0x3f;  /*日*/
     P8563_Store[3]=time[5]&0x1F;  /*月*/
	 P8563_Store[4]=time[6]&0x0FF; /*年*/
}
/********************************************
读入时间到内部缓冲区----外部调用
********************************************/
void P8563_gettime()
{
     P8563_Read();
     if(P8563_Store[0]==0)
       P8563_Read(); /*如果为分=0，为防止时间变化，再读一次*/
}
/********************************************
写时间修改值
********************************************/
void P8563_settime()
{
      uchar i;
      for(i=3;i<=5;i++) { writeData(i,P8563_Store[i-3]); }
      writeData(7,P8563_Store[3]);
	  writeData(8,P8563_Store[4]);
}

 //iic-end


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

********************************************************************/
void Start_I2c()
{
  SDA=1;             //发送起始条件的数据信号
  _nop_();
  SCL=1;
  _nop_();         //起始条件建立时间大于4.7us,延时
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SDA=0;           //发送起始信号
  _nop_();        // 起始条件锁定时间大于4μs
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SCL=0;             //钳住I2C总线，准备发送或接收数据
  _nop_();
  _nop_();
}
/*******************************************************************
                     （2）结束总线函数
函数原型: void  Stop_I2c();
功能:       结束I2C总线,即发送I2C结束条件.
 ********************************************************************/
void Stop_I2c()
{
  SDA=0;              //发送结束条件的数据信号
  _nop_();           //发送结束条件的时钟信号
  SCL=1;             //结束条件建立时间大于4μs
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SDA=1;            //发送I2C总线结束信号
  _nop_();
  _nop_();
  _nop_();
  _nop_();
}
/*******************************************************************
                （3）字节数据发送函数
函数原型: void  SendByte(uchar c);
功能:  将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
     此状态位进行操作.(不应答或非应答都使ack=0 假)
     发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void  SendByte(uchar c)
{
 uchar BitCnt;
  for(BitCnt=0;BitCnt<8;BitCnt++)  //要传送的数据长度为8位
    {
     if((c<<BitCnt)&0x80)SDA=1;   //判断发送位
       else  SDA=0;
     _nop_();
     SCL=1;               //置时钟线为高，通知被控器开始接收数据位
      _nop_();
      _nop_();               //保证时钟高电平周期大于4μs
      _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_();
}
/*******************************************************************
                 （4）字节数据接收函数
函数原型: uchar  RcvByte();
功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
     发完后请用应答函数。
********************************************************************/
uchar  RcvByte()
{
  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);
}
/********************************************************************
                     （5）应答子函数
原型:  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μs
    _nop_();
    _nop_();
    _nop_();
 SCL=0;                //清时钟线，钳住I2C总线以便继续接收
    _nop_();
    _nop_();
}
/*******************************************************************
                    （6）向无子地址器件发送字节数据函数
函数原型: bit  ISendByte(uchar sla,ucahr c);
功能:     从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit ISendByte(uchar sla,uchar c)
{
   Start_I2c();               //启动总线
   SendByte(sla);            //发送器件地址
     if(ack==0)return(0);
   SendByte(c);               //发送数据
     if(ack==0)return(0);
  Stop_I2c();                 //结束总线
  return(1);
}
/*******************************************************************
                    （7）向有子地址器件发送多字节数据函数
函数原型: 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)
{
   uchar i;

   Start_I2c();               //启动总线
   SendByte(sla);            //发送器件地址
     if(ack==0)return(0);
   SendByte(suba);            //发送器件子地址
     if(ack==0)return(0);

   for(i=0;i<no;i++)
    {
     SendByte(*s);               //发送数据
       if(ack==0)return(0);
     s++;
    }
 Stop_I2c();                 //结束总线
  return(1);
}
/*******************************************************************
                    （8）向无子地址器件读字节数据函数
函数原型: bit  IRcvByte(uchar sla,ucahr *c);
功能:     从启动总线到发送地址，读数据，结束总线的全过程,从器件地
          址sla，返回值在c.
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit IRcvByte(uchar sla,uchar *c)
{
   Start_I2c();                //启动总线
   SendByte(sla+1);           //发送器件地址
     if(ack==0)return(0);
   *c=RcvByte();               //读取数据
     Ack_I2c(1);               //发送非就答位
  Stop_I2c();                  //结束总线
  return(1);
}
/*******************************************************************
                    （9）向有子地址器件读取多字节数据函数
函数原型: 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)
{
   uchar 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(0);                //发送就答位
     s++;
    }
   *s=RcvByte();
    Ack_I2c(1);                 //发送非应位
 Stop_I2c();                    //结束总线
  return(1);
}