设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机DIY制作 › 自己制作的简易的 基于51单片机的自动升降电梯简易模型 ...
12下一页
返回列表 发新帖
查看: 37458|回复: 42
打印 上一主题 下一主题
收起左侧

自己制作的简易的 基于51单片机的自动升降电梯简易模型 与大家分享

  [复制链接]
跳转到指定楼层
#
ID:162229 发表于 2017-2-3 19:43 | 只看该作者 |只看大图 回帖奖励 |正序浏览 |阅读模式
寒假在家闲着无事，想着做点东西，但是毕竟是新手，做不了太厉害的东西，就弄了个这小玩意，纯属个人娱乐之作，与各位分享。

配上几张图片 ，全部程序，又做了个小视频来演示。



主程序预览：
  1. /**************************************************
  2. /*项目名称：基于51单片机的自动升降电梯简易模型
  3. /*主控芯片：STC89C52
  4. /*使用模块：28BYJ_48步进电机、ULN2003驱动模块、无源蜂鸣器、红外发射器、红外接收头、4×4软键盘
  5. /*平台搭建：废旧泡沫块、硬纸壳
  6. /*主要功能：装置供电后，通过按下红外遥控器或者软键盘选择楼层所对应的数字，选择升降方式（只上升、只下降、先升再降）
  7. /*          然后升降电梯（泡沫模拟）停在对应楼层，蜂鸣器发出“叮咚”的声响。共计16层。
  8. /*引脚说明：步进电机接P1低四位，蜂鸣器IO口接P3^7，红外接收头接P3^2，软键盘接P2口；
  9. /*时间：2017年2月3日17时22分
  10. /**************************************************/

  12. /*********************************************
  13. /*包含必要的头文件
  14. **********************************************/
  15. #include<ring.h>
  16. #include<key.h>
  17. #include<run.h>
  18. #include<red.h>

  20. /*********************************************
  21. /*定义红外接收必要数据
  22. **********************************************/
  23. unsigned char IrValue[6];
  24. unsigned char Time;
  25. /*********************************************
  26. /*定义变量
  27. **********************************************/
  28. unsigned char s,p;
  29. unsigned int m,a;
  30. /*********************************************
  31. /*主函数
  32. **********************************************/                                                                                                        
  33. void main()                                                               
  34. {
  35.         unsigned int n,w=30000;
  36.         unsigned char b;
  37.         IrInit();
  38.         while(1)
  39.         {
  40.                 if(p==2)
  41.                 {
  42.                         delay(50000);               
  43.                         Z_run(n+15);
  44.                         p=0;
  45.                 }
  46.                 if(p==4)
  47.                 {
  48.                         delay(50000);               
  49.                         Z_run(n+15);
  50.                         p=3;
  51.                 }               
  52.                 while((p!=3)&&(w>0)) w--;
  53.                 if(p==3)
  54.                 {
  55.                         delay(50000);
  56.                         D_run(n);
  57.                         p=0;
  58.                 }
  59.                 n=0;               
  60.                 s=1;
  61.                 while(s)
  62.                 {
  63.                         a=KeyDown();
  64.                 }
  65.                 if(a!=0)
  66.                 {
  67.                         if(a==14)
  68.                         {
  69.                                 a=0;
  70.                                 p=2;
  71.                         }
  72.                         else if(a==15)
  73.                         {
  74.                                 a=0;
  75.                                 p=3;
  76.                         }
  77.                         else  
  78.                         {
  79.                                 b=a;
  80.                                 p=0;
  81.                         }
  82.                         n=b*883;
  83.                 }
  84.                 else        
  85.                 {
  86.                         n=m*883;
  87.                 }
  88.         }         
  89. }


  92. /*********************************************
  93. /*红外接收，数据处理函数，使用外部中断0
  94. **********************************************/
  95. void ReadIr() interrupt 0
  96. {
  97.         unsigned char j,k;
  98.         unsigned int err;
  99.         Time=0;                                         
  100.         delay(700);
  101.         if(IRIN==0)        
  102.         {         
  103.                 err=1000;                                
  104.                 while((IRIN==0)&&(err>0))
  105.                 {                        
  106.                         delay(1);
  107.                         err--;
  108.                 }
  109.                 if(IRIN==1)               
  110.                 {
  111.                         err=500;
  112.                         while((IRIN==1)&&(err>0))               
  113.                         {
  114.                                 delay(1);
  115.                                 err--;
  116.                         }
  117.                         for(k=0;k<4;k++)        
  118.                         {                                
  119.                                 for(j=0;j<8;j++)
  120.                                 {

  122.                                         err=60;               
  123.                                         while((IRIN==0)&&(err>0))
  124.                                         {
  125.                                                 delay(1);
  126.                                                 err--;
  127.                                         }
  128.                                         err=500;
  129.                                         while((IRIN==1)&&(err>0))         
  130.                                         {
  131.                                                 delay(10);         
  132.                                                 Time++;
  133.                                                 err--;
  134.                                                 if(Time>30)
  135.                                                 {
  136.                                                         return;
  137.                                                 }
  138.                                         }
  139.                                         IrValue[k]>>=1;         
  140.                                         if(Time>=8)               
  141.                                         {
  142.                                                 IrValue[k]|=0x80;
  143.                                         }
  144.                                         Time=0;                                                               
  145.                                 }
  146.                         }
  147.                 }
  148.                 if(IrValue[2]!=~IrValue[3])
  149.                 {
  150.                         return;
  151.                 }
  152.                 s=0;
  153.                 ding();
  154.                 switch(IrValue[2])
  155.                 {
  156.                         case 0x16:
  157.                         m=0;
  158.                         break;
  159.                         case 0x0c:
  160.                         m=1;
  161.                         break;
  162.                         case 0x18:
  163.                         m=2;
  164.                         break;
  165.                         case 0x5e:
  166.                         m=3;
  167.                         break;
  168.                         case 0x08:
  169.                         m=4;
  170.                         break;
  171.                         case 0x1c:
  172.                         m=5;
  173.                         break;
  174.                         case 0x5a:
  175.                         m=6;
  176.                         break;
  177.                         case 0x42:
  178.                         m=7;
  179.                         break;
  180.                         case 0x52:
  181.                         m=8;
  182.                         break;
  183.                         case 0x4a:
  184.                         m=9;
  185.                         break;
  186.                         case 0x40:
  187.                         p=2;
  188.                         break;
  189.                         case 0x43:
  190.                         p=3;
  191.                         break;
  192.                         case 0x19:
  193.                         p=4;
  194.                         break;
  195.                         case 0x45:
  196.                         m=10;
  197.                         break;
  198.                         case 0x46:
  199.                         m=11;
  200.                         break;
  201.                         case 0x47:
  202.                         m=12;
  203.                         break;
  204.                         case 0x44:
  205.                         m=13;
  206.                         break;
  207.                         case 0x07:
  208.                         m=14;
  209.                         break;
  210.                         case 0x15:
  211.                         m=15;
  212.                         break;
  213.                         case 0x09:
  214.                         m=16;
  215.                         break;
  216.                 }
  217.         }                        
  218. }


复制代码


详细信息请参照程序（压缩包中含全部源码）：
基于51的自动升降电梯程序.zip (45.6 KB, 下载次数: 219)

模型, 制作, 步进电机, 单片机, 遥控器

评分

参与人数 5黑币 +126 收起 理由
柯南的阿嘞嘞 + 5 绝世好帖！
dsjfadsjf + 4 很给力！
沉默的墓碑 + 12 很给力！
啾纠 + 5 很给力！
admin + 100 共享资料的黑币奖励！

查看全部评分

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

相关帖子
回复

使用道具 举报

42#
ID:688966 发表于 2020-2-2 08:51 来自手机 | 只看该作者
从开始设计到实际运用实现升降是怎么做到的，有教一下我这个青铜吗
回复

使用道具 举报

41#
ID:685664 发表于 2020-1-13 14:38 | 只看该作者
大哥哥 如果我想做一个东西向两个电梯上下运动的那种  你会吗  可否加个qq3025684068  我有问题问你
回复

使用道具 举报

40#
ID:520418 发表于 2019-4-29 15:39 | 只看该作者
大神 请问下那个参数代表上升楼层
回复

使用道具 举报

39#
ID:273674 发表于 2019-4-9 11:42 | 只看该作者
LZ可以加个好友吗，我也是做的升降，您是怎么让升一层大概3CM左右的，我QQ35505269
回复

使用道具 举报

38#
ID:273674 发表于 2019-3-15 21:26 | 只看该作者
有没有大神懂基于单片机电梯模型设计的，借鉴LZ这个做个毕设，加355052629
回复

使用道具 举报

37#
ID:467353 发表于 2019-1-14 15:34 | 只看该作者
用普中ＨＣ６８００　ＥＳ　Ｖ２．０实验板，会不会简单点？接口都现成的．
回复

使用道具 举报

36#
ID:467353 发表于 2019-1-13 13:47 | 只看该作者
红外测距，好厉害．正常电梯是测试编码反馈的，中间有速度平稳控制
回复

使用道具 举报

35#
ID:438033 发表于 2018-12-2 23:34 | 只看该作者
楼主，怎么判断到达第几楼呢，用步进电机的步数去计算的吗？
回复

使用道具 举报

34#
ID:392019 发表于 2018-10-16 15:53 来自手机 | 只看该作者
bbxyzzj 发表于 2017-3-9 08:29
不错的文件，顶一下。

我这里下载怎么程序有问题
回复

使用道具 举报

33#
ID:399179 发表于 2018-10-8 19:45 来自手机 | 只看该作者
感谢楼主分享！！！
回复

使用道具 举报

32#
ID:392019 发表于 2018-9-3 08:49 来自手机 | 只看该作者
楼主   你好
回复

使用道具 举报

31#
ID:392019 发表于 2018-8-31 15:24 来自手机 | 只看该作者
楼主你好    想向你请教一些问题
回复

使用道具 举报

30#
ID:392019 发表于 2018-8-31 15:11 来自手机 | 只看该作者
楼主  你好   我要做一个毕业设计的模型   我要用到一个升降机 能向你请教一些问题吗
回复

使用道具 举报

29#
ID:392019 发表于 2018-8-31 15:09 来自手机 | 只看该作者
你好  楼主   
回复

使用道具 举报

28#
ID:335251 发表于 2018-5-24 13:03 来自手机 | 只看该作者
那个模拟高楼，一层大概几厘米？
回复

使用道具 举报

27#
ID:294865 发表于 2018-5-23 16:11 | 只看该作者
学习下
回复

使用道具 举报

26#
ID:317116 发表于 2018-5-23 11:39 | 只看该作者
话说楼主这个怎么知道他是到达那一层楼了，是怎么知道的，很疑惑，你没有有什么传感器去检测它啊？
回复

使用道具 举报

25#
ID:335581 发表于 2018-5-22 13:11 | 只看该作者
谢谢原理图
回复

使用道具 举报

24#
ID:329032 发表于 2018-5-19 12:30 来自手机 | 只看该作者
大神，我借鉴你这个做课程设计，指导一下吗，谢谢，可以的话请给我留下联系方式，谢谢
回复

使用道具 举报

23#
ID:98926 发表于 2018-3-26 10:38 | 只看该作者
做的不错  值得学习学习
回复

使用道具 举报

22#
ID:250673 发表于 2018-3-14 17:15 | 只看该作者
你好，请求添加q1161329168，关于这个电梯的制作遇到了困难，请求大神帮助
回复

使用道具 举报

21#
ID:276794 发表于 2018-1-16 23:32 来自手机 | 只看该作者
还在吗？  请求添加q1771716122  我也想做一个求帮忙
回复

使用道具 举报

20#
ID:209556 发表于 2017-6-21 17:26 | 只看该作者
为什么电机会来回转 一直抖动，求指教
回复

使用道具 举报

19#
ID:202308 发表于 2017-6-6 22:34 | 只看该作者
感谢楼主，多谢分享！！
回复

使用道具 举报

18#
ID:202308 发表于 2017-6-6 22:33 | 只看该作者
支持楼主，感谢分享！
回复

使用道具 举报

17#
ID:207997 发表于 2017-6-6 09:50 | 只看该作者
#include<ring.h>
/*********************************************
/*电梯到达提示音
**********************************************/
void ring()
{
        unsigned int c;
        for(c=0;c<140;c++)
        {
                bee=!bee;
                delay(130);
        }
        for(c=0;c<100;c++)
        {
                bee=!bee;
                delay(200);
        }
}
bee是什么意思
                        s=0;
                        ting();
                }
        }
        switch(KeyValue)
        {
                case(1):return 1;
                case(2):return 2;
                case(3):return 3;
                case(4):return 10;
                case(5):return 4;
                case(6):return 5;
                case(7):return 6;
                case(8):return 11;
                case(9):return 7;
                case(10):return 8;
                case(11):return 9;
                case(12):return 12;
                case(13):return 14;
                case(14):return 0;
                case(15):return 15;
                case(16):return 13;
                default:return 0;
        }
S=0;ting（）；这又是什么意思
回复

使用道具 举报

16#
ID:195259 发表于 2017-6-5 19:05 | 只看该作者
大神能加一下好友吗
回复

使用道具 举报

15#
ID:162229 发表于 2017-5-6 23:34 | 只看该作者
chenyan 发表于 2017-4-22 15:30
可不可以用大功率的电机啊

如果你要做大的系统的话，可以改用大功率电机，同样驱动也要更换，我做的就是个小的模拟的东西，随便玩玩
回复

使用道具 举报

14#
ID:162229 发表于 2017-5-6 23:31 | 只看该作者
wh150 发表于 2017-4-27 08:49
怎么联系你啊大神

不不不，不敢当，小白一枚。
回复

使用道具 举报

13#
ID:194070 发表于 2017-4-27 08:49 来自手机 | 只看该作者
怎么联系你啊大神
回复

使用道具 举报

12#
ID:192333 发表于 2017-4-22 15:30 | 只看该作者
可不可以用大功率的电机啊
回复

使用道具 举报

11#
ID:96326 发表于 2017-3-9 08:29 | 只看该作者
不错的文件，顶一下。
回复

使用道具 举报

10#
ID:162229 发表于 2017-2-12 13:06 | 只看该作者
啾纠 发表于 2017-2-11 23:10
比如PCB版是用的成品最小系统吧？

51单片机最小系统（STC89C52）×1
ULN2003驱动模块×1
28BYJ-348步进电机×1
4×4软键盘×1
VS1838B一体化红外接收头×1
红外遥控器×1
无源蜂鸣器模块×1
电源、电源线×1
泡沫底板×1
硬纸板×若干
杜邦线×若干
回复

使用道具 举报

9#
ID:164282 发表于 2017-2-11 23:10 | 只看该作者
啾纠 发表于 2017-2-11 22:33
楼主能给份原件清单吗

比如PCB版是用的成品最小系统吧？
回复

使用道具 举报

8#
ID:164282 发表于 2017-2-11 22:33 | 只看该作者
楼主能给份原件清单吗
回复

使用道具 举报

7#
ID:162229 发表于 2017-2-8 09:18 来自手机 | 只看该作者
YBZYBZ 发表于 2017-2-7 22:49
楼主给一个详细的电路图吧！

刚刚画了一个，不太会用这个protues，电路基本上就是这样了。

mmexport1486516601474.jpg (47.56 KB, 下载次数: 305)

mmexport1486516601474.jpg
回复

使用道具 举报

6#
ID:99341 发表于 2017-2-7 22:49 | 只看该作者
楼主给一个详细的电路图吧！
回复

使用道具 举报

5#
ID:162229 发表于 2017-2-7 18:47 来自手机 | 只看该作者
抱歉，刚刚电脑出毛病了，图片发不上去

14864644122140.21675697640962244.jpg (42.5 KB, 下载次数: 251)

14864644122140.21675697640962244.jpg
回复

使用道具 举报

地板
ID:162229 发表于 2017-2-7 18:44 | 只看该作者

回复

使用道具 举报

板凳
ID:162229 发表于 2017-2-7 18:44 | 只看该作者

回复

使用道具 举报

下一页 »
12下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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