4xuan1.tdf

实现QAM调制功能和QAM解调功能的代码.

SUBDESIGN 4xuan1
(
    m[3..0]:input;
    n0[3..0]:output;
    n1[3..0]:output;
    n2[3..0]:output; 
    n3[3..0]:output;
)
begin
if(m[3..0]==B"0000")then
   n0[]=m[];
   n1[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0001")then
   n0[]=m[];
   n1[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0010")then
   n0[]=m[];
   n1[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0011")then
   n0[]=m[];
   n1[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0100")then
   n1[]=m[];
   n0[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0101")then
   n1[]=m[];
   n0[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0110")then
   n1[]=m[];
   n0[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"0111")then
   n1[]=m[];
   n0[]=B"0000";
   n2[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"1000")then
   n2[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"1001")then
   n2[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"1010")then
   n2[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"1011")then
   n2[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n3[]=B"0000";
elsif(m[3..0]==B"1100")then
   n3[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n2[]=B"0000";
elsif(m[3..0]==B"1101")then
   n3[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n2[]=B"0000";
elsif(m[3..0]==B"1110")then
   n3[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n2[]=B"0000";
else
   n3[]=m[];
   n0[]=B"0000";
   n1[]=B"0000";
   n2[]=B"0000";
end if;
end;