自己制作的簡(jiǎn)易的基于51單片機(jī)的自動(dòng)升降電梯簡(jiǎn)易模型與大家分享

ID:162229 · 發(fā)表于 2017-2-3 19:43

寒假在家閑著無(wú)事，想著做點(diǎn)東西，但是畢竟是新手，做不了太厲害的東西，就弄了個(gè)這小玩意，純屬個(gè)人娛樂(lè)之作，與各位分享。

配上幾張圖片

，全部程序，又做了個(gè)小視頻來(lái)演示。

主程序預(yù)覽：

/**************************************************
/*項(xiàng)目名稱(chēng)：基于51單片機(jī)的自動(dòng)升降電梯簡(jiǎn)易模型
/*主控芯片：STC89C52
/*使用模塊：28BYJ_48步進(jìn)電機(jī)、ULN2003驅(qū)動(dòng)模塊、無(wú)源蜂鳴器、紅外發(fā)射器、紅外接收頭、4×4軟鍵盤(pán)
/*平臺(tái)搭建：廢舊泡沫塊、硬紙殼
/*主要功能：裝置供電后，通過(guò)按下紅外遙控器或者軟鍵盤(pán)選擇樓層所對(duì)應(yīng)的數(shù)字，選擇升降方式（只上升、只下降、先升再降）
/* 然后升降電梯（泡沫模擬）停在對(duì)應(yīng)樓層，蜂鳴器發(fā)出“叮咚”的聲響。共計(jì)16層。
/*引腳說(shuō)明：步進(jìn)電機(jī)接P1低四位，蜂鳴器IO口接P3^7，紅外接收頭接P3^2，軟鍵盤(pán)接P2口；
/*時(shí)間：2017年2月3日17時(shí)22分
/**************************************************/
/*********************************************
/*包含必要的頭文件
**********************************************/
#include<ring.h>
#include<key.h>
#include<run.h>
#include<red.h>
/*********************************************
/*定義紅外接收必要數(shù)據(jù)
**********************************************/
unsigned char IrValue[6];
unsigned char Time;
/*********************************************
/*定義變量
**********************************************/
unsigned char s,p;
unsigned int m,a;
/*********************************************
/*主函數(shù)
**********************************************/
void main()
{
unsigned int n,w=30000;
unsigned char b;
IrInit();
while(1)
{
if(p==2)
{
delay(50000);
Z_run(n+15);
p=0;
}
if(p==4)
{
delay(50000);
Z_run(n+15);
p=3;
}
while((p!=3)&&(w>0)) w--;
if(p==3)
{
delay(50000);
D_run(n);
p=0;
}
n=0;
s=1;
while(s)
{
a=KeyDown();
}
if(a!=0)
{
if(a==14)
{
a=0;
p=2;
}
else if(a==15)
{
a=0;
p=3;
}
else
{
b=a;
p=0;
}
n=b*883;
}
else
{
n=m*883;
}
}
}
/*********************************************
/*紅外接收，數(shù)據(jù)處理函數(shù)，使用外部中斷0
**********************************************/
void ReadIr() interrupt 0
{
unsigned char j,k;
unsigned int err;
Time=0;
delay(700);
if(IRIN==0)
{
err=1000;
while((IRIN==0)&&(err>0))
{
delay(1);
err--;
}
if(IRIN==1)
{
err=500;
while((IRIN==1)&&(err>0))
{
delay(1);
err--;
}
for(k=0;k<4;k++)
{
for(j=0;j<8;j++)
{
err=60;
while((IRIN==0)&&(err>0))
{
delay(1);
err--;
}
err=500;
while((IRIN==1)&&(err>0))
{
delay(10);
Time++;
err--;
if(Time>30)
{
return;
}
}
IrValue[k]>>=1;
if(Time>=8)
{
IrValue[k]|=0x80;
}
Time=0;
}
}
}
if(IrValue[2]!=~IrValue[3])
{
return;
}
s=0;
ding();
switch(IrValue[2])
{
case 0x16:
m=0;
break;
case 0x0c:
m=1;
break;
case 0x18:
m=2;
break;
case 0x5e:
m=3;
break;
case 0x08:
m=4;
break;
case 0x1c:
m=5;
break;
case 0x5a:
m=6;
break;
case 0x42:
m=7;
break;
case 0x52:
m=8;
break;
case 0x4a:
m=9;
break;
case 0x40:
p=2;
break;
case 0x43:
p=3;
break;
case 0x19:
p=4;
break;
case 0x45:
m=10;
break;
case 0x46:
m=11;
break;
case 0x47:
m=12;
break;
case 0x44:
m=13;
break;
case 0x07:
m=14;
break;
case 0x15:
m=15;
break;
case 0x09:
m=16;
break;
}
}
}

復(fù)制代碼

詳細(xì)信息請(qǐng)參照程序（壓縮包中含全部源碼）：

基于51的自動(dòng)升降電梯程序.zip (45.6 KB, 下載次數(shù): 219)

ID:163575 · 發(fā)表于 2017-2-6 16:49

有沒(méi)有仿真電路圖哇大神

ID:162229 · 發(fā)表于 2017-2-7 13:32

16546 發(fā)表于 2017-2-6 16:49
有沒(méi)有仿真電路圖哇大神

我不太習(xí)慣用protues畫(huà)圖，就手畫(huà)了一個(gè)，其實(shí)結(jié)構(gòu)很簡(jiǎn)單，畫(huà)出來(lái)之后竟然就這么一點(diǎn)點(diǎn)

ID:162229 · 發(fā)表于 2017-2-7 18:44

ID:162229 · 發(fā)表于 2017-2-7 18:44

ID:162229 · 發(fā)表于 2017-2-7 18:47

抱歉，剛剛電腦出毛病了，圖片發(fā)不上去

ID:99341 · 發(fā)表于 2017-2-7 22:49

樓主給一個(gè)詳細(xì)的電路圖吧！

ID:162229 · 發(fā)表于 2017-2-8 09:18

YBZYBZ 發(fā)表于 2017-2-7 22:49
樓主給一個(gè)詳細(xì)的電路圖吧！

剛剛畫(huà)了一個(gè)，不太會(huì)用這個(gè)protues，電路基本上就是這樣了。

ID:164282 · 發(fā)表于 2017-2-11 22:33

樓主能給份原件清單嗎

ID:164282 · 發(fā)表于 2017-2-11 23:10

啾糾發(fā)表于 2017-2-11 22:33
樓主能給份原件清單嗎

比如PCB版是用的成品最小系統(tǒng)吧？

ID:162229 · 發(fā)表于 2017-2-12 13:06

啾糾發(fā)表于 2017-2-11 23:10
比如PCB版是用的成品最小系統(tǒng)吧？

51單片機(jī)最小系統(tǒng)（STC89C52）×1
ULN2003驅(qū)動(dòng)模塊×1
28BYJ-348步進(jìn)電機(jī)×1
4×4軟鍵盤(pán)×1
VS1838B一體化紅外接收頭×1
紅外遙控器×1
無(wú)源蜂鳴器模塊×1
電源、電源線×1
泡沫底板×1
硬紙板×若干
杜邦線×若干

ID:96326 · 發(fā)表于 2017-3-9 08:29

不錯(cuò)的文件，頂一下。

ID:192333 · 發(fā)表于 2017-4-22 15:30

可不可以用大功率的電機(jī)啊

ID:194070 · 發(fā)表于 2017-4-27 08:49

怎么聯(lián)系你啊大神

ID:162229 · 發(fā)表于 2017-5-6 23:31

wh150 發(fā)表于 2017-4-27 08:49
怎么聯(lián)系你啊大神

不不不，不敢當(dāng)，小白一枚。

ID:162229 · 發(fā)表于 2017-5-6 23:34

chenyan 發(fā)表于 2017-4-22 15:30
可不可以用大功率的電機(jī)啊

如果你要做大的系統(tǒng)的話，可以改用大功率電機(jī)，同樣驅(qū)動(dòng)也要更換，我做的就是個(gè)小的模擬的東西，隨便玩玩

ID:195259 · 發(fā)表于 2017-6-5 19:05

大神能加一下好友嗎

ID:207997 · 發(fā)表于 2017-6-6 09:50

#include<ring.h>
/*********************************************
/*電梯到達(dá)提示音
**********************************************/
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（）；這又是什么意思

ID:202308 · 發(fā)表于 2017-6-6 22:33

支持樓主，感謝分享！

ID:202308 · 發(fā)表于 2017-6-6 22:34

感謝樓主，多謝分享！！

ID:209556 · 發(fā)表于 2017-6-21 17:26

為什么電機(jī)會(huì)來(lái)回轉(zhuǎn) 一直抖動(dòng)，求指教

ID:276794 · 發(fā)表于 2018-1-16 23:32

還在嗎？請(qǐng)求添加q1771716122 我也想做一個(gè)求幫忙

ID:250673 · 發(fā)表于 2018-3-14 17:15

你好，請(qǐng)求添加q1161329168，關(guān)于這個(gè)電梯的制作遇到了困難，請(qǐng)求大神幫助

ID:98926 · 發(fā)表于 2018-3-26 10:38

做的不錯(cuò) 值得學(xué)習(xí)學(xué)習(xí)

ID:329032 · 發(fā)表于 2018-5-19 12:30

大神，我借鑒你這個(gè)做課程設(shè)計(jì)，指導(dǎo)一下嗎，謝謝，可以的話請(qǐng)給我留下聯(lián)系方式，謝謝

ID:335581 · 發(fā)表于 2018-5-22 13:11

謝謝原理圖

ID:317116 · 發(fā)表于 2018-5-23 11:39

話說(shuō)樓主這個(gè)怎么知道他是到達(dá)那一層樓了，是怎么知道的，很疑惑，你沒(méi)有有什么傳感器去檢測(cè)它啊？

ID:294865 · 發(fā)表于 2018-5-23 16:11

學(xué)習(xí)下

ID:335251 · 發(fā)表于 2018-5-24 13:03

那個(gè)模擬高樓，一層大概幾厘米？

ID:392019 · 發(fā)表于 2018-8-31 15:09

你好樓主

ID:392019 · 發(fā)表于 2018-8-31 15:11

樓主你好我要做一個(gè)畢業(yè)設(shè)計(jì)的模型我要用到一個(gè)升降機(jī) 能向你請(qǐng)教一些問(wèn)題嗎

ID:392019 · 發(fā)表于 2018-8-31 15:24

樓主你好想向你請(qǐng)教一些問(wèn)題

ID:392019 · 發(fā)表于 2018-9-3 08:49

樓主你好

ID:399179 · 發(fā)表于 2018-10-8 19:45

感謝樓主分享！！！

ID:392019 · 發(fā)表于 2018-10-16 15:53

bbxyzzj 發(fā)表于 2017-3-9 08:29
不錯(cuò)的文件，頂一下。

我這里下載怎么程序有問(wèn)題

ID:438033 · 發(fā)表于 2018-12-2 23:34

樓主，怎么判斷到達(dá)第幾樓呢，用步進(jìn)電機(jī)的步數(shù)去計(jì)算的嗎？

ID:467353 · 發(fā)表于 2019-1-13 13:47

紅外測(cè)距，好厲害．正常電梯是測(cè)試編碼反饋的，中間有速度平穩(wěn)控制

ID:467353 · 發(fā)表于 2019-1-14 15:34

用普中ＨＣ６８００　ＥＳ　Ｖ２．０實(shí)驗(yàn)板，會(huì)不會(huì)簡(jiǎn)單點(diǎn)？接口都現(xiàn)成的．

ID:273674 · 發(fā)表于 2019-3-15 21:26

有沒(méi)有大神懂基于單片機(jī)電梯模型設(shè)計(jì)的，借鑒LZ這個(gè)做個(gè)畢設(shè)，加355052629

ID:273674 · 發(fā)表于 2019-4-9 11:42

LZ可以加個(gè)好友嗎，我也是做的升降，您是怎么讓升一層大概3CM左右的，我QQ35505269

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

自己制作的簡(jiǎn)易的基于51單片機(jī)的自動(dòng)升降電梯簡(jiǎn)易模型與大家分享

評(píng)分

相關(guān)帖子

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

自己制作的簡(jiǎn)易的 基于51單片機(jī)的自動(dòng)升降電梯簡(jiǎn)易模型 與大家分享

評(píng)分

相關(guān)帖子

自己制作的簡(jiǎn)易的基于51單片機(jī)的自動(dòng)升降電梯簡(jiǎn)易模型與大家分享