sel1.v

出租车计价器

module sel1(in1,in2,in3,in4,in5,in6,in7,in8,clk1,ms1,ms2,ms3,ms4,ms5,ms6,ms7,ms8,a,b,c,d,e,f,g,a1,b1,c1,d1,e1,f1,g1);
input clk1;
input[3:0]in1,in2,in3,in4,in5,in6,in7,in8;
output ms1,ms2,ms3,ms4,ms5,ms6,ms7,ms8,a,b,c,d,e,f,g,a1,b1,c1,d1,e1,f1,g1;
reg ms1,ms2,ms3,ms4,ms5,ms6,ms7,ms8,a,b,c,d,e,f,g,a1,b1,c1,d1,e1,f1,g1;
reg[3:0] temp,flag1;
always@(posedge clk1)
begin
{ms1,ms2,ms3,ms4,ms5,ms6,ms7,ms8}=8'b11111111;
flag1=flag1+1;
case(flag1)
  0:
    begin 
    temp=in1;
    ms1=0;  
    end
  1:
    begin 
    temp=in2;
    ms2=0;
    end
  2:
    begin 
    temp=in3;
    ms3=0; 
    end
  3:
    begin 
    temp=in4;
    ms4=0;
    end
  4:
    begin 
    temp=in5;
    ms5=0;
    end
  5:
    begin 
    temp=in6;
    ms6=0; 
    end
  6:
    begin 
    temp=in7;
    ms7=0;
    end
  7:
    begin 
    temp=in8;
    ms8=0;
    end
endcase
case(temp)
  4'd0:
       begin
       {a,b,c,d,e,f,g}=7'b1111110;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1111110;
       end
  4'd1:
       begin
       {a,b,c,d,e,f,g}=7'b0110000;
       {a1,b1,c1,d1,e1,f1,g1}=7'b0110000;
       end
  4'd2:
       begin
       {a,b,c,d,e,f,g}=7'b1101101;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1101101;
       end
  4'd3:
       begin
       {a,b,c,d,e,f,g}=7'b1111001;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1111001;
       end
  4'd4:
       begin
       {a,b,c,d,e,f,g}=7'b0110011;
       {a1,b1,c1,d1,e1,f1,g1}=7'b0110011;
       end
  4'd5:
       begin
       {a,b,c,d,e,f,g}=7'b1011011;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1011011;
       end
  4'd6:
       begin
       {a,b,c,d,e,f,g}=7'b1011111;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1011111;
       end
  4'd7:
       begin
       {a,b,c,d,e,f,g}=7'b1110000;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1110000;
       end
  4'd8:
       begin
       {a,b,c,d,e,f,g}=7'b1111111;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1111111;
       end
  4'd9:
       begin
       {a,b,c,d,e,f,g}=7'b1111011;
       {a1,b1,c1,d1,e1,f1,g1}=7'b1111011;
       end
  default:
          begin
          {a,b,c,d,e,f,g}=7'b1111110;
          {a1,b1,c1,d1,e1,f1,g1}=7'b1111110;
          end
endcase
end
endmodule