怎么用vhdl写一个模10的bcd码的减法记数器啊？

怎么用vhdl写一个模10的bcd码的减法记数器啊？

process(clk)<br>
if(clk'event and clk = '1') then<br>
&nbsp; &nbsp;if(en = '1') then<br>
&nbsp; &nbsp;&nbsp;&nbsp;if(q="0000") then<br>
&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;q&lt;="1001";<br>
&nbsp; &nbsp;&nbsp;&nbsp;else<br>
&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;q&lt;=q-1;<br>
&nbsp; &nbsp; end if;<br>
&nbsp;&nbsp;end if;<br>
end if;<br>
<br>
自己在后面接一个7段译码器即可以送到LED显示了

7段译码器的函数<br>
function[7:0] bcd;<br>
&nbsp; &nbsp;input[3:0] bicode;<br>
&nbsp; &nbsp;reg[6:0] out;<br>
<br>
case(bicode)<br>
4'd0
       
ut=7'b0111111;<br>
4'd1
       
ut=7'b0000110;<br>
4'd2
       
ut=7'b1011011;<br>
4'd3ut=7'b1001111;<br>
4'd4ut=7'b1100110;<br>
4'd5ut=7'b1101101;<br>
4'd6ut=7'b1111101;<br>
4'd7ut=7'b0000111;&nbsp;&nbsp;<br>
4'd8ut=7'b1111111;<br>
4'd9ut=7'b1101111;<br>
default: out=7'bx;<br>
endcase<br>
<br>
endfunction

自己在后面接一个7段译码器即可以送到LED显示了