module Top(
input ST,
input CLR,
input clk_25M,
output [3:0] AN,
output [7:0] SEG
);
reg[15:0] Data;
reg[3:0] Data_Show;
wire[1:0] BIT_SEL;
reg Increment;
integer clk_num=0;
delay_2ms uu1(clk_25M,BIT_SEL);
initial begin Data <=16'b0; Increment = 1'b0;end
always@(posedge clk_25M)begin
if(clk_num<5000000) begin
clk_num = clk_num+1;
Increment =1'b0;
end
else begin
clk_num =0;
Increment =1'b1;
end
end
always@(posedge CLR or posedge Increment)if(CLR) begin
Data <=16'b0000000000000000;
end
elseif(ST) begin
if(Data[3:0]==4'b1001) begin
Data[3:0]<=4'b0000;if(Data[7:4]==4'b1001) begin
Data[7:4]<=4'b0000;if(Data[11:8]==4'b1001)begin
Data[11:8]<=4'b0000;if(Data[15:12]==4'b1001)
Data