【正文】 always@(posedge clk or negedge rst) if(~rst) led_drv=839。hff。 else case(disp) //p g f e d c b a 439。h0:led_drv = 839。b0_0_1_1_1_1_1_1 。 439。h1:led_drv = 839。b0_0_0_0_0_1_1_0 。 439。h2:led_drv = 839。b0_1_0_1_1_0_1_1 。 439。h3:led_drv = 839。b0_1_0_0_1_1_1_1 。 439。h4:led_drv = 839。b0_1_1_0_0_1_1_0 。 439。h5:led_drv = 839。b0_1_1_0_1_1_0_1 。 439。h6:led_drv = 839。b0_1_1_1_1_1_0_1 。 439。h7:led_drv = 839。b0_0_0_0_0_1_1_1 。 439。h8:led_drv = 839。b0_1_1_1_1_1_1_1 。 439。h9:led_drv = 839。b0_1_1_0_1_1_1_1 。 default: led_drv = 839。h00。 endcase endmodule//頂層塊//8. top modulemodule timer(key_in,clk,rst,led_drv,led_sel)。input[3:0] key_in。//key control,input clk。input rst。output[2:0]led_sel。output [7:0] led_drv。wire [3:0]key_in。wire clk。wire rst。//wire [3:0] key_out。//[3]hour [2]minute [1]second [0]idel/*******************/debounce_module U1_hour// debounce hour(.clk(clk),.rst(rst),.pin_in(key_in[3]),.pin_out(key_out[3]))。/*************/debounce_module U2_minute// debounce minute(.clk(clk),.rst(rst),.pin_in(key_in[2]),.pin_out(key_out[2]))。/****************/debounce_module U3_second// debounce second(.clk(clk),.rst(rst),.pin_in(key_in[1]),.pin_out(key_out[1]))。/*******************/debounce_module U4_idel// debounce idel(.clk(clk),.rst(rst),.pin_in(key_in[0]),.pin_out(key_out[0]))。/******************/// divisionwire time1hz。wire time50hz。wire enb1hz。clk_div clk_div(.clk(clk),.rst(rst), .time1hz(time1hz), .time50hz(time50hz), .enb1hz(enb1hz))。 // counter wire [2:0] sel。 scan_t scan_can(.time50hz(time50hz), .clk(clk),.rst(rst), .sel(sel),.led_sel(led_sel))。 // counterwire[1:0] hh。wire[3:0] hl。wire[2:0] mh。wire[3:0] ml。wire[2:0] sh。wire[3:0] sl。time_t time_t(.time1hz(time1hz),.hh(hh),.hl(hl),.mh(mh),.ml(ml),.sh(sh),.sl(sl))。// countercheck_t check_t(.key_out(key_out), .time1hz(time1hz),.clk(clk),.rst(rst), .hh(hh),.hl(hl),.mh(mh),.ml(ml),.sh(sh),.sl(sl))。// and selection controllerwire[7:0] disp。mux_trl mux_trl(.enb1hz(enb1hz),.sel(sel),.hh(hh),.hl(hl),.mh(mh),.ml(ml),.sh(sh),.sl(sl),.clk(clk),.rst(rst),.disp(disp))。// decoderdisp_dec disp_dec(.disp(disp),.clk(clk),.rst(rst))。//.led_drv(led_drv))。endmodule附錄B 仿真代碼//四按鍵封裝代碼//key_interfacemodule key_interface(key_in,key_out,clk,rst)。input[3:0] key_in。output[3:0]key_out。input clk。input rst。//[3]hour [2]minute [1]second [0]idel/*******************/debounce_module U1_hour// debounce hour(.clk(clk),.rst(rst),.pin_in(key_in[3]),.pin_out(key_out[3]))。/*************/debounce_module U2_minute// debounce minute(.clk(clk),.rst(rst),.pin_in(key_in[2]),.pin_out(key_out[2]))。/****************/debounce_module U3_second// debounce second(.clk(clk),.rst(rst),.pin_in(key_in[1]),.pin_out(key_out[1]))。/*******************/debounce_module U4_idel// debounce idel(.clk(clk),.rst(rst),.pin_in(key_in[0]),.pin_out(key_out[0]))。/******************/endmodule四按鍵仿真激勵//`timescale 1us/1usmodule key_interface_tb()。reg clk。reg rst。reg [3:0]key_in。wire [3:0]key_out。initialbegin rst=0。 80 rst=1。endinitialbegin clk=0。endalways 100 clk=~clk。initial repeat(100)begin key_in[3]=0。 10000 key_in[3]=1。 10000 key_in[3]=0。 10000 key_in[3]=1。endinitial repeat(100)begin key_in[2]=0。 10000 key_in[2]=1。 10000 key_in[2]=0。 10000 key_in[2]=1。endinitial repeat(100)begin key_in[1]=0。 10000 key_in[1]=1。 10000 key_in[1]=0。 10000 key_in[1]=1。endinitial repeat(100)begin key_in[0]=0。 10000 key_in[0]=1。 10000 key_in[0]=0。 10000 key_in[0]=1。Endinitial 100000000 $stop。 key_interface key_interface_tb(.key_in(key_in),.key_out(key_out),.clk(clk),.rst(rst))。endmodule//計時計數(shù)塊激勵//time_t`timescale 1us/1usmodule time_t_tb()。reg time1hz。reg clk。reg rst。wire[1:0] hh。wire[3:0] hl。wire[2:0] mh。wire[3:0] ml。wire[2:0] sh。wire[3:0] sl。initialbegin rst=0。 80 rst=1。endinitialbegin clk=0。endalways 100 clk=~clk。initialbegin time1hz=0。endalways 5000 time1hz=~time1hz。initial 1000000000 $stop。time_t time_t_tb(.time1hz(time1hz),.clk(clk),.rst(rst),.hh(hh),.hl(hl),.mh(mh),.ml(ml),.sh(sh),.sl(sl))。endmodule//頂層塊激勵//`timescale 1us/1usmodule timer_tb()。reg clk,rst。reg [3:0]key_in。wire[2:0] led_sel。wire[7:0] led_drv。parameter HALF_PERIOD=50。//produce 10kHZ signalinitialbeginclk=0。 forever HALF_PERIOD clk=~clk。end//produce system reset signalinitial beginrst=1。(2*HALF_PERIOD) rst=0。(10*HALF_PERIOD) rst=1。end//produce changing hour signalinitialrepeat(100) beginkey_in=1。(350*HALF_PERIOD)key_in=0。(600*HALF_PERIOD) key_in=1。 end //initial (350*600) $stop。timer timer(.adj_tr(adj_tr),.add_tr(add_tr),.led_drv(led_drv),.led_sel(led_sel),.clk(clk),.rst(rst))。endmodule41