标题: 单片机电子秤的设计与制作 具有去皮,校准,报警等你功能 [打印本页]
作者: 潘汝见    时间: 2023-4-7 23:20
标题: 单片机电子秤的设计与制作 具有去皮,校准,报警等你功能
该电子秤具有去皮，校准，报警等功能

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include<reg52.h>
  2. #include <intrins.h>
  3. #include<LCD1602.h>
  4. #include<HX711.h>

  6. sbit key1 = P3^0;//去皮键
  7. sbit key2 = P3^1;//校准加
  8. sbit key3 = P3^2;//校准减
  9. sbit LED=P1^1;  //报警灯
  10. sbit Buzzer=P1^0;//蜂鸣器
  11. unsigned long Weight_Shiwu = 0;//记录实物的质量
  12. unsigned long Weight_Maopi = 0;//记录毛皮的质量

  14. void Delay(unsigned int n);//延时子程序
  15. void Get_Maopi();//获取毛皮的质量
  16. void Get_Weight();//获取实物的质量
  17. void Keyscan();
  18. void baojing();
  19. void stopbaojing();

  21. /*实际物体的重量(以克为单位)=HX711输出的24位数字量/2147.5,在实际测量中，可以调整jiaozhunxishu的值，进行校正*/
  22. double jiaozhunxishu=2147.5;

  24. int main()
  25. {
  26.         Init_LCD1602();                //LCD1602初始化
  27.         LCD1602_write_com(0x80);                //光标定位在第一行首位
  28.         LCD1602_write_word("Weight=");               
  29.         LCD1602_write_com(0x80+0x40);  //光标定位在第二行首位
  30.         LCD1602_write_word("MAX=999g");
  31.         Delay(1000);                //1s
  32.         while(1)
  33.         {
  34.                 Keyscan();//扫描按键，确定是否去皮,是否校正
  35.                 Get_Weight();//获取实物质量
  36.             if(Weight_Shiwu>=1000)
  37.                 baojing();
  38.                 else
  39.                 {
  40.                 stopbaojing();
  41.                 LCD1602_write_com(0x80+0x07);
  42.                 LCD1602_write_data(Weight_Shiwu%1000/100 + 0X30);//这里加0x30表示将数字一模一样地显示在LCD1602       
  43.         LCD1602_write_data(Weight_Shiwu%100/10 + 0X30);
  44.         LCD1602_write_data(Weight_Shiwu%10 + 0X30);
  45.                 LCD1602_write_word("g");
  46.                 }
  47.         }       
  48. }

  50. /*获取实物质量*/
  51. void Get_Weight()
  52. {
  53.         Weight_Shiwu = HX711_Read();
  54.         Weight_Shiwu = (unsigned int)((float)Weight_Shiwu/jiaozhunxishu);
  55.         Weight_Shiwu = Weight_Shiwu - Weight_Maopi;
  56. }
  57. /*报警电路*/
  58. void baojing()
  59. {
  60.         Buzzer = !Buzzer;        
  61.         LED=!LED;
  62.     LCD1602_write_com(0x80+0x07);
  63.     LCD1602_write_word("---");
  64.     Delay(50);
  65. }
  66. /****************************
  67. 函数名：stopbaojing()
  68. 功能：  停止报警
  69. 详细：  Proteus中使用的蜂鸣器有源，所以给低电平就不响，LED给低电平就不亮
  70. ***************************/
  71. void stopbaojing()
  72. {
  73.         Buzzer =1;        
  74.         LED=1;       
  75. }

  77. /*延时子程序*/
  78. void Delay(unsigned int n)
  79. {
  80.         int i, j;
  81.         for(i=0; i<n; i++)
  82.                 for(j=0; j<110; j++);
  83. }



  87. /*获取毛皮质量*/               
  88. void Get_Maopi()
  89. {
  90.         Weight_Maopi = HX711_Read();
  91.         Weight_Maopi = (unsigned int)((float)Weight_Maopi/jiaozhunxishu);
  92. }



  96. /*************************************
  97. 函数名： Keyscan1()
  98. 功能：   按键扫描  
  99. 详细：   判断是否要去皮，是否要进行校正，此处的校正是长按按键，就会一直进行校正，不是按一下校正一次
  100. **************************************/
  101. void Keyscan()
  102. {
  103.         if(key1 == 0)   //是否去皮
  104.                 Delay(10);
  105.         if(key1 == 0)
  106.                 Get_Maopi();
  107.        
  108.         if(key2 == 0)   //校准加
  109.                 Delay(10);
  110.         if(key2 == 0)
  111.                 jiaozhunxishu=jiaozhunxishu-0.1;
  112.        
  113.         if(key3 == 0)  //校准减
  114.                 Delay(10);
  115.         if(key3 == 0)
  116.                 jiaozhunxishu=jiaozhunxishu+0.1;
  117. }
复制代码

Keil代码与Proteus8.13仿真下载:
电子秤.7z (170.58 KB, 下载次数: 43)

作者: nlming    时间: 2023-4-13 16:54
很实用啊



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1