taxicost

elsif(dynaticScan_clk'event and dynaticScan_clk='1')then
cnt_temp<=cnt_temp+1;
if(cnt_temp="0111")then
cnt_temp<="001";
end if;
end if;
display_data_temp<=totalcost(11 downto 8);
dot<='1';
----
when"100"=>
display_select<="00001000";
display_data_temp<=totalcost(15 downto 12);
begin
process(cnt100_carry,reset)
variable mm:std_logic_vector(11 downto 0);
begin
if reset='1'then
mm:="000000000000";
elsif cnt100_carry'event and cnt100_carry='1'then
use ieee.std_logic_arith.all;
entity taxicost is
port(
clk:in std_logic;
dynaticScan_clk:in std_logic;
reset:in std_logic;
--------------
--------------
when"1101"=>display_data<="0111101";
signal totalcost:std_logic_vector(15 downto 0);--the total cost;
--
begin
------------------
block_cnt100:block
signal cnt_temp:std_logic_vector(1 downto 0);
end process;
---------------
process(cnt_temp)--decode the cnt signal to genearte the select signal
begin
--********************************
--||||||||||||||||
mm:=mm+"01100000";
end if;
if mm(11)='1'and(not(mm(10 downto 9)="00"))then
mm:=mm+"011000000000";
end if;
end if;
totalcost<=mm;
display_select<="00000000";
display_data_temp<="0000";
dot<='0';
----
when"001"=>
display_select<="00000001";
display_data_temp<=totalcost(3 downto 0);
if mm(3 downto 0)="1001"then
mm:=mm+7;
else
mm:=mm+1;
end if;
if mm(7 downto 4)="1010"then
mm:=mm+"01100000";
end if;
end if;
distance<=mm;
dot<='0';
----
end case;
end process;
---------------
process(display_data_temp)
begin
case display_data_temp is
when"0000"=>display_data<="1111110";
dot<='0';
----
when"010"=>
display_select<="00000010";
display_data_temp<=totalcost(7 downto 4);
dot<='0';
----
when"011"=>
display_select<="00000100";
when"0001"=>display_data<="0110000";
when"0010"=>display_data<="1101101";
when"0011"=>display_data<="1111001";
when"0100"=>display_data<="0110011";
--||||||||||||||||
--********************************
--7 6 5 4 3 2 1 0
--setparameter(7),distance(6,5,4),cost(3,2,1,0)
case cnt_temp is
when"000"=>
cnt_temp<=cnt_temp+1;
end if;
cnt100_carry<=cnt_temp(1)and cnt_temp(0);
end if;
end process;
end block;
------------------
block_cnt_distance:block--this block will cnt the distant and change hex distance todec distance
start_stop:in std_logic;
pause:in std_logic;
--------------
display_data:out std_logic_vector(6 downto 0);
dot:out std_logic;
display_select:out std_logic_vector(7 downto 0)
dot<='0';
----
when"101"=>
display_select<="00010000";
display_data_temp<=distance(3 downto 0);
dot<='0';
----
when"110"=>
display_select<="00100000";
end if;
mm:=mm+money;
if mm(3)='1'and(not(mm(2 downto 1)="00"))then
mm:=mm+6;
end if;
mm:=mm+"0000000000010000";
end if;
if mm(7)='1'and(not(mm(6 downto 5)="00"))then
end process;
end block;
------------------
block_display:block
signal cnt_temp:std_logic_vector(2 downto 0);
signal display_data_temp:std_logic_vector(3 downto 0);
1.能实现计费功能，计费标准为：
按行驶里程收费，起步费为5.00 元，并在车行3 公里后再按1.2 元/公里，当计
费器计费达到或超过一定收费 (里程为20 公里 )时，每公里加收50%的车费，车停止
不计费。
2.设计动态扫描电路：
将车费显示出来，有两位小数。
3.用VHDL 语言设计符合上述功能要求的出租车计费器，并用层次化设计方法设计
elsif cnt100_carry'event and cnt100_carry='1'then
if en='1'then
mm:=mm+money;
if mm(3)='1'and(not(mm(2 downto 1)="00"))tcess(cnt100_carry,reset,start_stop)