串行密码锁实验报告.docxVIP

串行密码锁实验报告 实验目的 设计四位16进制密码锁。 熟悉状态转换 实验内容 设计4位16进制密码锁 在电路处于密码设置状态下，用户利用“输入键盘”设置自己 选定的16位密码，并用一个LED管只是电路处于密码设置状态。在电路处于开锁状态下，用户输入开锁密码，如果输入的开锁密码与用户设置的密码相同，锁开启（用一个LED管指示开启状态）；如果输入的开锁密码与用户设置的密码不同，锁不开启，若连续输错三次此时给出告警提示。 实验原理 参见《数字逻辑实验教程》。 实验记录 完整的实验代码： lock.vhd LIBRARY IEEE ; USE IEEE.STD_LOGIC_1164.ALL ; USE IEEE.STD_LOGIC_ARITH.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL ; entity lock is port( rst: in std_logic; clk: in std_logic; everyopen:in std_logic;----万能开锁键 code: in std_logic_vector(3 downto 0); mode: in std_logic_vector(1 downto 0); unlock: out std_logic; err: out std_logic; alert: out std_logic; K: out std_logic ); end lock; architecture pass of lock is --状态 type State is (start, get0, get1, get2, check0, check1, check2, final); --目前状态 signal nows: State := start; --密码 signal user0, user1, user2, user3: integer range 0 to 15 := 0; --临时 signal num: integer range 0 to 15 := 0; --错误次数 signal errTimes: integer range 0 to 3 := 0; --三次错误报警灯 signal alarm: std_logic := 0; -- judge if now password can be user(admin) password signal canbeUser: std_logic := 1; signal canbeAdmi: std_logic := 1; begin K=1; ---判断led灯是否工作 process (code) begin num = conv_integer(code); end process; process (alarm) begin alert = alarm; end process; process (clk, rst) begin -- reset if rst = 0 then nows = start; unlock = 0; err = 0; canbeUser = 1; canbeAdmi = 1; elsif clkevent and clk = 1 then --设立密码 if mode = 00 then --状态转移 case nows is when get2 = user3 = num; nows = final; when get1 = user2 = num; nows = get2; when get0 = user1 = num; nows = get1; when start = user0 = num; nows = get0; when others = null; end case; --验证密码 elsif mode = 01 then -- correct if (nows = start and ((user0 = num and canbeUser = 1) or (5 = num and canbeAdmi = 1))) or (nows = check0 and ((user1 = num and canbeUser = 1) or (6 = num and canbeAdmi = 1))) or (n