【導讀】電梯作為垂直方向的交通工具，在高層建筑和公共場所已成為不可或缺的設備。術(shù)，自主品牌占市場的份額很少。隨著社會需求的變化，電梯朝著節(jié)能、環(huán)保及智能化方。產(chǎn)品能合二為一，它代表了電子技術(shù)和應用技術(shù)的發(fā)展方向。VHDL主要用于描述數(shù)字系。統(tǒng)的接口，結(jié)構(gòu)和功能，它的語法簡單易懂，移植性好。本設計采用VHDL，源程序Altera公司的QuartusII軟件仿真。運用有限狀態(tài)機的設。在主進程中定義了7個狀態(tài)，分別是“stopon1”“dooropen”“doorclose”“doorwait4”。信號燈控制進程中，信號燈存儲按鍵請求情況，它的熄滅是由狀態(tài)機進程中傳出的信

　　

【正文】 end if。 elsif position=2 then if stoplight=000000 and fuplight=000000 and fdnlight=000000 then udsig=39。139。mylift=doorclose。 elsif stoplight(1)=39。139。 or fuplight(1)=39。139。 then udsig=39。139。mylift=down。 else udsig=39。039。 mylift=up。 end if。 elsif position=3 then if stoplight=000000 and fuplight=000000 and fdnlight=000000 then udsig=39。139。mylift=doorclose。 elsif stoplight(1)=39。139。 or stoplight(2)=39。139。 or fuplight(1)=39。139。 or fuplight(2)=39。139。 then udsig=39。139。mylift=down。 else udsig=39。039。 mylift=up。 end if。 elsif position=4 then if stoplight=000000 and fuplight=000000 and fdnlight=000000 then udsig=39。139。mylift=doorclose。 elsif stoplight(1)=39。139。 or stoplight(2)=39。139。 or stoplight(3)=39。139。 or fuplight(1)=39。139。 or fuplight(2)=39。139。 or fuplight(3)=39。139。 then udsig=39。139。mylift=down。 else udsig=39。039。 mylift=up。 太原科技大學華科學院畢業(yè)設計 (論文 ) 38 end if。 elsif position=5 then if stoplight=000000 and fuplight=000000 and fdnlight=000000 then udsig=39。139。mylift=doorclose。 elsif stoplight(1)=39。139。 or stoplight(2)=39。139。 or stoplight(3)=39。139。 or stoplight(4)=39。139。 or fuplight(1)=39。139。 or fuplight(2)=39。139。 or fuplight(3)=39。139。 or fuplight(4)=39。139。 then udsig=39。139。mylift=down。 else udsig=39。039。 mylift=up。 end if。 elsif position=6 then if stoplight=000000 and fuplight=000000 and fdnlight=000000 then udsig=39。139。mylift=doorclose。 else udsig=39。139。 mylift=down。 end if。 end if。 end if。 when up = position=position+1。pos:=pos+1。 if position 6 and( stoplight(pos)=39。139。 or fuplight(pos)=39。139。) then mylift=stop。 elsif pos=6 and (stoplight(pos)=39。139。 or fdnlight(pos)=39。139。) then mylift=stop。 else mylift=doorclose。 end if。 when down = position=position1。 pos:=pos1。 if position1 and (stoplight(pos)=39。139。 or fdnlight(pos)=39。139。) 太原科技大學華科學院畢業(yè)設計 (論文 ) 39 then mylift=stop。 elsif pos=1 and (stoplight(pos)=39。139。 or fuplight(pos)=39。139。) then mylift=stop。 else mylift=doorclose。 end if。 when stop = mylift=dooropen。 when dooropen = doorlight=39。139。 if udsig=39。039。 then if position6 and (stoplight(position)=39。139。 or fuplight(position)=39。139。) then clearup=39。139。 else clearup=39。139。cleardn=39。139。 end if。 elsif udsig=39。139。 then if position1 and (stoplight(position)= 39。139。 or fdnlight(position)=39。139。) then cleardn=39。139。 else clearup=39。139。cleardn=39。139。 end if。 end if。 mylift=doorwait1。 end case。 end if。 end if。 end process controllift。 controllight:process(reset,buttonclk) begin if reset=39。139。 then stoplight=000000。 fuplight=000000。fdnlight=000000。 elsif buttonclk39。event and buttonclk=39。139。 then 太原科技大學華科學院畢業(yè)設計 (論文 ) 40 if clearup=39。139。 then stoplight(position)=39。039。fuplight(position)=39。039。 elsif f1upbutton=39。139。 then fuplight(1)=39。139。 elsif f2upbutton=39。139。 then fuplight(2)=39。139。 elsif f3upbutton=39。139。 then fuplight(3)=39。139。 elsif f4upbutton=39。139。 then fuplight(4)=39。139。 elsif f5upbutton=39。139。 then fuplight(5)=39。139。 end if。 if cleardn=39。139。 then stoplight(position)=39。039。 fdnlight(position)=39。039。 elsif f2dnbutton=39。139。 then fdnlight(2)=39。139。 elsif f3dnbutton=39。139。 then fdnlight(3)=39。139。 elsif f4dnbutton=39。139。 then fdnlight(4)=39。139。 elsif f5dnbutton=39。139。 then fdnlight(5)=39。139。 elsif f6dnbutton=39。139。 then fdnlight(6)=39。139。 end if。