xianshi.tdf

EDA条件下乘法器的实现。AHDL语言实现输入显示乘法等功能

constant zero=b"0";
constant one=b"1";
subdesign  trans
(a[4..1],b[4..1],si:input;
ga[7..1],gb[7..1],gc[7..1]:output;)
variable
ja[4..1],jb[4..1]:node;
begin
for i in 1 to 4 generate
ja[i]=a[i]&one;
jb[i]=b[i]&one;
end generate;
table
ja[]=>!ga[];
h"0"=>b"0111111";
h"1"=>b"0000110";
h"2"=>b"1011011";
h"3"=>b"1001111";
h"4"=>b"1100110";
h"5"=>b"1101101";
h"6"=>b"1111101";
h"7"=>b"0000111";
h"8"=>b"1111111";
h"9"=>b"1100111";
h"A"=>b"1100111";
h"B"=>b"1111100";
h"C"=>b"0111001";
h"D"=>b"1011110";
h"E"=>b"1111001";
h"F"=>b"1110001";
end table;
table
jb[]=>!gb[];
h"0"=>b"0111111";
h"1"=>b"0000110";
h"2"=>b"1011011";
h"3"=>b"1001111";
h"4"=>b"1100110";
h"5"=>b"1101101";
h"6"=>b"1111101";
h"7"=>b"0000111";
h"8"=>b"1111111";
h"9"=>b"1100111";
h"A"=>b"1110111";
h"B"=>b"1111100";
h"C"=>b"0111001";
h"D"=>b"1011110";
h"E"=>b"1111001";
h"F"=>b"1110001";
end table;
table
jb[]=>!gb[];
h"0"=>b"0111111";
h"1"=>b"0000110";
h"2"=>b"1011011";
h"3"=>b"1001111";
h"4"=>b"1100110";
h"5"=>b"1101101";
h"6"=>b"1111101";
h"7"=>b"0000111";
h"8"=>b"1111111";
h"9"=>b"1100111";
h"A"=>b"1110111";
h"B"=>b"1111100";
h"C"=>b"0111001";
h"D"=>b"1011110";
h"E"=>b"1111001";
h"F"=>b"1110001";end table;
if jb[]==h"0" then
gc[]=b"1111111";
 case si  is
     when b"0" =>
         gb[]=b"1111111";
     when b"1"=>
          gb[]=b"0111111";
 end case;
else
  case si  is
     when b"0" =>
         gc[]=b"1111111";
     when b"1"=>
          gc[]=b"0111111";
end case;
end if;
end;