數(shù)字電路(出租車計(jì)費(fèi)器)-文庫吧
2025-05-01 05:11 本頁面
【正文】 啟動(dòng)、停止、暫停、車速等狀態(tài)，將車費(fèi)顯示出來。有兩位小數(shù)。library ieee。use 。use 。entity charge is port( cp,ks,tz,zt: in std_logic。 dis,mon : out integer range 0 to 9999)。end charge。architecture ch of charge isbegin process(cp,ks,tz,zt) variable dis1,mon1:integer range 0 to 9999。 begin if(cp39。event and cp=39。139。) then if(tz=39。039。)then dis1:=0。mon1:=0。 elsif(ks=39。039。) then dis1:=0。mon1:=700。 elsif(ks=39。139。and tz=39。139。and zt=39。139。) then dis1:=dis1+10。 elsif(ks=39。139。and tz=39。139。and zt=39。039。) then dis1:=dis1。mon1:=mon1。 end if。 if(dis1300) then null。 elsif(dis1600 and dis1300) then mon1:=mon1+22。 elsif(dis1=600) then mon1:=mon1+33。 end if。 mon=mon1。dis=dis1。 end if。 end process。end ch。 Transform 實(shí)現(xiàn)將電路計(jì)數(shù)分高低位顯示，將二進(jìn)制轉(zhuǎn)化為數(shù)碼管可識(shí)別的十進(jìn)制library ieee。use 。use 。entity transform isport( daclk : std_logic。 dis,mon :integer range 0 to 9999。 dg,ds,db,dq,mg,ms,mb,mq: out std_logic_vector(3 downto 0))。end transform。architecture tran of transform isbegin process(daclk,dis)variable d :integer range 0 to 9999。variable d1,d2,d3,d4 :std_logic_vector(3 downto 0)。begin if(daclk39。event and daclk=39。139。) then if(ddis) then if(d1=9 and d2=9 and d3=9) then d1:=0000。d2:=0000。d3:=0000。 d4:=d4+1。d:=d+1。 elsif(d1=9 and d2=9) then d1:=0000。d2:=0000。d3:=d3+1。d:=d+1。 elsif(d1=9) then d1:=0000。d2:=d2+1。d:=d+1。 else d1:=d1+1。d:=d+1。 end if。 else d:=0。d1:=0000。d2:=0000。d3:=0000。d4:=0000。 end if。end if。dg=d1。ds=d2。db=d3。dq=d4。end process。process(daclk,mon)variable m :integer range 0 to 9999。variable m1,m2,m3,m4 :std_logic_vector(3 downto 0)。begin if(daclk39。event and daclk=39。139。) then if(mmon) then if(m1=9 and m2=9 and m3=9) then m1:=0000。m2:=0000。m3:
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1