jtdtest022.v

在maxplusII平台上开发的一个交通等内核

module jtdtest022(clk,out1,i);
input clk;
output[7:0] out1;
output[2:0] i;
reg[7:0] out1;
reg[2:0] i;
reg[3:0] second;
reg[2:0] minute;
reg[3:0] secondh;
reg[2:0] minuteh;
reg[7:0] secondo;
reg[7:0] minuteo;
reg[7:0] secondho;
reg[7:0] minuteho;
reg[9:0] k;
reg[11:0] jtd;
reg[2:0] mainstr;
reg[2:0] secondstr;
always@(posedge clk)
begin
i=i+1;
k=k+1;
if(i==4)
	i=0;			             
if(k>980)
begin
	if(second==0)
		begin
			case(mainstr)
			0:begin second=10;end
			1:begin second=10;end
			2:begin second=5;end
			endcase
				if(minute==0)
					begin
						case(mainstr)
						0:begin second=10;minute=6;end
						1:begin second=5;minute=3;end
						2:begin second=6;minute=1;end
						3:begin mainstr=0;end
						endcase
						mainstr=mainstr+1;
					end
					minute=minute-1; 			
    	end
		second=second-1;
	if(secondh==0)
		begin
			case(secondstr)
			0:begin secondh=10;end
			1:begin secondh=5;end
			2:begin secondh=10;end
			endcase
				if(minuteh==0)
					begin
						case(secondstr)
						0:begin secondh=5;minute=6;end
						1:begin secondh=6;minute=1;end
						2:begin secondh=10;minute=3;end
						3:begin secondstr=0;end
						endcase
						secondstr=secondstr+1;
					end
 			minuteh=minuteh-1;
		end
		secondh=secondh-1;
	k=0;
end
case(second)
0:begin secondo=8'b00111111;end
1:begin secondo=8'b00000110;end
2:begin secondo=8'b01011011;end
3:begin secondo=8'b01001111;end
4:begin secondo=8'b01100110;end
5:begin secondo=8'b01101101;end
6:begin secondo=8'b01111101;end
7:begin secondo=8'b00000111;end
8:begin secondo=8'b01111111;end
9:begin secondo=8'b01101111;end
endcase
case(minute)
0:begin minuteo=8'b00111111;end
1:begin minuteo=8'b00000110;end
2:begin minuteo=8'b01011011;end
3:begin minuteo=8'b01001111;end
4:begin minuteo=8'b01100110;end
5:begin minuteo=8'b01101101;end
6:begin minuteo=8'b01111101;end
endcase
case(secondh)
0:begin secondho=8'b00111111;end
1:begin secondho=8'b00000110;end
2:begin secondho=8'b01011011;end
3:begin secondho=8'b01001111;end
4:begin secondho=8'b01100110;end
5:begin secondho=8'b01101101;end
6:begin secondho=8'b01111101;end
7:begin secondho=8'b00000111;end
8:begin secondho=8'b01111111;end
9:begin secondho=8'b01101111;end
endcase
case(minuteh)
0:begin minuteho=8'b00111111;end
1:begin minuteho=8'b00000110;end
2:begin minuteho=8'b01011011;end
3:begin minuteho=8'b01001111;end
4:begin minuteho=8'b01100110;end
5:begin minuteho=8'b01101101;end
6:begin minuteho=8'b01111101;end
endcase

case (i)
1:begin out1=minuteo;end
2:begin out1=secondo;end
3:begin out1=minuteho;end
4:begin out1=secondho;end		
endcase


end
endmodule