[问答]

请问有大神会把VHDL语言转成Verilog HDL语言吗？

2062 FPGA 图像车牌定位 Verilog

问答对人有帮助，内容完整，我也想知道答案 0 LIBRARY IEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENtiTY LOCK ISPORT(CLK,CLK5:INSTD_LOGIC; KEY1,KEY2,KEY3,KEY4,KEY5,KEY6,KEY7,KEY8:INSTD_LOGIC; Q1,Q2,Q3,Q4:OUT STD_LOGIC_VECTOR(3 DOWNTO0); LED_G,LED_R,LED,BEEP:OUT STD_LOGIC);END LOCK;ARCHITECTURE BEHAVOF LOCK IS SIGNAL PASSWORD1:STD_LOGIC_VECTOR(3 DOWNTO0):="0001"; SIGNAL PASSWORD2:STD_LOGIC_VECTOR(3 DOWNTO0):="0001"; SIGNAL PASSWORD3:STD_LOGIC_VECTOR(3 DOWNTO0):="0001"; SIGNAL PASSWORD4:STD_LOGIC_VECTOR(3 DOWNTO0):="0001"; SIGNAL JISHI5:STD_LOGIC_VECTOR(3 DOWNTO0):="0000"; SIGNAL JISHI20:STD_LOGIC_VECTOR(4 DOWNTO0):="00000"; SIGNALZISUO,FLAG,BEEP_FLAG,KAI,LED_TMP:STD_LOGIC:='0'; SIGNALCODE1,CODE2,CODE3,CODE4:STD_LOGIC_VECTOR(3 DOWNTO 0); BEGIN PROCESS(clk,key1,key2,key3,key4,key6)BEGINIF ZISUO='0' ANDKEY6='0' AND KAI='0' THEN IF KEY1'EVENT AND KEY1='1' THEN --用来输入代码，在关锁状况下，并且无开锁和设置密码信号下有效 IF CODE1<9 THENCODE1<=CODE1+1; ELSE CODE1<=(OTHERS=>'0'); END IF; END IF; IF KEY2'EVENT AND KEY2='1' THEN IF CODE2<9 THEN CODE2<=CODE2+1; ELSE CODE2<=(OTHERS=>'0'); END IF; END IF; IF KEY3'EVENT AND KEY3='1' THEN IF CODE3<9 THENCODE3<=CODE3+1; ELSE CODE3<=(OTHERS=>'0'); END IF; END IF; IF KEY4'EVENT AND KEY4='1' THEN IF CODE4<9 THENCODE4<=CODE4+1; ELSE CODE4<=(OTHERS=>'0'); END IF; END IF; ELSIF(ZISUO='0' AND KEY7='1' AND KAI='1')THEN CODE1<="0000";CODE2<="0000";CODE3<="0000";CODE4<="0000";--这一步很重要，重新上锁必须将密码值清零，不然会显示上次输入的密码 IF KEY6='1' AND KAI='1' THEN --显示密码 Q1<=PASSWORD1; Q2<=PASSWORD2; Q3<=PASSWORD3; Q4<=PASSWORD4; END IF; IF KEY6='0' AND KAI='0' THEN --显示要更改的密码 Q1<=CODE1; Q2<=CODE2; Q3<=CODE3; Q4<=CODE4; END IF; IF KEY6='0' AND KAI='1' THEN --开锁后显示零 Q1<="0000"; Q2<="0000"; Q3<="0000"; Q4<="0000"; END IF; ELSIF ZISUO='0' AND KEY6='1' AND KAI='1'THEN --按住KEY6设置密码，此时必须是开锁状态 IF KEY1'EVENT AND KEY1='1' THEN IF PASSWORD1<9 THENPASSWORD1<=PASSWORD1+1; ELSE PASSWORD1<=(OTHERS=>'0'); END IF; END IF; IF KEY2'EVENT AND KEY2='1' THEN IF PASSWORD2<9 THENPASSWORD2<=PASSWORD2+1; ELSE PASSWORD2<=(OTHERS=>'0'); END IF; END IF; IF KEY3'EVENT AND KEY3='1' THEN IF PASSWORD3<9 THENPASSWORD3<=PASSWORD3+1; ELSE PASSWORD3<=(OTHERS=>'0'); END IF; END IF; IF KEY4'EVENT AND KEY4='1' THEN IF PASSWORD4<9 THENPASSWORD4<=PASSWORD4+1; ELSE PASSWORD4<=(OTHERS=>'0'); End IF; END IF; END IF; END PROCESS; PROCESS (CLK,key5,key7) BEGIN IF CLK'EVENT AND CLK='1' THEN IF KEY5='1' AND ZISUO='0' AND KEY6='0'THEN IF PASSWORD1=CODE1 AND PASSWORD2=CODE2 ANDPASSWORD3=CODE3 AND PASSWORD4=CODE4 THEN KAI<='1'; --按下开锁键后，如果密码正确，开锁 ELSE KAI<='0'; END IF; END IF; END IF; IF KAI='1' THEN LED_G<='1';LED_R<='0'; --开锁后红灯灭绿灯亮，否则红灯亮绿灯灭 ELSE LED_G<='0';LED_R<='1'; END IF; IF KEY7='1' AND KEY6='0' THEN --关锁按钮按下后关锁 KAI<='0';LED_G<='0';LED_R<='1'; END IF; END PROCESS; PROCESS(CLK,KEY1,KEY8) BEGIN IF(KEY1'EVENT AND KEY1='1')THEN FLAG<='1'; END IF; IF CLK'EVENT AND CLK='1' THEN --按下第一个按键时置位标志位FLAG,开始计时 IF(FLAG='1')THEN IF ZISUO='0' AND KEY6='0' ANDKAI='0' THEN IF JISHI5<5 THENJISHI5<=JISHI5+1; ELSE JISHI5<="0000"; END IF; END IF; END IF; IF (JISHI5=5 AND KAI='0') THEN --如果5秒后未开锁则进入自锁状态 ZISUO<='1'; END IF; END IF; IF KAI='1' THEN --5秒内开锁计时清零，标志位清零 JISHI5<="0000";FLAG<='0'; END IF; IF KEY8='1' AND ZISUO='1' THEN --K8按下后清除自锁 ZISUO<='0';FLAG<='0'; END IF; END PROCESS; PROCESS(CLK,KEY8,CLK5) BEGIN IF CLK'EVENT AND CLK='1' THEN --如果自锁则蜂鸣器持续20秒发声 IF ZISUO='1' THEN IF JISHI20<20 THEN JISHI20<=JISHI20+1; BEEP_FLAG<='1'; --置位蜂鸣器标志位 ELSE BEEP_FLAG<='0'; END IF; LED_TMP<=NOT LED_TMP; --进入自锁后灯闪烁提示 LED<=LED_TMP; END IF; IF ZISUO='0' THEN --自锁解除，清零计时值和标志位 JISHI20<="00000";LED<='0';BEEP_FLAG<='0';LED_TMP<='0';JISHI20<="00000"; END IF; END IF; IFBEEP_FLAG='1' THEN --判断蜂鸣器标志位是否为1 IF CLK5='1' THEN --CLK5给无源蜂鸣器提供1K的时钟信号 BEEP<='1'; ELSE BEEP<='0'; END IF; END IF;END PROCESS;END BEHAV; 0
2018-6-28 15:23:32　　评论淘帖0 邀请回答您可以邀请以下用户，快速回答问题 × 刘英该类别下有 31 个回答。邀请回答 chenbingjy 该类别下有 27 个回答。邀请回答 yoonssica 该类别下有 22 个回答。邀请回答 houxiaoxiao 该类别下有 17 个回答。邀请回答小萃米该类别下有 16 个回答。邀请回答小工兵该类别下有 16 个回答。邀请回答 Elecfans管家该类别下有 15 个回答。邀请回答薄迪该类别下有 14 个回答。邀请回答我爱妖妖该类别下有 14 个回答。邀请回答言尽于此33 该类别下有 14 个回答。邀请回答 hxing 该类别下有 13 个回答。邀请回答那些年儿ing 该类别下有 13 个回答。邀请回答平漂流该类别下有 13 个回答。邀请回答 1653344032.827400 该类别下有 12 个回答。邀请回答小麦地该类别下有 12 个回答。邀请回答科比如我该类别下有 12 个回答。邀请回答倪love 该类别下有 12 个回答。邀请回答 xiekaboy 该类别下有 12 个回答。邀请回答黄月明该类别下有 11 个回答。邀请回答 tutu1583 该类别下有 11 个回答。邀请回答举报邢乃双相关推荐 • 请问VHDL语言和verilog语言有什么区别？ 3652 • Verilog HDL语言有什么优越性 1882 • 初学FPGA应该学习VHDL还是 Verilog_HDL语言,请高手指条路. 2580 • 请问VHDL语言和verilog语言有什么区别？ 2699 • 一句verilog语言转成VHDL语言的问题 2187 • Verilog HDL语言必须了解的知识有哪些？ 1244 • 求基于fpga的verilog HDL语言的红外遥控系统设计的完整程序 3665 • 常见的几种代表性的HDL语言 6806 • FPGA编程是用VHDL还是verilog HDL好用？谢谢了！ 2751 • 我是学Verilog呢还是VHDL？ 6464 1个回答

答案对人有帮助，有参考价值 0 语法结构的差异比较大，要重新按逻辑进行编写

2018-7-16 13:55:43 评论举报 jinyi7016