找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4902|回复: 2
打印 上一主题 下一主题
收起左侧

51单片机货车超重监测系统程序+Proteus仿真

[复制链接]
跳转到指定楼层
楼主
基于51单片机和Proteus仿真的货车超重监测系统仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)



单片机源程序如下:
#include <AT89X52.h>
#include <intrins.h>
#include <stdio.h>


#define R24C04ADD 0xA1
#define W24C04ADD 0xA0

//ADC0832的引脚
sbit ADCS =P2^2;  //ADC0832 chip seclect
sbit ADDI =P2^4;  //ADC0832 k in
sbit ADDO =P2^4;  //ADC0832 k out
sbit ADCLK =P2^3;  //ADC0832 clock signal


sbit SDA = P2 ^ 1;                                //数据线
sbit SCL = P2 ^ 0;                                //时钟线
bit bAck;                                          //应答标志 当bbAck=1是为正确的应答

unsigned char dispbitcode[8]={0xf7,0xfb,0xfd,0xfe,0xef,0xdf,0xbf,0x7f};  //位扫描
unsigned char dispcode[11]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0xff};  //共阳数码管字段码
unsigned char dispbuf[4];
unsigned int temp;
unsigned char getdata; //获取ADC转换回来的值


void delay_1ms(void)  //12mhz delay 1.01ms
{
   unsigned char x,y;   
   x=3;
   while(x--)
  {
       y=40;
       while(y--);
    }
}
void display(void)  //数码管显示函数
{
  char k;
  for(k=0;k<4;k++)
  {

  P1 = dispbitcode[k];
  P0 = dispcode[dispbuf[k]];
  if(k==1)          //加上数码管的dp小数点
          P0&=0x7f;
  delay_1ms();         
  }
}

/************
读ADC0832函数
************/

//采集并返回
unsigned int Adc0832(unsigned char channel)     //AD转换,返回结果
{
    unsigned char i=0;
    unsigned char j;
    unsigned int dat=0;
    unsigned char ndat=0;

    if(channel==0)channel=2;
    if(channel==1)channel=3;
    ADDI=1;
    _nop_();
    _nop_();
    ADCS=0;//拉低CS端
    _nop_();
    _nop_();
    ADCLK=1;//拉高CLK端
    _nop_();
    _nop_();
    ADCLK=0;//拉低CLK端,形成下降沿1
    _nop_();
    _nop_();
    ADCLK=1;//拉高CLK端
    ADDI=channel&0x1;
    _nop_();
    _nop_();
    ADCLK=0;//拉低CLK端,形成下降沿2
    _nop_();
    _nop_();
    ADCLK=1;//拉高CLK端
    ADDI=(channel>>1)&0x1;
    _nop_();
    _nop_();
    ADCLK=0;//拉低CLK端,形成下降沿3
    ADDI=1;//控制命令结束
    _nop_();
    _nop_();
    dat=0;
    for(i=0;i<8;i++)
    {
        dat|=ADDO;//收数据
        ADCLK=1;
        _nop_();
        _nop_();
        ADCLK=0;//形成一次时钟脉冲
        _nop_();
        _nop_();
        dat<<=1;
        if(i==7)dat|=ADDO;
    }  
    for(i=0;i<8;i++)
    {
        j=0;
        j=j|ADDO;//收数据
        ADCLK=1;
        _nop_();
        _nop_();
        ADCLK=0;//形成一次时钟脉冲
        _nop_();
        _nop_();
        j=j<<7;
        ndat=ndat|j;
        if(i<7)ndat>>=1;
    }
    ADCS=1;//拉低CS端
    ADCLK=0;//拉低CLK端
    ADDO=1;//拉高数据端,回到初始状态
    dat<<=8;
    dat|=ndat;
    return(dat);            //return ad k
}

//启动I2C总线,即发送起始条件
void StartI2C()
{
        SDA = 1;                              //发送起始条件数据信号
        _nop_();
        SCL = 1;
        _nop_();                                    //起始建立时间大于4.7us
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        SDA = 0;                              //发送起始信号
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        SCL = 0;                                //时钟操作
        _nop_();
        _nop_();
}
//结束I2C总线,即发送I2C结束条件
void StopI2C()
{
        SDA = 0;                                //发送结束条件的数据信号
        _nop_();                                      //发送结束条件的时钟信号
        SCL = 1;                                //结束条件建立时间大于4us
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        SDA = 1;                                //发送I2C总线结束命令
        _nop_();
        _nop_();
        _nop_();
        _nop_();
        _nop_();        
}
//发送一个字节的数据
void        SendByte(unsigned char c)
{
        unsigned char BitCnt;
        for(BitCnt = 0;BitCnt < 8;BitCnt++)                                  //一个字节
                {
                        if((c << BitCnt)& 0x80) SDA = 1;                   //判断发送位
                        else        SDA = 0;
                        _nop_();
                        SCL = 1;                              //时钟线为高,通知从机开始接收数据
                        _nop_();
                        _nop_();
                        _nop_();
                        _nop_();
                        _nop_();
                        SCL = 0;
                }
        _nop_();
        _nop_();
        SDA = 1;                                                //释放数据线,准备接受应答位
        _nop_();
        _nop_();
        SCL = 1;
        _nop_();
        _nop_();
        _nop_();
        if(SDA == 1) bAck =0;
        else bAck = 1;                                                //判断是否收到应答信号
        SCL = 0;
        _nop_();
        _nop_();
}
//接收一个字节的数据
unsigned char RevByte()
{
        unsigned char retc;
        unsigned char BitCnt;
        retc = 0;
        SDA = 1;
        for(BitCnt=0;BitCnt<8;BitCnt++)
        {
                _nop_();
                SCL = 0;                                            //置时钟线为低,准备接收
                _nop_();
                _nop_();
                _nop_();
                _nop_();
                _nop_();
                SCL = 1;                                            //置时钟线为高使得数据有效
                _nop_();
                _nop_();
                retc = retc << 1;                                    //左移补零
                if (SDA == 1)
                retc = retc + 1;                                     //当数据为1则收到的数据+1
                _nop_();
                _nop_();
        }
        SCL = 0;
        _nop_();
        _nop_();
        return(retc);                                   //返回收到的数据
}

//WChipAdd:写器件地址;RChipAdd:读器件地址;InterAdd:内部地址;如写正确则返回数据,
//否则返回对应错误步骤序号
//向指定器件的内部指定地址发送一个指定字节
unsigned char WIICByte(unsigned char WChipAdd,unsigned char InterAdd,unsigned char WIICData)
{
        StartI2C();                                                                                      //启动总线
        SendByte(WChipAdd);                                                        //发送器件地址以及命令
        if (bAck==1)                                                                                          //收到应答
        {
                SendByte(InterAdd);                                                                //发送内部子地址
                if (bAck ==1)
                {
                        SendByte(WIICData);                                                        //发送数据
                        if(bAck == 1)
                        {
                                StopI2C();                    //停止总线
                                return(0xff);
                        }
                        else
                        {
                                return(0x03);
                        }                        
                }
                else
                {
                        return(0x02);
                }
        }
        return(0x01);
}
//读取指定器件的内部指定地址一个字节数据
unsigned char RIICByte(unsigned char WChipAdd,unsigned char RChipAdd,unsigned char InterDataAdd)
{
        unsigned char TempData;        
        TempData = 0;
        StartI2C();                                                                        //启动
        SendByte(WChipAdd);                                                    //发送器件地址以及读命令
        if (bAck==1)                                                                            //收到应答
        {
                SendByte(InterDataAdd);                                        //发送内部子地址
                if (bAck ==1)
                {
                        StartI2C();
                        SendByte(RChipAdd);        
                        if(bAck == 1)
                        {
                                TempData = RevByte();       //接收数据
                                StopI2C();                  //停止I2C总线
                                return(TempData);           //返回数据
                        }
                        else
                        {
                                return(0x03);
                        }        
                }
                else
                {
                        return(0x02);
                }
        }
        else
        {
                return(0x01);
        }
}


void main(void)
{
  unsigned int OverCounter = 0;
  unsigned char ptemp;
  bit OverFlg = 0;
  unsigned int temp,ppress = 0;
  float  press;        
  while(1)
  {         
                     
          getdata=Adc0832(0);
          if(14<getdata<243)                                       //当压力值介于15kpa到115kpa之间时,遵循线性变换
                 {                           
                  int vary=getdata;                                                //y=(115-15)/(243-13)*X+15kpa                        
                        press=((10.0/23.0)*vary)+9.3;                        //测试时补偿值为9.3                                                                                                         
                        temp=(int)(press*10);                  //放大10倍,便于后面的计算
      if(temp != ppress)
      {
        ppress = temp;
        OverFlg = 1;
      }                                                                                            
                        dispbuf[3]=temp/1000;                                     //取压力值百位
                        dispbuf[2]=(temp%1000)/100;                            //取压力值十位
                        dispbuf[1]=((temp%1000)%100)/10;                    //取压力值个位
                        dispbuf[0]=((temp%1000)%100)%10;                        //取压力值十分位
                        display();
      if (temp > 100)
      {
          if(OverFlg == 1)    //如果是新的一辆车通过
          {
            OverCounter++;
            WIICByte(W24C04ADD,0x01,(OverCounter/0xff));    //低位
            WIICByte(W24C04ADD,0x02,(OverCounter%0xff));    //高位
//            ptemp = printf("%f\n",OverCounter);
            OverFlg = 0;    //清除标志
          }
      }

           }            
  }
}



Keil代码与Proteus8.8仿真下载:
货车超重监测系统.7z (59.29 KB, 下载次数: 56)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:699631 发表于 2020-2-29 15:58 | 只看该作者
需要用Proteus8.8打开
回复

使用道具 举报

板凳
ID:720166 发表于 2020-4-1 14:09 | 只看该作者
好资料,51黑有你更精彩!!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表