ТЕМА: Очень много элементов при сравнении шин..

module oct_counter #(parameter WIDTH=16)(
	input wire clk,
	input wire clk8,
	input wire reset,
	input wire wr,
	input wire [WIDTH-1:0] data,
	output reg cnt_out);


wire [WIDTH-1:0] compare;
reg [WIDTH-1:0] reload;
reg [WIDTH-1:0] cnt;

always @(posedge wr or posedge reset)
begin
	if(reset)
		reload <= 0;
	else 
		reload <= data;
end

always @(posedge clk8 or posedge reset)
begin
	if(reset)
		begin
			cnt <= 0;
		end
	else
		begin
			if(cnt == 0)
				begin
					cnt <= reload;
				end
			else
				begin
					cnt <= cnt - 1'b1;
				end
		end
end

assign compare = {1'b0, reload[WIDTH-1:1]};

always @(posedge clk or posedge reset)
begin
	if(reset)
		cnt_out <= 1'b0;
	else
	begin
		if(cnt > compare)
			cnt_out <= 1'b1;
		else
			cnt_out <= 1'b0;
	end
end

endmodule