【導(dǎo)讀】避免了攜帶甚至丟失鑰匙的麻煩。目前設(shè)計密碼鎖的方法很多,例如用傳統(tǒng)的。PCB板設(shè)計、用PLC設(shè)計或者用單片機設(shè)計。而用VHDL可以更加快速、ACEX1K是Altera公司著眼于通信、音頻處理及。今Altera多種產(chǎn)品中應(yīng)用前景最好的器件系列之一。可供選擇的方案有數(shù)字機械式鍵盤和觸摸式數(shù)字鍵盤等多種。隨著社會的發(fā)展和人們生活水平的提高，人們的安全意識也逐步加強。它是解決重要部門出入口實現(xiàn)安全防范管理的有效措施，在數(shù)字技術(shù)網(wǎng)絡(luò)技術(shù)飛速發(fā)展的今天，電子密碼鎖技術(shù)得到了迅猛的發(fā)展。防監(jiān)控、餐飲收費、私家車庫管理等，真正實現(xiàn)區(qū)域內(nèi)一卡智能管理。基于VHDL語言的電子密碼鎖已經(jīng)是現(xiàn)代生活中經(jīng)常用到的工?；贔PGA的電子密碼鎖具有保密強、靈活性高、適用范圍廣等特點，現(xiàn)密碼錯誤時，則系統(tǒng)會長時間報警不止，這時必須按復(fù)位方可停止。本次課程設(shè)計成功地設(shè)計了一個簡單的數(shù)字電子密碼鎖，密碼為4位。典型的EDA工具中必須包含兩個特殊的。綜合器的功能就是將設(shè)計者在EDA平臺上完成的

　　

【正文】 WNTO 0)。keyboard scan about 15Hz *** SIGNAL SEL: STD_LOGIC_VECTOR (3 downto 0)。 BEGIN PROCESS (Clk_4M) Begin IF CLK_4M39。Event AND CLK_4M = 39。139。 then Q = Q+1。 END IF。 END PROCESS。 CLK = Q(0) 。 CLK = CLK_DEBOUNCE CLK_KEYBOARD = Q(5 DOWNTO 4) 。 ***00011011 CLK_DISPLAY = Q(5 DOWNTO 4) 。 To generate keyboard scan sequence 1110110110110111 SEL = 1110 WHEN CLK_KEYBOARD=0 ELSE 彭勝 《 基于 VHDL的電子密碼鎖設(shè)計與實現(xiàn) 》 第 28 頁 共 32 頁 1101 WHEN CLK_KEYBOARD=1 ELSE 1011 WHEN CLK_KEYBOARD=2 ELSE 0111 。 CLK_SCAN = SEL 。 end block counter 。 ********************************************* debounuing ckt debounuing : block begin U1: debouncing PORT MAP ( d_in = key_in(0) , d_out = C(0) , clk = CLK )。 U2: debouncing PORT MAP ( d_in = key_in(1) , d_out = C(1) , clk = CLK )。 U3: debouncing PORT MAP ( d_in = key_in(2) , d_out = C(2) , clk = CLK )。 END block debounuing 。 ****************************************************** key_decoder key_decoder : block signal Z : std_logic_VECTOR(4 downto 0) 。 KEY POSITION 彭勝 《 基于 VHDL的電子密碼鎖設(shè)計與實現(xiàn) 》 第 29 頁 共 32 頁 SIGNAL R1, R0 : STD_LOGIC 。 begin PROCESS(clk) begin Z = CLK_KEYBOARD amp。 C 。 IF CLK39。EVENT AND CLK = 39。139。 THEN case Z is when 11101 = N = 0000 。0 when 00011 = N = 0001 。1 when 00101 = N = 0010 。2 when 00110 = N = 0011 。3 when 01011 = N = 0100 。4 when 01101 = N = 0101 。5 when 01110 = N = 0110 。6 when 10011 = N = 0111 。7 when 10101 = N = 1000 。8 when 10110 = N = 1001 。9 when others = N = 1111 。 end case 。 END IF 。 **************************** IF CLK39。EVENT AND CLK = 39。139。 THEN case Z is when 11011 = F = 0100 。*_LOCK when 11110 = F = 0001 。_UNLOCK when others = F = 1000 。 end case 。 END IF 。 end process 。 彭勝 《 基于 VHDL的電子密碼鎖設(shè)計與實現(xiàn) 》 第 30 頁 共 32 頁 FN = NOT ( N(3) AND N(2) AND N(1) AND N(0) ) 。 FF = ( NOT F(3) AND F(2) AND NOT F(1) AND NOT F(0)) OR (NOT AND NOT F(1) AND F(0) ) 。 To generate clear signal for ACC PROCESS (CLK) BEGIN IF CLK39。EVENT AND CLK = 39。139。 THEN R1 = R0 。 R0 = FF 。 END IF 。 RR2 = R1 AND NOT R0 。 CLEAR = RR2 。 END PROCESS 。 end block key_decoder 。 ***************************************************** KEYIN /// BACK /// ALL CLEAR KEYIN_PROCESS :BLOCK SIGNAL RST,D0,D1: STD_LOGIC 。 BEGIN PROCESS(CLK,FN,RST) BEGIN IF RST = 39。139。 THEN ACC = 0000000000000000 。 CLEAR INPUT NC = 000 。 ELSE IF FN39。EVENT AND FN = 39。139。 THEN IF NC 4 THEN ACC = ACC(11 DOWNTO 0) amp。 N 。 BB = 39。039。 。 NC = NC + 1 。 彭勝 《 基于 VHDL的電子密碼鎖設(shè)計與實現(xiàn) 》 第 31 頁 共 32 頁 ELSE BB = 39。139。 。 END IF 。 END IF 。 END IF 。 END PROCESS 。 RST = RR2 。 END BLOCK KEYIN_PROCESS 。 ********************************************* LOCK_PROCESS : BLOCK BEGIN PROCESS(CLK,F) BEGIN IF (CLK39。EVENT AND CLK = 39。139。) THEN IF NC = 4 THEN IF F(2) = 39。139。 THEN LOCK REG = ACC 。 QA = 39。139。 。 QB = 39。039。 ELSIF F(0) = 39。139。 THEN UNLOCK IF REG = ACC THEN CHECK PIN CODE QB = 39。139。 。 QA= 39。039。 END IF 。 ELSIF ACC = 0010010110000000 THEN To set 2580 is the Universal. pin number QB = 39。139。 。 QA= 39。039。 END IF 。 END IF。 END IF 。 END PROCESS 。 彭勝 《 基于 VHDL的電子密碼鎖設(shè)計與實現(xiàn) 》 第 32 頁 共 32 頁 END BLOCK LOCK_PROCESS 。 ENLOCK = QA AND NOT QB 。 BCD_CODE = ACC 。 ********************************************** MULTIPLEXER : BLOCK BEGIN DB = ACC(15 DOWNTO 12) WHEN CLK_DISPLAY = 0 ELSE ACC(11 DOWNTO 8) WHEN CLK_DISPLAY = 1 ELSE ACC(7 DOWNTO 4) WHEN CLK_DISPLAY = 2 ELSE ACC(3 DOWNTO 0) WHEN CLK_DISPLAY = 3 ELSE 1111 。 End Block MULTIPLEXER 。 ********************************************** SEVEN_SEGMENT : Block Binary Code Segment 7 Code Begin gfedcba SEG = 0111111 WHEN DB = 0 ELSE 0000110 WHEN DB = 1 ELSE 1011011 WHEN DB = 2 ELSE 1001111 WHEN DB = 3 ELSE 1100110 WHEN DB = 4 ELSE 1101101 WHEN DB = 5 ELSE 1111101 WHEN DB = 6 ELSE 0000111 WHEN DB = 7 ELSE 1111111 WHEN DB = 8 ELSE 1101111 WHEN DB = 9 ELSE 1111111。 End Block SEVEN_SEGMENT。 END a。