找回密码
 立即注册

QQ登录

只需一步,快速开始

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

基于单片机的车辆超载监测系统(电子地秤)仿真与源码

[复制链接]
跳转到指定楼层
楼主
车辆超载检测仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)



电子地秤单片机源程序如下:


  1. //线性区间标度变换公式:    y=(115-15)/(243-13)*X+15kpa   


  2. #include <AT89X52.h>
  3. #include <intrins.h>
  4. #include <stdio.h>


  5. #define R24C04ADD 0xA1
  6. #define W24C04ADD 0xA0

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


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

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


  20. void delay_1ms(void)  //12mhz delay 1.01ms
  21. {
  22.    unsigned char x,y;   
  23.    x=3;
  24.    while(x--)
  25.   {
  26.        y=40;
  27.        while(y--);
  28.     }
  29. }
  30. void display(void)  //数码管显示函数
  31. {
  32.   char k;
  33.   for(k=0;k<4;k++)
  34.   {

  35.   P1 = dispbitcode[k];
  36.   P0 = dispcode[dispbuf[k]];
  37.   if(k==1)          //加上数码管的dp小数点
  38.           P0&=0x7f;
  39.   delay_1ms();         
  40.   }
  41. }

  42. /************
  43. 读ADC0832函数
  44. ************/

  45. //采集并返回
  46. unsigned int Adc0832(unsigned char channel)     //AD转换,返回结果
  47. {
  48.     unsigned char i=0;
  49.     unsigned char j;
  50.     unsigned int dat=0;
  51.     unsigned char ndat=0;

  52.     if(channel==0)channel=2;
  53.     if(channel==1)channel=3;
  54.     ADDI=1;
  55.     _nop_();
  56.     _nop_();
  57.     ADCS=0;//拉低CS端
  58.     _nop_();
  59.     _nop_();
  60.     ADCLK=1;//拉高CLK端
  61.     _nop_();
  62.     _nop_();
  63.     ADCLK=0;//拉低CLK端,形成下降沿1
  64.     _nop_();
  65.     _nop_();
  66.     ADCLK=1;//拉高CLK端
  67.     ADDI=channel&0x1;
  68.     _nop_();
  69.     _nop_();
  70.     ADCLK=0;//拉低CLK端,形成下降沿2
  71.     _nop_();
  72.     _nop_();
  73.     ADCLK=1;//拉高CLK端
  74.     ADDI=(channel>>1)&0x1;
  75.     _nop_();
  76.     _nop_();
  77.     ADCLK=0;//拉低CLK端,形成下降沿3
  78.     ADDI=1;//控制命令结束
  79.     _nop_();
  80.     _nop_();
  81.     dat=0;
  82.     for(i=0;i<8;i++)
  83.     {
  84.         dat|=ADDO;//收数据
  85.         ADCLK=1;
  86.         _nop_();
  87.         _nop_();
  88.         ADCLK=0;//形成一次时钟脉冲
  89.         _nop_();
  90.         _nop_();
  91.         dat<<=1;
  92.         if(i==7)dat|=ADDO;
  93.     }  
  94.     for(i=0;i<8;i++)
  95.     {
  96.         j=0;
  97.         j=j|ADDO;//收数据
  98.         ADCLK=1;
  99.         _nop_();
  100.         _nop_();
  101.         ADCLK=0;//形成一次时钟脉冲
  102.         _nop_();
  103.         _nop_();
  104.         j=j<<7;
  105.         ndat=ndat|j;
  106.         if(i<7)ndat>>=1;
  107.     }
  108.     ADCS=1;//拉低CS端
  109.     ADCLK=0;//拉低CLK端
  110.     ADDO=1;//拉高数据端,回到初始状态
  111.     dat<<=8;
  112.     dat|=ndat;
  113.     return(dat);            //return ad k
  114. }

  115. //启动I2C总线,即发送起始条件
  116. void StartI2C()
  117. {
  118.         SDA = 1;                              //发送起始条件数据信号
  119.         _nop_();
  120.         SCL = 1;
  121.         _nop_();                                    //起始建立时间大于4.7us
  122.         _nop_();
  123.         _nop_();
  124.         _nop_();
  125.         _nop_();
  126.         SDA = 0;                              //发送起始信号
  127.         _nop_();
  128.         _nop_();
  129.         _nop_();
  130.         _nop_();
  131.         _nop_();
  132.         SCL = 0;                                //时钟操作
  133.         _nop_();
  134.         _nop_();
  135. }
  136. //结束I2C总线,即发送I2C结束条件
  137. void StopI2C()
  138. {
  139.         SDA = 0;                                //发送结束条件的数据信号
  140.         _nop_();                                      //发送结束条件的时钟信号
  141.         SCL = 1;                                //结束条件建立时间大于4us
  142.         _nop_();
  143.         _nop_();
  144.         _nop_();
  145.         _nop_();
  146.         _nop_();
  147.         SDA = 1;                                //发送I2C总线结束命令
  148.         _nop_();
  149.         _nop_();
  150.         _nop_();
  151.         _nop_();
  152.         _nop_();        
  153. }
  154. //发送一个字节的数据
  155. void        SendByte(unsigned char c)
  156. {
  157.         unsigned char BitCnt;
  158.         for(BitCnt = 0;BitCnt < 8;BitCnt++)                                  //一个字节
  159.                 {
  160.                         if((c << BitCnt)& 0x80) SDA = 1;                   //判断发送位
  161.                         else        SDA = 0;
  162.                         _nop_();
  163.                         SCL = 1;                              //时钟线为高,通知从机开始接收数据
  164.                         _nop_();
  165.                         _nop_();
  166.                         _nop_();
  167.                         _nop_();
  168.                         _nop_();
  169.                         SCL = 0;
  170.                 }
  171.         _nop_();
  172.         _nop_();
  173.         SDA = 1;                                                //释放数据线,准备接受应答位
  174.         _nop_();
  175.         _nop_();
  176.         SCL = 1;
  177.         _nop_();
  178.         _nop_();
  179.         _nop_();
  180.         if(SDA == 1) bAck =0;
  181.         else bAck = 1;                                                //判断是否收到应答信号
  182.         SCL = 0;
  183.         _nop_();
  184.         _nop_();
  185. }
  186. //接收一个字节的数据
  187. unsigned char RevByte()
  188. {
  189.         unsigned char retc;
  190.         unsigned char BitCnt;
  191.         retc = 0;
  192.         SDA = 1;
  193.         for(BitCnt=0;BitCnt<8;BitCnt++)
  194.         {
  195.                 _nop_();
  196.                 SCL = 0;                                            //置时钟线为低,准备接收
  197.                 _nop_();
  198.                 _nop_();
  199.                 _nop_();
  200.                 _nop_();
  201.                 _nop_();
  202.                 SCL = 1;                                            //置时钟线为高使得数据有效
  203.                 _nop_();
  204.                 _nop_();
  205.                 retc = retc << 1;                                    //左移补零
  206.                 if (SDA == 1)
  207.                 retc = retc + 1;                                     //当数据为1则收到的数据+1
  208.                 _nop_();
  209.                 _nop_();
  210.         }
  211.         SCL = 0;
  212.         _nop_();
  213.         _nop_();
  214.         return(retc);                                   //返回收到的数据
  215. }

  216. //WChipAdd:写器件地址;RChipAdd:读器件地址;InterAdd:内部地址;如写正确则返回数据,
  217. //否则返回对应错误步骤序号
  218. //向指定器件的内部指定地址发送一个指定字节
  219. unsigned char WIICByte(unsigned char WChipAdd,unsigned char InterAdd,unsigned char WIICData)
  220. {
  221.         StartI2C();                                                                                      //启动总线
  222.         SendByte(WChipAdd);                                                        //发送器件地址以及命令
  223.         if (bAck==1)                                                                                          //收到应答
  224.         {
  225.                 SendByte(InterAdd);                                                                //发送内部子地址
  226.                 if (bAck ==1)
  227.                 {
  228.                         SendByte(WIICData);                                                        //发送数据
  229.                         if(bAck == 1)
  230.                         {
  231.                                 StopI2C();                    //停止总线
  232.                                 return(0xff);
  233.                         }
  234.                         else
  235.                         {
  236.                                 return(0x03);
  237.                         }                        
  238.                 }
  239.                 else
  240.                 {
  241.                         return(0x02);
  242.                 }
  243.         }
  244.         return(0x01);
  245. }
  246. //读取指定器件的内部指定地址一个字节数据
  247. unsigned char RIICByte(unsigned char WChipAdd,unsigned char RChipAdd,unsigned char InterDataAdd)
  248. {
  249.         unsigned char TempData;        
  250.         TempData = 0;
  251.         StartI2C();                                                                        //启动
  252.         SendByte(WChipAdd);                                                    //发送器件地址以及读命令
  253.         if (bAck==1)                                                                            //收到应答
  254.         {
  255.                 SendByte(InterDataAdd);                                        //发送内部子地址
  256.                 if (bAck ==1)
  257.                 {
  258.                         StartI2C();
  259.                         SendByte(RChipAdd);        
  260.                         if(bAck == 1)
  261.                         {
  262.                                 TempData = RevByte();       //接收数据
  263.                                 StopI2C();                  //停止I2C总线
  264.                                 return(TempData);           //返回数据
  265.                         }
  266.                         else
  267.                         {
  268.                                 return(0x03);
  269.                         }        
  270.                 }
  271.                 else
  272.                 {
  273.                         return(0x02);
  274.                 }
  275.         }
  276.         else
  277.         {
  278.                 return(0x01);
  279.         }
  280. }


  281. void main(void)
  282. {
  283.   unsigned int OverCounter = 0;
  284.   unsigned char ptemp;
  285.   bit OverFlg = 0;
  286.   unsigned int temp,ppress = 0;
  287.   float  press;        
  288.   while(1)
  289.   {         
  290.                      
  291.           getdata=Adc0832(0);
  292.           if(14<getdata<243)                                       //当压力值介于15kpa到115kpa之间时,遵循线性变换
  293.                  {                           
  294.                   int vary=getdata;                                                //y=(115-15)/(243-13)*X+15kpa                        
  295.                         press=((10.0/23.0)*vary)+9.3;                        //测试时补偿值为9.3                                                                                                         
  296.                         temp=(int)(press*10);                  //放大10倍,便于后面的计算
  297.       if(temp != ppress)
  298.       {
  299.         ppress = temp;
  300.         OverFlg = 1;
  301.       }                                                                                            
  302.                         dispbuf[3]=temp/1000;                                     //取压力值百位
  303.                         dispbuf[2]=(temp%1000)/100;                            //取压力值十位
  304.                         dispbuf[1]=((temp%1000)%100)/10;                    //取压力值个位
  305.                         dispbuf[0]=((temp%1000)%100)%10;                        //取压力值十分位
  306.                         display();
  307.       if (temp > 100)
  308.       {
  309.           if(OverFlg == 1)    //如果是新的一辆车通过
  310.           {
  311.             OverCounter++;
  312.             WIICByte(W24C04ADD,0x01,(OverCounter/0xff));    //低位
  313. ……………………

  314. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

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


评分

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

查看全部评分

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

使用道具 举报

沙发
ID:362692 发表于 2019-10-28 23:52 来自手机 | 只看该作者
非常不错的资料
回复

使用道具 举报

板凳
ID:1033274 发表于 2022-6-8 17:49 | 只看该作者
需要用Proteus8.8打开
回复

使用道具 举报

地板
ID:63541 发表于 2022-6-21 19:02 | 只看该作者
用Proteus8.8可以打开谢谢!
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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