【正文】 。 end process。 end case。 找零口關(guān)閉 state=initialize_state。計算剩余應(yīng)找零金額 else change_gate=39。139。 找零完成，回到初始狀態(tài) end if。 出票口打開 if(change00000000) then 判斷是否還有找零 state=change_state。 計算輸出車票 ticket_gate=39。 end if。 elsif(number=10) then change:=total_insertpriceprice。 記錄 投入錢幣金額達(dá)到總票價 end if。 if(total_insert=total_price) then 判斷投入總金額是否已達(dá)到票價總額 temp:=39。 錢幣“暫存桿”將錢幣推入售票機(jī)內(nèi)，表示接受投幣 state=ticket_state。139。 回到初始狀態(tài) end if。139。 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 25 頁 共 23 頁 end case。 5角硬幣 when 10= total_insert:=total_insert+00001010。 end case。 5元紙幣 when 1000= total_insert:=total_insert+01100100。 重新計算投幣總額 when 0010= total_insert:=total_insert+00010100。 回到初始狀態(tài) end if。139。 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 24 頁 共 23 頁 end if。) then 按下“開始投幣”按鈕 state=insert_state。)) then 表示已選擇出站口且已選擇購票張數(shù) if(insert_start=39。)and(account_temp=39。 if((type_temp=39。 end case。139。 total_price:=price。 when 01= 選擇 1張票 temp_account:=00001。 account_temp:=39。 number:=10。139。 購票張數(shù)為 3 total_price:=price+price+price。)) then 表示已選擇出站口但尚未選擇購票張數(shù) case ticket_account is when 11= 選擇 3張票 temp_account:=00100。)and(type_temp=39。 if((account_temp=39。 記錄已選擇出站口 end if。 表示 4元票 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 23 頁 共 23 頁 type_temp:=39。 記錄已選擇出站口 elsif((ticket_stop=1001)and(ticket_stop=1111))then 乘坐站數(shù)超過 8站 price:=00101000。 表示 2元票 type_temp:=39。) then 表示尚未選擇出站口 if((ticket_stop=0001)and(ticket_stop=1000))then 乘坐站數(shù)不超過 8站 由于整個系統(tǒng)中涉及的最小金額為 5 角，為表示方便，有關(guān)金額的量統(tǒng)一以“角”為單位 即 5角為“ 5”， 1元為“ 10”， 2元為“ 20”， 5元為“ 50”， 10元為“ 100” price:=00010100。 when select_state= 選擇狀態(tài) if(type_temp=39。 系統(tǒng)進(jìn)入選擇狀態(tài) end if。039。139。 投入達(dá)到總票價記錄清零 else 表示系統(tǒng)已經(jīng)過初始化 money_gate=01。039。139。 投入錢幣總額記錄清零 change:=00000000。 購票張數(shù)記錄清零 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 22 頁 共 23 頁 total_price:=00000000。 price:=00000000。 account_temp:=39。 票數(shù)記錄清零 type_temp:=39。 找零口關(guān)閉 temp_type:=00000。 出票口關(guān)閉 change_gate=39。 購票記錄清零 ticket_gate=39。) then 表示系統(tǒng)未經(jīng)過初始化 money_gate=00。) then 時鐘信號上升沿觸發(fā) case state is when initialize_state= 初始狀態(tài) if(sign=39。event and clk=39。 記錄系統(tǒng)是否已經(jīng)過初始化的變量 variable temp :std_logic。 記錄投入錢幣總額的變量 variable change :std_logic_vector(7 downto 0)。 記錄票數(shù)的變量 variable total_price :std_logic_vector(7 downto 0)。 記錄票數(shù)的中間變量 variable price :std_logic_vector(7 downto 0)。 記錄是否已選擇購票張數(shù)的變量 variable temp_type :std_logic_vector(4 downto 0)。 狀態(tài)信號申明 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 21 頁 共 23 頁 begin process(clk) variable type_temp :std_logic。 architecture behave of subway is type state_type is (initialize_state,select_state,insert_state,ticket_state,change_state)。 出票口 change_gate :out std_logic 找零口 )。 錢幣“暫存桿” ticket_out :out std_logic_vector(4 downto 0)。 出站口編號 ticket_account :in std_logic_vector(1 downto 0)。 紙幣入口 cancel :in std_logic。 “開始投幣”按鈕 coin :in std_logic_vector(1 downto 0)。 系統(tǒng)時鐘 select_start :in std_logic。 use 。 袁俊 基于 VHDL 的模擬地鐵售票控制系統(tǒng)設(shè)計與 實(shí)現(xiàn) 第 19 頁 共 23 頁 參考文獻(xiàn) [1] 王雯雋 基于 VerilongHDL 自動售貨機(jī)的設(shè)計與實(shí)現(xiàn) [M]． 北京航空航天大學(xué)出版社 2020 年 5 月 [2]趙淑范 王憲偉 電子技術(shù)實(shí)驗與課程設(shè)計 第一版 [M]． 清華大學(xué)出版社 2020 年 8 月 [3] 陳光明 施金鴻 電子技術(shù)課程設(shè)計與綜合試訓(xùn) [M]． 第一版北京航空航天大學(xué)出版社 2020年 5 月 [4]賴義漢 自動售貨機(jī)控制系統(tǒng) VHDL 有限機(jī)狀態(tài)實(shí)現(xiàn)北京 [M]．