【正文】 d if。 end process。 該程序主要包含有一個(gè)計(jì)數(shù)器模塊和一個(gè)譯碼輸出模塊，該程序是通過(guò)計(jì)數(shù)器模塊實(shí)現(xiàn)分頻的。 圖 外部接口圖 圖 波形仿真圖 控制模塊設(shè)計(jì)及仿真 系統(tǒng)的狀態(tài)流程圖如圖 。本系統(tǒng)由請(qǐng)求信號(hào)啟動(dòng)，運(yùn)行中每檢測(cè)到一個(gè)到達(dá)樓層信號(hào)，就將信號(hào)存儲(chǔ)器的請(qǐng)求信號(hào)和樓層狀態(tài)信號(hào)進(jìn)行比第 25 頁(yè) 共 41 頁(yè) 較，再參考原方向信號(hào)來(lái)決定是否停止，轉(zhuǎn)向等動(dòng)作。電梯內(nèi)設(shè)有乘客到達(dá)層數(shù)的停站請(qǐng)求開(kāi)關(guān) 。電梯運(yùn)行時(shí) ,樓內(nèi)外同時(shí)顯示電梯的運(yùn)行狀態(tài)和所在的樓層 。能記憶電梯外的所有請(qǐng)求信號(hào) ,按照電梯運(yùn)行規(guī)則次序響應(yīng) ,每個(gè)請(qǐng)求信號(hào)保留至執(zhí)行后消除 。電梯運(yùn)行規(guī)則 :電梯處于上升狀態(tài)時(shí) ,響應(yīng)上升請(qǐng)求的樓層大于電梯的所在層 。執(zhí)行完上升狀態(tài)時(shí) ,若更高層有下樓請(qǐng)求，接開(kāi)到下樓請(qǐng)求的最高層接客 ,然后進(jìn)入下降模式 。其 。 use 。 use 。 時(shí)鐘信號(hào) full,deng,quick,clr:in std_logic。電梯外人的上升請(qǐng)求信號(hào) c_d2,c_d3,c_d4,c_d5,c_d6 ,c_d7, c_d8, c_d9, c_d10:out std_logic。 電梯內(nèi)人請(qǐng)求信號(hào) g1,g2,g3,g4,g5,g6,g7,g8,g9,g10:in std_logic。電梯門控制信號(hào) led1:out std_logic_vector(6 downto 0)。 led_c_u:out std_logic_vector(9 downto 0)。電梯外人下降請(qǐng)求信號(hào)顯示 led_d:out std_logic_vector(9 downto 0)。 看門狗報(bào)警信號(hào) ud,alarm:out std_logic。 電機(jī)控制信號(hào)和電梯運(yùn)動(dòng) end dianti。電梯內(nèi)人請(qǐng)求信號(hào)寄存信號(hào) signal c_u11,c_u22,c_u33,c_u44,c_u55,c_u66,c_u77,c_u88,c_u99:std_logic:=‘ 0’ 。 電梯外人下降請(qǐng)求信號(hào)寄存信號(hào) signal q:integer range 0 to 1。 關(guān)門延時(shí)計(jì) 數(shù)器 signal q2:integer range 0 to 9。電梯內(nèi)外請(qǐng)求信號(hào)寄存器 signal opendoor:std_logic。 電梯運(yùn)動(dòng)方向信號(hào)寄存器 signal en_up,en_dw:std_logic。event and clk=39。then if clr=39。then q1=0。wahaha=39。 清除故障報(bào)警 elsif full=39。then alarm=39。q1=0。 else door=00。 elsif q=1 then q=0。039。139。139。q1=0。up=39。down=39。 開(kāi)門操作 elsif en_up=39。then 上升預(yù)操 if deng=39。then door =10。q2=q2+1。139。 提前關(guān)門 elsife q1=6 then door=00。139。139。q1=q1+1。door=00。 elsife en_dw=39。then 下降預(yù)操作 if deng=39。then door =10。q2=q2+1。139。 elsife q1=6 then door=00。039。139。q1=q1+1。door=00。 end if。139。led2=1111111。139。139。039。039。139。139。039。039。 elsif g2=39。then led1=0010010。 電梯到達(dá) 2 樓，數(shù)碼管顯示 2 if updown=39。then if d22=39。or c_u22=39。then d22=39。c_u22=39。opendoor=39。 有當(dāng)前層的請(qǐng)求，則電梯進(jìn)入開(kāi)門狀態(tài) elsif dd_cc0000000011then en_up=39。 opendoor=39。 有上升請(qǐng)求，則電梯進(jìn)入預(yù)備上升狀態(tài) elsif dd_cc0000000010then en_dw=39。 opendoor=39。 有下降請(qǐng)求，則電梯進(jìn)入預(yù)備下降狀態(tài) end if。139。139。039。039。139。139。039。139。039。 elsif g3=39。then led1=0000110。 電梯到達(dá) 3 樓，數(shù)碼管顯示 3 if updown=39。then if d33=39。or c_u33=39。then d33=39。c_u33=39。opendoor=39。 第 30 頁(yè) 共 41 頁(yè) elsif dd_cc0000000111then en_up=39。 opendoor=39。 elsif dd_cc0000000100then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g4=39。then led1=1001100。 電梯到達(dá) 4 樓，數(shù)碼管顯示 4 if updown=39。then if d44=39。or c_u44=39。then d44=39。c_u44=39。opendoor=39。 elsif dd_cc0000001111then en_up=39。 opendoor=39。 elsif dd_cc0000001000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g5=39。then led1=0100100。 電梯到達(dá) 5 樓，數(shù)碼管顯示 5 if updown=39。then if d55=39。or c_u55=39。then d55=39。c_u55=39。opendoor=39。 elsif dd_cc0000011111then en_up=39。 opendoor=39。 elsif dd_cc0000010000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 第 31 頁(yè) 共 41 頁(yè) elsif g6=39。then led1=0100000。 電梯到達(dá) 6 樓，數(shù)碼管顯示 6 if updown=39。then if d66=39。or c_u66=39。then d66=39。c_u66=39。opendoor=39。 elsif dd_cc0000111111then en_up=39。 opendoor=39。 elsif dd_cc0000100000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g7=39。then led1=0001111。 電梯到達(dá) 7 樓，數(shù)碼管顯示 7 if updown=39。then if d77=39。or c_u55=39。then d77=39。c_u77=39。opendoor=39。 elsif dd_cc0001111111then en_up=39。 opendoor=39。 elsif dd_cc0001000000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g8=39。then led1=0000000。 電梯到達(dá) 8 樓，數(shù)碼管顯示 8 if updown=39。then if d88=39。or c_u88=39。then d88=39。c_u88=39。opendoor=39。 elsif dd_cc0011111111then en_up=39。 opendoor=39。 elsif dd_cc0010000000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g9=39。then led1=0000100。 電梯到達(dá) 9 樓，數(shù)碼管顯示 9 if updown=39。then if d99=39。or c_u99=39。then d99=39。c_u99=39。opendoor=39。 elsif dd_cc0111111111then en_up=39。 opendoor=39。 elsif dd_cc0100000000then en_dw=39。 opendoor=39。 end if。139。139。039。039。139。139。039。139。039。 elsif g10=39。then led1=1111001。 電梯到達(dá) 10 樓，數(shù)碼管顯示 10 if d1010=39。or c_u1010=39。then d1010=39。c_d1010=39。opendoor=39。 elsif dd_cc1000000000then en_dw=39。 opendoor=39。 end if。039。039。 end if。alarm=39。 清除超載報(bào)警 if d1=39。then d11=d1。139。 elsif d3=39。then d33=d3。139。 elsif d5=39。then d55=d5。139。 elsif d7=39。then d77=d7。139。 elsif d9=39。then d99=d9。139。 end if。139。 對(duì)電梯外人上升請(qǐng)求信號(hào)進(jìn)行檢測(cè)和寄存 elsif c_u2=39。then c_u22=c_u2。139。 elsif c_u4=39。then c_u44=c_u4。139。 elsif c_u6=39。then c_u66=c_u6。139。 elsif c_u8=39。then c_u88=c_u8。139。 end if。139。 對(duì)電梯外人下降請(qǐng)求信號(hào)進(jìn)行檢測(cè)和寄存 elsif c_d3=39。then c_d33=c_d3。139。 elsif c_d5=39。then c_d55=c_d5。139。 elsif c_d7=39。then c_d77=c_d7。139。 elsif c_d9=39。then c_d99=c_d9。139。 end if。d99amp。d77d66amp。d44amp。d22amp。 電梯內(nèi)人請(qǐng)求信號(hào)并置 cc_u=39。amp。c_u88amp。c_u66c_u55amp。c_u33amp。c_u11。c_d99amp。c_d77amp。c_d55amp。c_d33amp。39。 電梯外人下降請(qǐng)求信號(hào)并置 dd_cc=dd or cc_u or cc_d 電梯內(nèi)、外人請(qǐng)求 信號(hào)進(jìn)行綜合 end if。 電梯運(yùn)行狀態(tài)顯示 led_d=dd。 電梯外人上升請(qǐng)求信號(hào)顯示 led_c_d=cc_d。 end process。 第 35 頁(yè) 共 41 頁(yè) c lk1f u l l2d e n g3q u i c k4c lr5k e y p r e s s e d6c _ u 17c _ u 28c _ u 39c _ u 410c _ u 511c _ u 612c _ u 713c _ u 814c _ u 915c _ d 216c _ d 317c _ d 418c _ d 519c _ d 620c _ d 721c _