【正文】
n the Mains[J].Profeeional Education Tutouial workbook of IEEE Power Electronics Specialists Conference,2000,21(3):1823.[18] and efficient heuristic procedure for partitioning Graphs[J].Bell System Technical Journal,1970,49(2):291308. 致謝經(jīng)過兩個月在實驗室的刻苦研究,我終于完成了我的畢業(yè)論文。本文的順利完成離不開陳老師的悉心指導和語重心長的教育。我有幸?guī)煆年惱蠋?,使我不僅在科學知識上充實了自己,而且在將來生活中如何對待工作有了正確的榜樣。陳老師嚴謹?shù)闹螌W態(tài)度、寬廣的學術(shù)知識、敏銳的科學洞察力以及忘我的工作精神使我終身難忘,陳老師不僅教給了我許多科學知識,而且也教會了我如何去做科研工作,還潛移默化地告訴了我如何去工作,怎樣去做一個對社會有用的人。在陳老師身上,有太多的品質(zhì)讓我去學習,不僅現(xiàn)在是,將來也還是我的老師,在此,我要向陳老師致以最誠摯的敬意!感謝所有指導過我、幫助過我的老師和同學!附錄1 全自動電梯控制器源程序library ieee。use 。use 。use 。entity lift isport(clk,rst:in std_logic。時鐘信號、復位信號inner_f1,inner_f2,inner_f3,inner_f4,inner_f5,inner_f6,inner_f7,inner_f8:in std_logic。內(nèi)部請求信號outer_u1,outer_u2,outer_u3,outer_u4,outer_u5,outer_u6,outer_u7:in std_logic。外部上升請求信號outer_d2,outer_d3,outer_d4,outer_d5,outer_d6,outer_d7,outer_d8:in std_logic。外部下降請求信號f1,f2,f3,f4,f5,f6,f7,f8:in std_logic。最初樓層信號led7s:out std_logic_vector(6 downto 0)。樓層信號轉(zhuǎn)換成數(shù)碼管顯示up_req:buffer std_logic_vector(8 downto 1)。上升請求信號顯示down_req:buffer std_logic_vector(8 downto 1)。下降請求信號顯示delay:in std_logic。延時關(guān)門信號close:in std_logic。快速關(guān)門信號over:in std_logic。超載信號u_d:out std_logic。運行方向信號wahaha:out std_logic??撮T狗報警信號door:buffer std_logic_vector(1 downto 0)。門控信號alum:buffer std_logic。超載報警信號run:buffer std_logic)。運行信號end lift。architecture behav of lift issignal state:std_logic_vector(2 downto 0)。 state(2):1運行允許標志,0運行禁止標志;state(1):1上行任務標志,0下行任務標志;state(0);1正在上行標志,0正在下行標志;signal floor:std_logic_vector (8 downto 1)。signal current_floor:integer range 8 downto 1。樓層信號signal door_time:integer range 10 downto 0。開門計數(shù)信號signal inner_req:std_logic_vector(8 downto 1)。內(nèi)部請求信號顯示beginfloor=f8amp。f7amp。f6amp。f5amp。f4amp。f3amp。f2amp。f1。alum=over。請求信號記憶燈顯示模塊P1:block isbeginprocess(rst,clk)beginif(rst=39。139。)thenup_req=00000000。down_req=00000000。inner_req=00000000。elsif(clk39。event and clk=39。139。)thenif(outer_u7=39。139。)thenup_req(7)=39。139。當7樓有外部上升請求時,7樓的上升指示燈亮;elsif(current_floor=7 and run=39。039。)then up_req(7)=39。039。當電梯停在7樓時,7樓的上升請求信號燈滅;elsif(current_floor=7 and run=39。139。 and state(1 downto 0)=10 and down_req(6 downto 1)=000000)then up_req(7)=39。039。當電梯在7樓往下運行,電梯有上升的任務,6到1樓沒有下降請求,則7樓外部上升請求信號燈滅;end if。if(outer_u6=39。139。)thenup_req(6)=39。139。elsif(current_floor=6 and run=39。039。)then up_req(6)=39。039。elsif(current_floor=6 and run=39。139。 and state(1 downto 0)=10 and down_req(5 downto 1)=00000)then up_req(6)=39。039。end if。if(outer_u5=39。139。)thenup_req(5)=39。139。elsif(current_floor=5 and run=39。039。)then up_req(5)=39。039。elsif(current_floor=5 and run=39。139。 and state(1 downto 0)=10 and down_req(4 downto 1)=0000)then up_req(5)=39。039。end if。if(outer_u4=39。139。)thenup_req(4)=39。139。elsif(current_floor=4 and run=39。039。)then up_req(4)=39。039。elsif(current_floor=4 and run=39。139。 and state(1 downto 0)=10 and down_req(3 downto 1)=000)then up_req(4)=39。039。end if。if(outer_u3=39。139。)thenup_req(3)=39。139。elsif(current_floor=3 and run=39。039。)then up_req(3)=39。039。elsif(current_floor=3 and run=39。139。 and state(1 downto 0)=10 and down_req(2 downto 1)=00)then up_req(3)=39。039。end if。if(outer_u2=39。139。)thenup_req(2)=39。139。elsif(current_floor=2 and run=39。039。)then up_req(2)=39。039。elsif(current_floor=2 and run=39。139。 and state(1 downto 0)=10 and down_req(1)=39。039。)then up_req(2)=39。039。end if。if(outer_u1=39。139。)thenup_req(1)=39。139。elsif(current_floor=1 and run=39。039。)then up_req(1)=39。039。end if。if(outer_d8=39。139。)thendown_req(8)=39。139。8樓有下降請求,則8樓的下降請求信號燈亮;elsif(current_floor=8 and run=39。039。)then down_req(8)=39。039。end if。電梯停在8樓,則請求信號燈滅;if(outer_d7=39。139。)thendown_req(7)=39。139。elsif(current_floor=7 and run=39。039。)then down_req(7)=39。039。elsif(current_floor=7 and run=39。139。 and state(1 downto 0)=01 and down_req(8)=39。039。)then down_req(7)=39。039。電梯在7樓向上運行,有下降的任務,但8樓沒有下降請求,則7樓的下降請求信號燈滅;end if。if(outer_d6=39。139。)thendown_req(6)=39。139。elsif(current_floor=6 and run=39。039。)then down_req(6)=39。039。elsif(current_floor=6 and run=39。139。 and state(1 downto 0)=01 and down_req(8 downto 7)=00)then down_req(6)=39。039。end if。if(outer_d5=39。139。)thendown_req(5)=39。139。elsif(current_floor=5 and run=39。039。)then down_req(5)=39。039。elsif(current_floor=5 and run=39。139。 and state(1 downto 0)=01 and down_req(8 downto 6)=000)then down_req(5)=39。039。end if。if(outer_d4=39。139。)thendown_req(4)=39。139。elsif(current_floor=4 and run=39。039。)then down_req(4)=39。039。elsif(current_floor=4 and run=39。139。 and state(1 downto 0)=01 and down_req(8 downto 5)=0000)then down_req(4)=39。039。end if。if(outer_d3=39。139。)thendown_req(3)=39。139。elsif(current_floor=3 and run=39。039。)then down_req(3)=39。039。elsif(current_floor=3 and run=39。139。 and state(1 downto 0)=01 and down_req(8 downto 4)=00000)then down_req(3)=39。039。end if。if(outer_d2=39。139。)thendown_req(2)=39。139。elsif(current_floor=2 and run=39。039。)then down_req(2)=39。039。elsif(current_floor=2 and run=39。139。 and state(1 downto 0)=01 and down_req(8 downto 3)=000000)then down_req(2)=39。039。end if。if(inner_f1=39。139。)theninner_req(1)=39。139。1樓有內(nèi)部請求,則1樓的內(nèi)部請求信號燈亮;elsif(current_floor=1 and run=39。039。)then inner_req(1)=39。039。end if。電梯停在1樓,則1樓內(nèi)部請求信號燈滅;if(inner_f2=39。139。)theninner_req(2)=39。139。elsif(current_floor=2 and run=39。039。)then inner_req(2)=39。039。end if。if(inner_f3=39。139。)theninner_req(3)=39。139。elsif(current_floor=3 and run=39。039。)then inner_req(3)=39。039。end if。if(inner_f4=39。139。)then inner_req(4)=39。139。elsif(current_floor=4 and run=39。039。)then inner_req(4)=39。039。end if。if(inner_f5=39。139。)theninner_req(5)=39。139。elsif(current_floor=5 and run=39。039。)then inner_req(5)=39。039。end if。if(inner_f6=39。139。)theninner_req(6)=39。139。elsif(current_floor=6 and run=39。039。)then inner_req(6)=39。039。end