密碼鎖設(shè)計VHDL源程序文檔

2.2系統(tǒng)的輸入、輸出端口以及存放器清單及說明：CLK輸入時鐘方波信號端口KIN鍵盤按鍵輸入端口KOUT鍵盤完整編碼碼值輸出端口〔七位二進(jìn)制數(shù)〕KOUT1掃描信號輸出端口〔三位二進(jìn)制數(shù)〕SIN鍵盤消抖輸入端口〔七位二進(jìn)制數(shù)〕SOUT鍵盤消抖輸出端口〔七位二進(jìn)制數(shù)〕LIN鍵盤按鍵編碼模塊輸入端口〔七位二進(jìn)制數(shù)〕DF數(shù)字按鍵標(biāo)志存放器FF功能按鍵標(biāo)志存放器ND數(shù)字按鍵識別編碼存放器NF功能按鍵識別編碼存放器LOCK電子密碼鎖上鎖狀態(tài)標(biāo)志存放器LOCK1電子密碼鎖報警狀態(tài)標(biāo)志存放器UNLOCK電子密碼鎖開鎖狀態(tài)標(biāo)志存放器NULL1電子密碼鎖無密碼狀態(tài)標(biāo)志存放器DATA電子密碼鎖數(shù)碼顯示數(shù)據(jù)存放器CAT電子密碼鎖數(shù)碼顯示位選存放器DISPLAY電子密碼鎖數(shù)碼顯示段選存放器〔十七位二進(jìn)制數(shù)〕NUM0、NUM1、NUM2、NUM3數(shù)碼顯示中分位顯示數(shù)據(jù)存放器DISNUM數(shù)碼顯示段選數(shù)據(jù)存放器I1數(shù)碼顯示計數(shù)器SCANS鍵盤掃描中按鍵完整編碼存放器SCAN鍵盤掃描存放器CNT鍵盤消抖計數(shù)器SIN1鍵盤按鍵鍵值存放器I鍵盤掃描計數(shù)器DF1數(shù)字按鍵狀態(tài)標(biāo)志存放器ACC鍵盤數(shù)字輸入暫存器T報警計數(shù)器REG電子密碼鎖密碼存儲器NC計數(shù)器1鍵盤輸入掃描局部源程序LIBRARYIEEE;USEIEEE.STD_LOGIC_ARITH.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;USEIEEE.STD_LOGIC_1164.ALL;ENTITYkbscan1isPORT(clk:inSTD_LOGIC;kin:inSTD_LOGIC_VECTOR(3DOWNTO0);---PC7-PC4kout:outSTD_LOGIC_VECTOR(7downto0);--PC3--PCkout1:outSTD_LOGIC_VECTOR(3downto0));endkbscan1;architectureaofkbscan1issignalscans:std_logic_vector(7downto0);--PC7--PC0signalscan:std_logic_vector(3downto0);--PC3--PC0signalcnt:integerrange0to140;signalsin1:std_logic_vector(3downto0);signali:integerrange0to3;beginscans<=scan&kin;kout<=scans;kout1<=scan;process(clk)beginif(falling_edge(clk))thenif(i=3)theni<=0;elsei<=i+1;endif;caseiiswhen0=>scan<="0001";when1=>scan<="0010";when2=>scan<="0100";when3=>scan<="1000";endcase;endif;endprocess;Enda;2鍵盤輸入消抖局部源程序LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYxiaodouisPort(clk:inSTD_LOGIC;sin:instd_logic_vector(7downto0);sout:outstd_logic_vector(7downto0));endxiaodou;architecturebehavioralofxiaodouissignalcnt:integerrange0to120;signalsin1:std_logic_vector(7downto0);beginprocess(clk)beginsin1<=sin;if(rising_edge(clk))thenif(sin1=sin)thencnt<=cnt+1;elsesin1<=sin;cnt<=0;endif;if(cnt=120)thensout<=sin;cnt<=0;endif;endif;endprocess;endbehavioral;3鍵盤輸入編碼局部源程序LIBRARYIEEE;USEIEEE.STD_LOGIC_ARITH.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;USEIEEE.STD_LOGIC_1164.ALL;ENTITYbianmaisPORT(clk:inSTD_LOGIC;lin:inSTD_LOGIC_VECTOR(7DOWNTO0);---PC7-PC4DF,FF:outstd_logic;nd,nf:BUFFERstd_logic_vector(3downto0));endbianma;architecturebofbianmaisbeginprocess(clk)beginifclk'eventandclk='1'thencaseliniswhen"10000001"=>ND<="0000";--0when"00010001"=>ND<="0001";--1when"00010010"=>ND<="0010";--2when"00010100"=>ND<="0011";--3when"00100001"=>ND<="0100";--4when"00100010"=>ND<="0101";--5when"00100100"=>ND<="0110";--6when"01000001"=>ND<="0111";--7when"01000010"=>ND<="1000";--8when"01000100"=>ND<="1001";--9whenothers=>ND<="1111";ENDCASE;ENDIF;IFCLK'EVENTANDCLK='1'THENCASELINISwhen"00011000"=>NF<="0001";--qingchuwhen"00101000"=>NF<="0010";--querenwhen"01001000"=>NF<="0011";--shangsuowhen"10001000"=>NF<="0100";--kaisuowhen"10000100"=>NF<="0101";--wangjimimawhen"10000010"=>NF<="0111";--genggaimimaWhenothers=>NF<="1000";ENDCASE;ENDIF;ENDPROCESS;DF<=NOT(ND(3)ANDND(2)ANDND(1)ANDND(0));FF<=NF(2)ORNF(1)ORNF(0);endb;4電子密碼鎖的控制局部程序DF數(shù)字按鍵標(biāo)志存放器FF功能按鍵標(biāo)志存放器ND數(shù)字按鍵識別編碼存放器NF功能按鍵識別編碼存放器LOCK電子密碼鎖上鎖狀態(tài)標(biāo)志存放器LOCK1電子密碼鎖報警狀態(tài)標(biāo)志存放器UNLOCK電子密碼鎖開鎖狀態(tài)標(biāo)志存放器NULL1電子密碼鎖無密碼狀態(tài)標(biāo)志存放器DATA電子密碼鎖數(shù)碼顯示數(shù)據(jù)存放器LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYkongzhiISPORT(CLK:INSTD_LOGIC;DF,FF:inSTD_LOGIC;ND,NF:inSTD_LOGIC_VECTOR(3downTO0);LOCK,LOCK1,UNLOCK:bufferSTD_LOGIC;NULL1:bufferSTD_LOGIC;DATA:outSTD_LOGIC_VECTOR(15downTO0));ENDkongzhi;ARCHITECTUREV1OFkongzhiISsignali1:integerrange0to3;signaldf1:std_logic;signalACC:STD_LOGIC_VECTOR(15DOWNTO0);signalt:INTEGERsignalREG:STD_LOGIC_VECTOR(15downTO0);signalNC,A:INTEGERbeginPROCESS(FF,DF)ISBEGINifrising_edge(clk)thenIFFF='1'THENIFNF="0001"THENACC<="0000000000000000";NC<=0;ENDIF;ELSEdf1<=df;IFdf1='0'andDF='1'THENIFNC<4THENACC<=ACC(11DOWNTO0)&ND;NC<=NC+1;ENDIF;ENDIF;ENDIF;IFFF='1'THENIFNF="0011"THENREG<=ACC;LOCK<='0';UNLOCK<='1';LOCK1<='1';NULL1<='1';elseIFNF="0100"THENIFREG=ACCTHENLOCK<='1';UNLOCK<='0';LOCK1<='1';NULL1<='1';ELSELOCK<='0';UNLOCK<='1';IFt=2THENLOCK1<='0';lock<='1';unlock<='1';null1<='1';t<=0;ELSEt<=t+1;ENDIF;ENDIF;elseIFNF="0101"THENLOCK<='0';UNLOCK<='1';LOCK1<='1';NULL1<='1';elseIFNF="0111"THENIFUNLOCK='1'THENIFREG=ACCTHENREG<="0000000000000000";NULL1<='0';LOCK<='1';LOCK1<='1';UNLOCK<='1';ENDIF;ENDIF;elseIFNF="0010"THENREG<=ACC;NULL1<='1';LOCK<='0';LOCK1<='1';UNLOCK<='1';ENDIF;endif;endif;endif;endif;endif;endif;ENDPROCESS;DATA<=ACC;ENDARCHITECTUREV1;CAT電子密碼鎖數(shù)碼顯示位選存放器DISPLAY電子密碼鎖數(shù)碼顯示段選存放器〔十七位二進(jìn)制數(shù)〕DISPLAY電子密碼鎖數(shù)碼顯示段選存放器〔十七位二進(jìn)制數(shù)〕NUM0、NUM1、NUM2、NUM3數(shù)碼顯示中分位顯示數(shù)據(jù)存放器DISNUM數(shù)碼顯示段選數(shù)據(jù)存放器I1數(shù)碼顯示計數(shù)器5電子密碼鎖的數(shù)碼顯示模塊源程序LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYLEDXIANSHIISPORT(CLK:INSTD_LOGIC;DATA:inSTD_LOGIC_VECTOR(15DOWNTO0);CAT:OUTSTD_LOGIC_VECTOR(0TO3);DISPLAY:OUTSTD_LOGIC_VECTOR(16DOWNTO0));ENDLEDXIANSHI;ARCHITECTUREBEHAVIORALOFLEDXIANSHIISSignalNUM0,NUM1,NUM2,NUM3:STD_LOGIC_VECTOR(3DOWNTO0);SIGNALDISNUM:STD_LOGIC_VECTOR(16DOWNTO0);SIGNALI1:INTEGERBEGINNUM0<=DATA(3DOWNTO0);NUM1<=DATA(7DOWNTO4);NUM2<=DATA(11DOWNTO8);NUM3<=DATA(15DOWNTO12);DISPLAY<=DISNUM;PROCESS(CLK)BEGINIF(RISING_EDGE(CLK))THENIF(I1=3)THENI1<=0;ELSEI1<=I1+1;ENDIF;ENDIF;ENDPROCESS;PROCESS(I1)BEGINCASEI1ISWHEN0=>CAT<="1110";CASENUM0ISWHEN"0000"=>DISNUM<="00000000011111111";WHEN"0001"=>DISNUM<="00000000000001100";WHEN"0111"=>DISNUM<="00000000000001111";WHENOTHERS=>DISNUM<=NULL;ENDCASE;WHEN1=>CAT<="1101";CASENUM1ISWHEN"0000"=>DISNUM<="00000000011111111";WHEN"0001"=>DISNUM<="00000000000001100";WHEN"0111"=>DISNUM<="00000000000001111";WHENOTHERS=>DISNUM<=NULL;ENDCASE;WHEN2=>CAT<="1011";CASENUM2ISWHEN"0000"=>DISNUM<="00000000011111111";WHEN"0001"=>DISNUM<="00000000000001100";WHEN"0111"=>DISNUM<="00000000000001111";WHENOTHERS=>DISNUM<=NULL;ENDCASE;WHEN3=>CAT<="0111";CASENUM3ISWHEN"0000"=>DISNUM<="00000000011111111";WHEN"0001"=>DISNUM<="00000000000001100";WHEN"0111"=>DISNUM<="00000000000001111";WHENOTHERS=>DISNUM<=NULL;ENDCASE;ENDCASE;ENDPROCESS;ENDBEHAVIORAL;6電子密碼鎖的數(shù)碼顯示局部〔附加〕LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYLEDXIANSHIISPORT(CLK:INSTD_LOGIC;DATA:inSTD_LOGIC_VECTOR(15DOWNTO0);CAT:OUTSTD_LOGIC_VECTOR(0TO3);DISPLAY:OUTSTD_LOGIC_VECTOR(16DOWNTO0));ENDLEDXIANSHI;ARCHITECTUREBEHAVIORALOFLEDXIANSHIISsignalNUM0,NUM1,NUM2,NUM3:STD_LOGIC_VECTOR(3DOWNTO0);SIGNALDISNUM:STD_LOGIC_VECTOR(16DOWNTO0);SIGNALI1:INTEGERBEGINNUM0<=DATA(3DOWNTO0);NUM1<=DATA(7DOWNTO4);NUM2<=DATA(11DOWNTO8);NUM3<=DATA(15DOWNTO12);DISPLAY<=DISNUM;PROCESS(CLK)BEGINIF(RISING_EDGE(CLK))THENIF(I1=3)THENI1<=0;ELSEI1<=I1+1;ENDIF;ENDIF;ENDPROCESS;PROCESS(I1)BEGINCASEI1ISWHEN0=>CAT<="1110";CASENUM0ISWHEN"0000"=>DISNUM<="00000000011111111";ENDCASE;WHEN1=>CAT<="1101";CASENUM1ISWHEN"0000"=>DISNUM<="00000000011111111";ENDCASE;WHEN2=>CAT<="1011";CASENUM2ISWHEN"0000"=>DISNUM<="00000000011111111";ENDCASE;WHEN3=>CAT<="0111";CASENUM3ISWHEN"0000"=>DISNUM<="00000000011111111";ENDCASE;ENDCASE;ENDPROCESS;ENDBEHAVIORAL;數(shù)碼管顯示libraryIEEE;useIEEE.STD_LOGIC_1164.ALL;useIEEE.STD_LOGIC_ARITH.ALL;useIEEE.STD_LOGIC_UNSIGNED.ALL;entityKeyScanis port( RESET : in std_logic; CLK : in std_logic; --根本時鐘源6MHz KeyIn : in std_logic_vector(3downto0); --column列 KeyOut : out std_logic_vector(3downto0);--row行 LED_A : outstd_logic; --4位數(shù)碼管引腳 LED_B : outstd_logic; LED_C : outstd_logic; LED_D : outstd_logic; LED_E : outstd_logic; LED_F : outstd_logic; LED_G : outstd_logic; LED_VCC1 : outstd_logic; --時十位 LED_VCC2 : outstd_logic; --時個位 LED_VCC3 : outstd_logic; --分十位 LED_VCC4 : outstd_logic; --分個位 LED_TimePoint:outstd_logic; --冒號 LED_Point :outstd_logic;--小數(shù)點(diǎn) LED_EN1 :outstd_logic--小數(shù)點(diǎn) );endKeyScan;architectureBehavioralofKeyScanis signaltimecnt : integerrange0to100000 ;--分頻計數(shù)器，用來得到10ms時鐘 signaltime10ms : std_logic ; --10ms時鐘 signalscanvalue:std_logic_vector(3downto0);--記錄掃描數(shù)據(jù) signalcombvalue:std_logic_vector(7downto0);--KeyIn、KeyOut組合值 signalcpy_scanvalue:std_logic_vector(3downto0);--備份掃描數(shù)據(jù) signalcount : integerrange0to60000 ; --分頻器，產(chǎn)生毫秒時鐘基準(zhǔn) signalscancnt : integerrange0to3 ; --LED掃描輪轉(zhuǎn) signalData0: integerrange0to9 ; begin LED_EN1<='0'; --進(jìn)程1：產(chǎn)生20ms時鐘 process(CLK,RESET) begin ifRESET='0'then time10ms<='0'; --初始化 elsifCLK'eventandCLK='1'then timecnt<=timecnt+1; iftimecnt=100000 thentime10ms<=nottime10ms;timecnt<=0; endif; endif; endprocess; --進(jìn)程2：鍵盤掃描輸出 process(time10ms,RESET) begin ifRESET='0'then scanvalue<="0001";combvalue<="00000000"; Data0<=0; --初始化 elsiftime10ms'eventandtime10ms='1'then --每10ms進(jìn)行一次鍵盤掃描 KeyOut<=scanvalue;--輸出掃描值 cpy_scanvalue<=scanvalue; --備份掃描值，為了進(jìn)程3對掃描結(jié)果進(jìn)行比擬 casescanvalueis --掃描值移位 when"0001"=>scanvalue<="0010"; when"0010"=>scanvalue<="0100"; when"0100"=>scanvalue<="1000"; when"1000"=>scanvalue<="0001"; whenothers=>scanvalue<="0001"; endcase; combvalue<=(KeyIn&cpy_scanvalue);--組合鍵盤掃描的輸入和輸出 casecombvalueis --翻譯掃描結(jié)果 when"00010001"=>Data0<=1;--對應(yīng)鍵盤“1〞 when"00100001"=>Data0<=2;--對應(yīng)鍵盤“2〞 when"01000001"=>Data0<=3;--對應(yīng)鍵盤“3〞 when"00010010"=>Data0<=4;--對應(yīng)鍵盤“4〞 when"00100010"=>Data0<=5;--對應(yīng)鍵盤“5〞 when"01000010"=>Data0<=6;--對應(yīng)鍵盤“6〞 when"00010100"=>Data0<=7;--對應(yīng)鍵盤“7〞 when"00100100"=>Data0<=8;--對應(yīng)鍵盤“8〞 when"01000100"=>Data0<=9;--對應(yīng)鍵盤“9〞 when"00011000"=>Data0<=0;--對應(yīng)鍵盤“0〞 whenothers=>null;--無鍵盤按下 endcase; endif; endprocess;--數(shù)碼管掃描process(CLK,RESET) --時鐘進(jìn)程，產(chǎn)生各種時鐘信號 begin ifRESET='0'then NULL; elsifCLK'eventandCLK='1'then count<=count+1; ifcount=60000then count<=0; ifscancnt>3thenscancnt<=0; else scancnt<=scancnt+1; endif; endif; endif; endprocess; --數(shù)碼管掃描process(CLK,RESET) begin --LED_VCC信號是‘1’有效，其余信號均為‘0’有效，中間的冒號兩個點(diǎn)分別由VCC2和VCC3控制 ifRESET='0'then LED_A<='1';LED_B<='1'; LED_C<='1';LED_D<='1';LED_E<='1';LED_F<='1';LED_G<='1';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='0';LED_TimePoint<='1'; LED_Point<='1'; else ifscancnt=0then caseData0is --分個位 when0=>LED_A<='0';LED_B<='0'; LED_C<='0';LED_D<='0';LED_E<='0';LED_F<='0';LED_G<='1';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when1=>LED_A<='1';LED_B<='0'; LED_C<='0';LED_D<='1';LED_E<='1';LED_F<='1';LED_G<='1';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when2=>LED_A<='0';LED_B<='0'; LED_C<='1';LED_D<='0';LED_E<='0';LED_F<='1';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when3=>LED_A<='0';LED_B<='0'; LED_C<='0';LED_D<='0';LED_E<='1';LED_F<='1';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when4=>LED_A<='1';LED_B<='0'; LED_C<='0';LED_D<='1';LED_E<='1';LED_F<='0';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when5=>LED_A<='0';LED_B<='1'; LED_C<='0';LED_D<='0';LED_E<='1';LED_F<='0';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when6=>LED_A<='0';LED_B<='1'; LED_C<='0';LED_D<='0';LED_E<='0';LED_F<='0';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when7=>LED_A<='0';LED_B<='0'; LED_C<='0';LED_D<='1';LED_E<='1';LED_F<='1';LED_G<='1';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when8=>LED_A<='0';LED_B<='0'; LED_C<='0';LED_D<='0';LED_E<='0';LED_F<='0';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; when9=>LED_A<='0';LED_B<='0'; LED_C<='0';LED_D<='0';LED_E<='1';LED_F<='0';LED_G<='0';LED_VCC1<='0';LED_VCC2<='0';LED_VCC3<='0';LED_VCC4<='1';LED_Point<='1'; whenothers=>null; endcase; endif; endif;endprocess;endBehavioral;控制電路的軟件仿真圖〔1〕圖2-11控制電路的軟件仿真圖〔2〕控制電路的軟件仿真圖〔3〕控制電路的軟件仿真圖〔4〕控制電路的軟件仿真圖〔5〕5電子密碼鎖的數(shù)碼顯示模塊源程序〔改七段〕LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYLEDXIANSHIISPORT(CLK:INSTD_LOGIC;LED_TimePoint:outstd_logic; --冒號 LED_Point :outstd_logic;--小數(shù)點(diǎn) LED_EN1 :outstd_logic;--選擇數(shù)碼管顯示DATA:inSTD_LOGIC_VECTOR(15DOWNTO0);CAT:OUTSTD_LOGIC_VECTOR(0TO3);DISPLAY:OUTSTD_LOGIC_VECTOR(6DOWNTO0));ENDLEDXIANSHI;ARCHITECTUREBEHAVIORALOFLEDXIANSHIISSignalNUM0,NUM1,NUM2,NUM3:STD_LOGIC_VECTOR(3DOWNTO0);SIGNALDISNUM:STD_LOGIC_VECTOR(6DOWNTO0);SIGNALI1:INTEGERBEGINNUM0<=DATA(3DOWNTO0);NUM1<=DATA(7DOWNTO4);NUM2<=DATA(11DOWNTO8);NUM3<=DATA(15DOWNTO12);DISPLAY<=DISNUM;PROCESS(CLK)BEGINIF(RISING_EDGE(CLK))THENIF(I1=3)THENI1<=0;ELSEI1<=I1+1;ENDIF;ENDIF;ENDPROCESS;PROCESS(I1)BEGINCASEI1ISWHEN0=>CAT<="0001";CASENUM0ISWHEN"0000"=>DISNUM<="1000000";WHEN"0001"=>DISNUM<="1111001";WHEN"0010"=>DISNUM<="0100100";WHEN"0011"=>DISNUM<="0110000";WHEN"0100"=>DISNUM<="0011001";WHEN"0101"=>DISNUM<="0010010";WHE