wait until clk=0,q2<=d,-利用clk下降沿传递信号 end process 带异步清零,ck上升沿时寄存d process(clk, clr) be if clr'I' then q3<=0 elsif clk'event and clk=I then q3<=d end if 带异步清零,clk下降沿时寄存d process(clk, clr if clr'I'then q4<=0 elsif clk'event and clk=o' then q4<=d end if end 带异步预置高电平功能,clk上升沿时寄存d process(clk, pre) if pre='l then q5 elsif clk'event and clk=lthen q5<=d end process 带异步预置数功能,clk上升沿时寄存d process(clk, load, data) if load=l'then g6<=data elsif clk'event and clk=I' then q6<=d; end process, 带异步预置高电平和清零功能,clk上升沿时寄存d process(clk, clr, pre)begin wait until clk='0'; q2<=d; --利用 clk 下降沿传递信号； end process; -- 带异步清零，clk 上升沿时寄存 d process(clk,clr) begin if clr='1' then q3<='0'; elsif clk'event and clk='1' then q3<=d; end if; end process; -- 带异步清零，clk 下降沿时寄存 d process(clk,clr) begin if clr='1' then q4<='0'; elsif clk'event and clk='0' then q4<=d; end if; end process; --带异步预置高电平功能，clk 上升沿时寄存 d process(clk,pre) begin if pre='1' then q5<='1'; elsif clk'event and clk='1' then q5<=d; end if; end process; -- 带异步预置数功能，clk 上升沿时寄存 d process(clk,load,data) begin if load='1' then q6<=data; elsif clk'event and clk='1' then q6<=d; end if; end process; -- 带异步预置高电平和清零功能，clk 上升沿时寄存 d process(clk,clr,pre) begin