找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 6931|回复: 10
收起左侧

用51单片机实现流水线打包计数器程序+Proteus仿真

  [复制链接]
ID:941754 发表于 2021-7-5 23:26 | 显示全部楼层 |阅读模式
设计要求:
1.检测流水线上有无物品,无物品显示P。
2.有物品通过开始计数并在数码管上显示,每计满100个,蜂鸣器响一下,提醒工作人员打包。
3.通过按键可以修改计件数。

仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
51hei.png

单片机源程序如下:
  1. #include <reg51.h>

  2. #define uchar unsigned char
  3. #define uint unsigned int





  4. sbit FMQ=P3^7;
  5. //按键
  6. sbit K1=P3^0;
  7. sbit K2=P3^1;
  8. bit flag_KEY=0; //按键松开标志位

  9. //数码管引脚
  10. sbit Num1=P2^0;
  11. sbit Num2=P2^1;
  12. sbit Num3=P2^2;
  13. sbit Num4=P2^3;
  14. unsigned char ScanTime=1; //数码管4个位

  15. unsigned int Num=0;




  16. //数码管段码表
  17. unsigned char code SEG_Tab[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x00};
  18. /*-------------------------------------
  19.                             数码管显示
  20. ---------------------------------------*/       
  21. void display()
  22. {
  23.         P0=0x00;
  24.         P2=0xFF;
  25.   switch(ScanTime)
  26.         {
  27.           //----------数码管第1位--------------               
  28.                 case 1:
  29.                         if(Num==0)
  30.                         {
  31.                                 P0=0x00;
  32.                         }
  33.                         else
  34.                         {
  35.                                 P0=SEG_Tab[Num/1000];
  36.                         }
  37.                                

  38.                                 Num1=0;
  39.                 break;
  40.           //-----------数码管第2位-------------               
  41.                 case 2:
  42.                         if(Num==0)
  43.                         {
  44.                                 P0=0x00;
  45.                         }
  46.                         else
  47.                         {
  48.                                 P0=SEG_Tab[Num/100%10];
  49.                         }                       
  50.                        
  51.                        
  52.                         Num2=0;               
  53.                 break;
  54.                 //-----------数码管第3位-------------               
  55.                 case 3:  
  56.                         if(Num==0)
  57.                         {
  58.                                 P0=0x00;
  59.                         }
  60.                         else
  61.                         {
  62.                                 P0=SEG_Tab[Num/10%10];
  63.                         }                       
  64.                        
  65.                
  66.                           Num3=0;                       
  67.                 break;
  68.                 //-----------数码管第4位-------------               
  69.                 case 4:  
  70.                         if(Num==0)
  71.                         {
  72.                                 P0=0x73;
  73.                         }
  74.                         else
  75.                         {
  76.                                 P0=SEG_Tab[Num%10];
  77.                         }                       
  78.                        
  79.                         Num4=0;               
  80.                 break;
  81.          //------------------default---------------       
  82.                 default: break;       
  83.         }
  84.        
  85.         //-----数码管循环------       
  86.         ScanTime++;
  87.         if(ScanTime>4)
  88.         {
  89.                 ScanTime=1;//循环扫描       
  90.         }
  91. }

  92. /*-------------------------------------
  93.                             按键扫描
  94. ---------------------------------------*/       
  95. void keyscan()
  96. {
  97.         if(K1==0)
  98.         {
  99.                 if(flag_KEY==1)//按键只响应1次
  100.                 {
  101.                         flag_KEY=0;
  102.                        
  103.                         if(Num<999)
  104.                         {
  105.                                 Num++;
  106.                         }
  107.                 }
  108.         }
  109.         else if(K2==0)
  110.         {
  111.                 if(flag_KEY==1)//按键只响应1次
  112.                 {
  113.                         flag_KEY=0;
  114.                        
  115.                         if(Num>0)
  116.                         {
  117.                                 Num--;
  118.                         }
  119.                 }
  120.         }
  121.   else//按键松开
  122.   {       
  123.           flag_KEY=1;
  124.   }
  125. }


  126. void delay_ms(unsigned int ms)// 延时子程序
  127. {   
  128.   unsigned int a,b;
  129.   for(a=ms;a>0;a--)
  130.   for(b=123;b>0;b--);
  131. }
  132. /*-------------------------------------
  133.                             主函数
  134. ---------------------------------------*/       
  135. void main()
  136. {
  137.         while(1)
  138.         {
  139.                 display();
  140.                 keyscan();
  141.                 delay_ms(10);
  142.                 if(Num>=100)
  143.                 {
  144.                         FMQ=0;
  145.                 }
  146.                 else
  147.                 {
  148.                         FMQ=1;
  149.                 }
  150.         }
  151. }
复制代码

仿真程序51hei提供下载:
计数30.rar (47.75 KB, 下载次数: 110)


评分

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

查看全部评分

回复

使用道具 举报

ID:284488 发表于 2021-7-6 09:38 | 显示全部楼层
感谢楼主之分享,请问楼主检测流水线上有无物品是用那种检测器?检测讯号从那输入单片机?
回复

使用道具 举报

ID:849826 发表于 2021-7-7 08:38 来自触屏版 | 显示全部楼层
探头用的是什么
回复

使用道具 举报

ID:988798 发表于 2021-12-6 20:31 | 显示全部楼层
你好可以问问你电阻设的值吗?
回复

使用道具 举报

ID:988798 发表于 2021-12-6 20:48 | 显示全部楼层
就是我用你的这个代码,以及照着你的这个图建立了一个Proteus,但是它不亮数字
回复

使用道具 举报

ID:95809 发表于 2021-12-8 06:10 | 显示全部楼层
不少 发表于 2021-12-6 20:48
就是我用你的这个代码,以及照着你的这个图建立了一个Proteus,但是它不亮数字

数码管用共阴数码管,P0加上拉,实际电路可以不用,用STC推挽模式直接驱动数码管。
回复

使用道具 举报

ID:321836 发表于 2021-12-8 09:47 | 显示全部楼层
6313 发表于 2021-7-7 08:38
探头用的是什么

亲测:普通的光电对射检测器足够使用
回复

使用道具 举报

ID:352736 发表于 2022-5-21 17:12 来自触屏版 | 显示全部楼层
照这个图搭建电路,数码管点不亮
回复

使用道具 举报

ID:579397 发表于 2022-5-21 17:21 | 显示全部楼层
把按键接到P3.2 P3.3使用外部中断进行累加会好点
回复

使用道具 举报

ID:1035481 发表于 2022-6-17 22:45 来自触屏版 | 显示全部楼层
请问您这个如果再加个储存器,使其拥有断电记忆功能的话,用什么储存器最好呢?
回复

使用道具 举报

ID:352736 发表于 2024-8-21 18:47 | 显示全部楼层
bxyyhan 发表于 2021-12-8 06:10
数码管用共阴数码管,P0加上拉,实际电路可以不用,用STC推挽模式直接驱动数码管。

共阴无法点亮,共阳可以
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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