欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 8254|回復: 15
收起左側

單片機8層電梯程序分享(支持修改任意最大樓層)仿真+源程序

  [復制鏈接]
ID:142059 發表于 2018-7-7 00:32 | 顯示全部樓層 |閱讀模式
本帖最后由 Angle145 于 2020-1-25 21:28 編輯

修改最大樓層方法，在程序中，#define MaxFloor   8    把8改成想要的樓層數就可以了，支持1-8層，其他不用修改。

按照現實的電梯運行設計，兩個版本，一個是用定時器產生定時，定時用來模擬電梯上下樓，別一版本是需要外部的信號來觸發，就是現實中的限位器或者傳感器，用來傳感是否到達某個樓層。理論上每個樓層都要安裝一個傳感器，電梯經過時就可以知道是否到達樓層了。

仿真文件請使用Proteus8.6及以上版本打開。
源程序用Keil5打開。

//在此聲明，代碼全部屬于原創，沒有任何一條是復制粘貼，請尊重個人勞動成果
//在此分享出來僅供大家學習參考使用，請務必禁止用于其他用途

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

直流電機+光耦隔離

直流電機+光耦隔離

單片機源程序：


  1. /*******************電梯主程序**********************/
  2. #include "reg51.h"
  3. #include "intrins.h"

  5. /******************移植部分代碼*************************/
  6. sbit DOOR=P3^5;
  7. sbit DlevMotor_P=P3^6; //電梯電機正極
  8. sbit DlevMotor_N=P3^7; //電梯電機負極
  9. #define SEGPort    P0
  10. #define KeyPort_X  P1
  11. #define KeyPort_Y  P2
  12. /******************************************************/


  15. #define u8  unsigned char
  16. #define u16 unsigned int
  17.         
  18. #define MaxFloor   8

  20. #define FloorStayTime 40        //單位：50ms
  21. #define DoorStayTime  2   //單位：S

  23. #define TRUE  1
  24. #define FALSE 0

  26. #define Null  0  
  27. #define STOP  1
  28. #define UP    2
  29. #define DOWN  3
  30. #define Dlev_UP    DlevMotor_P=0;DlevMotor_N=1  //低電平有效
  31. #define Dlev_DOWN  DlevMotor_P=1;DlevMotor_N=0  //低電平有效
  32. #define Dlev_STOP  DlevMotor_P=1;DlevMotor_N=1  //低電平有效

  34. #define OPEN  1  
  35. #define CLOSE 0
  36. #define DOOR_Open  DOOR=OPEN
  37. #define DOOR_Close DOOR=CLOSE


  40. typedef struct
  41. {
  42.         u8 DlevRunning;
  43.   u8 CurrentFloor;
  44.         u8 Direction;
  45.         u8 FloorCallTable[MaxFloor+1];//數組[0]不用，從[1]開始使用
  46.         u8 FloorTimerCount;        
  47.         u8 ArriveFlag;      //到達樓層信號(用于停止或在前一樓層提前加減速)(此版本是定時器模擬，用不到)
  48.         u8 FreeFlag;        
  49. }TYPEDEF_DLEVSTATE;
  50. TYPEDEF_DLEVSTATE DlevState;


  53. u8 code SEG_NUM[]={0x3f,0x06,0x5b,0x4f,0x66,0x6D,0x7D,0x07,0x7f,0x6f};   //SEG數碼管段碼  0~9
  54. u8 Timer_Second;
  55. u16 TimerCount;
  56. u8 RICount=0;
  57. u8 RIOver_Flag=0;
  58. u8 ExternKey[2]={0}; //外部按鍵按下信息
  59. u8 FloorCallTableBUFF[MaxFloor+10]={0};
  60. u8 KeyPressFlag=0;

  62. void delay_ms(u16 xms);
  63. void delay_s(u8 xs);
  64. void EXTI0_Init(void);
  65. void Timer0_Init(void);
  66. void USART_Configure(u16 BaudRate);
  67. u8 KeyScan(void);
  68. void KeyDatHandle(u8 key);
  69. void WaitDoorOpen(u8 ts);
  70. void WaitDoorClose(u8 ts);
  71. void SEG_Display(u8 segnum);
  72. void DlevWorkState(u8 state);
  73. void Elevator(void);
  74. u8 FloorCall_UP(u8 floorside);
  75. u8 FloorCall_DOWN(u8 floorside);
  76. void FLOORCALLCHECK(void);
  77. void SYSYEM_INIT(void);


  80. void main(void)
  81. {
  82.         SYSYEM_INIT();
  83.         EXTI0_Init();
  84.         EXTI1_Init();
  85.         Timer0_Init();
  86.         USART_Configure(9600);
  87.   while(1)
  88.         {
  89.                  KeyPort_Y=0x00;
  90.                  FLOORCALLCHECK();
  91.            Elevator();   
  92.         }
  93. }

  95. void EXTI1_IRQHandler(void) interrupt 2    //矩陣按鍵中斷
  96. {
  97.    KeyDatHandle(KeyScan());
  98. }

  100. void TIM0_IRQHandler(void)  interrupt 1    //定時模擬電梯上升和下降
  101. {
  102.    TH0=(65536-50000)/256;
  103.          TL0=(65536-50000)%256;
  104.         
  105.          TimerCount++;
  106.          if(TimerCount==20)  //1秒
  107.          {
  108.                  TimerCount=0;
  109.                  Timer_Second++;
  110.          }         
  111.          DlevState.FloorTimerCount++;
  112. }
復制代碼
0.png 0.png

全部資料51hei下載地址：
8層電梯(雙版本).zip (250.59 KB, 下載次數: 236)


評分

參與人數 2黑幣 +62 收起 理由
找人PK + 12
admin + 50 共享資料的黑幣獎勵！

查看全部評分

回復

使用道具 舉報

ID:149783 發表于 2018-7-7 17:32 | 顯示全部樓層
謝謝你的分享，下載，下來慢慢學習。
回復

使用道具 舉報

ID:437186 發表于 2018-12-13 20:55 | 顯示全部樓層
想好好看下  學習哈
回復

使用道具 舉報

ID:437186 發表于 2018-12-15 21:15 | 顯示全部樓層
打不開怎么回事啊
回復

使用道具 舉報

ID:142059 發表于 2019-1-16 02:54 來自觸屏版 | 顯示全部樓層
老王頭8 發表于 2018-12-15 21:15
打不開怎么回事啊

你的keil版本太低，安裝keil5
回復

使用道具 舉報

ID:471889 發表于 2019-2-4 06:16 | 顯示全部樓層
不錯,學習了
回復

使用道具 舉報

ID:479667 發表于 2019-2-24 11:20 | 顯示全部樓層
proteus為什么打不開
回復

使用道具 舉報

ID:142059 發表于 2019-3-1 21:40 來自觸屏版 | 顯示全部樓層
dpo 發表于 2019-2-24 11:20
proteus為什么打不開

需要proteus8.6及以上版本
回復

使用道具 舉報

ID:273674 發表于 2019-3-18 14:12 | 顯示全部樓層
LZ我想問下 如果是2部電梯的話 該怎么弄呢
回復

使用道具 舉報

ID:142059 發表于 2019-3-18 21:43 | 顯示全部樓層
李海林 發表于 2019-3-18 14:12
LZ我想問下 如果是2部電梯的話 該怎么弄呢

需要通過通訊來達到協調或者獨立運行
回復

使用道具 舉報

ID:475808 發表于 2019-3-19 08:41 | 顯示全部樓層
很棒!收藏了!
回復

使用道具 舉報

ID:657980 發表于 2019-12-10 19:01 | 顯示全部樓層
有問題想請教，可以私聊嗎
回復

使用道具 舉報

ID:787940 發表于 2020-6-23 18:55 | 顯示全部樓層
大佬 你這個仿真的時候，數碼管不起作用？我按下7樓，數碼管顯示一直不變。。
回復

使用道具 舉報

ID:788184 發表于 2020-6-23 22:08 | 顯示全部樓層
感謝分享，學習了
回復

使用道具 舉報

ID:301242 發表于 2021-5-23 16:24 | 顯示全部樓層
請問樓主，傳感器是用什么類型的呢？比如是壓力？還是光電？c語言編寫控制都一樣的嗎？
回復

使用道具 舉報

ID:142059 發表于 2021-5-27 15:34 | 顯示全部樓層
易木殘陽 發表于 2021-5-23 16:24
請問樓主，傳感器是用什么類型的呢？比如是壓力？還是光電？c語言編寫控制都一樣的嗎？

傳感器光電開關效果最好，都一樣的
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表