怪事

[复制链接]
 楼主| vfdff 发表于 2007-6-4 01:00 | 显示全部楼层 |阅读模式
entity&nbsp;delay14&nbsp;is<br />&nbsp;&nbsp;&nbsp;&nbsp;port(<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;d&nbsp;&nbsp;&nbsp;&nbsp;:&nbsp;in&nbsp;std_logic;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;clk&nbsp;:&nbsp;in&nbsp;std_logic;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;q&nbsp;&nbsp;&nbsp;:&nbsp;out&nbsp;std_logic<br />&nbsp;&nbsp;&nbsp;&nbsp;);<br />end&nbsp;delay14;<br /><br />architecture&nbsp;vr2&nbsp;of&nbsp;delay14&nbsp;is<br />&nbsp;&nbsp;&nbsp;&nbsp;signal&nbsp;cn&nbsp;:&nbsp;std_logic_vector(10&nbsp;downto&nbsp;0)&nbsp;:=&nbsp;(others=&gt'0');<br />&nbsp;&nbsp;&nbsp;&nbsp;signal&nbsp;flag&nbsp;:&nbsp;std_logic;<br />begin<br />&nbsp;&nbsp;&nbsp;&nbsp;p1:process(clk)&nbsp;--&nbsp;process(clk,d)<br />&nbsp;&nbsp;&nbsp;&nbsp;begin<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if&nbsp;(clk'event&nbsp;and&nbsp;clk='1')then<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if(d='1'&nbsp;and&nbsp;cn=&quot;00000000000&quot;&nbsp;and&nbsp;flag='0')&nbsp;then<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;flag&nbsp;&lt=&nbsp;'1';&nbsp;--&nbsp;结束时,d='1'一直成立,故增加个标志<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;cn&nbsp;&lt=&nbsp;&quot;10000000000&quot;;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;elsif(cn&gt&quot;00000000000&quot;)then<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;cn&nbsp;&lt=&nbsp;cn-'1';<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;else<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;cn&nbsp;&lt=&quot;00000000000&quot;;&nbsp;flag&nbsp;&lt=&nbsp;'0';<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;end&nbsp;if;<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;end&nbsp;if;<br />&nbsp;&nbsp;&nbsp;&nbsp;end&nbsp;process&nbsp;p1;<br />&nbsp;&nbsp;&nbsp;&nbsp;q&nbsp;&lt='0'&nbsp;when&nbsp;cn=&quot;00000000000&quot;&nbsp;else&nbsp;'1';&nbsp;<br />&nbsp;&nbsp;&nbsp;&nbsp;<br />end&nbsp;vr2;<br />这个程序怎么 不能实现连续 1024 个高电平后再变低电平??
您需要登录后才可以回帖 登录 | 注册

本版积分规则

17

主题

48

帖子

1

粉丝
快速回复 在线客服 返回列表 返回顶部

17

主题

48

帖子

1

粉丝
快速回复 在线客服 返回列表 返回顶部