disp.tdf

veriloghdl 交通灯veriloghdl 交通灯veriloghdl 交通灯veriloghdl 交通灯veriloghdl 交通灯veriloghdl 交通灯veriloghdl 交通灯

 SUBDESIGN disp
(
 	inputclk[2..0]		: INPUT;
	maincol[1..0]		: INPUT;
	subcol[1..0]		: INPUT;
	clk					: INPUT;
	tringle				: INPUT;
	subtringle			: INPUT;
 	row[8..1]			: OUTPUT;
 	colred[16..1]		: OUTPUT;

 )
 BEGIN

IF maincol[1..0]==b"00" AND tringle==0
THEN TABLE
inputclk[2..0] 	=> row[8..1], colred[16..1];
H"0"			=> H"1",	H"FFFF";
H"1"			=> H"2",	H"FFF7";
H"2"			=> H"4",	H"FFFB";
H"3"			=> H"8",	H"FFFF";
H"4"			=> H"10",	H"FFBF";
H"5"			=> H"20",	H"FFDF";
H"6"			=> H"40",	H"FFFF";
H"7"			=> H"80",	H"FFFF";
END TABLE;

ELSIF maincol[1..0]==b"00" AND tringle==1
THEN IF clk
	 THEN TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFF7";
	H"2"			=> H"4",	H"FFFB";
	H"3"			=> H"8",	H"FFFF";
	H"4"			=> H"10",	H"FFBF";
	H"5"			=> H"20",	H"FFDF";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;

	else 
	TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFF7";
	H"2"			=> H"4",	H"FFFF";
	H"3"			=> H"8",	H"FFFF";
	H"4"			=> H"10",	H"FFFF";
	H"5"			=> H"20",	H"FFDF";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;
	END IF;

ELSIF maincol[1..0]==b"01" AND tringle==0
THEN TABLE
inputclk[2..0] 	=> row[8..1], colred[16..1];
H"0"			=> H"1",	H"FFFF";
H"1"			=> H"2",	H"FFF7";
H"2"			=> H"4",	H"FFFF";
H"3"			=> H"8",	H"FFBB";
H"4"			=> H"10",	H"FFFF";
H"5"			=> H"20",	H"FFDF";
H"6"			=> H"40",	H"FFFF";
H"7"			=> H"80",	H"FFFF";
END TABLE;

ELSIF subcol[1..0]==b"00" AND subtringle==0
THEN TABLE
inputclk[2..0] 	=> row[8..1], colred[16..1];
H"0"			=> H"1",	H"FFFF";
H"1"			=> H"2",	H"FFDF";
H"2"			=> H"4",	H"FFBF";
H"3"			=> H"8",	H"FFFF";
H"4"			=> H"10",	H"FFFB";
H"5"			=> H"20",	H"FFF7";
H"6"			=> H"40",	H"FFFF";
H"7"			=> H"80",	H"FFFF";
END TABLE;

ELSIF subcol[1..0]==b"00" AND subtringle==1
THEN IF clk
	 THEN TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFDF";
	H"2"			=> H"4",	H"FFBF";
	H"3"			=> H"8",	H"FFFF";
	H"4"			=> H"10",	H"FFFB";
	H"5"			=> H"20",	H"FFF7";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;

	else 
	TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFFF";
	H"2"			=> H"4",	H"FFBF";
	H"3"			=> H"8",	H"FFFF";
	H"4"			=> H"10",	H"FFFB";
	H"5"			=> H"20",	H"FFFF";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;
	END IF;

ELSIF subcol[1..0]==b"01" AND subtringle==0
THEN TABLE
inputclk[2..0] 	=> row[8..1], colred[16..1];
H"0"			=> H"1",	H"FFFF";
H"1"			=> H"2",	H"FFEF";
H"2"			=> H"4",	H"FFBF";
H"3"			=> H"8",	H"FFFF";
H"4"			=> H"10",	H"FFFB";
H"5"			=> H"20",	H"FFEF";
H"6"			=> H"40",	H"FFFF";
H"7"			=> H"80",	H"FFFF";
END TABLE;

ELSIF tringle==1 AND subtringle==1
THEN IF clk
	THEN TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFEF";
	H"2"			=> H"4",	H"FFFF";
	H"3"			=> H"8",	H"FFBB";
	H"4"			=> H"10",	H"FFFF";
	H"5"			=> H"20",	H"FFEF";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;

	ELSE
	TABLE
	inputclk[2..0] 	=> row[8..1], colred[16..1];
	H"0"			=> H"1",	H"FFFF";
	H"1"			=> H"2",	H"FFFF";
	H"2"			=> H"4",	H"FFFF";
	H"3"			=> H"8",	H"FFFF";
	H"4"			=> H"10",	H"FFFF";
	H"5"			=> H"20",	H"FFFF";
	H"6"			=> H"40",	H"FFFF";
	H"7"			=> H"80",	H"FFFF";
	END TABLE;
	END IF;

END IF;
END;