运用Quartus软件设计一个可输入密码的电子锁，只有输入正确的密码时，锁才会打开。. 具体要求如下: 1.密码可进行设置，支持0到9共10个数字，随机选择4个数字作为密码; 2.只有按正确的顺序依次输入（用数字按键代替)4位密码时，电子锁才会打开； 3.输入密码错误(包括输入错误的数字或者不是按预设的密码顺序输入），都元法开锁: 4.开锁成功时，有指示灯指示; 5.开锁成功后，可复位到初始状态。使用D触发器：74LS74； 或门：74LS32； 继电器：松乐继电器SRS-0，给出Verilog代码

module electronic_lock (
input clk,
input reset,
input [3:0] password_input,
input unlock,
output reg lock,
output reg led
);

parameter PASSWORD_LENGTH = 4;
parameter [3:0] PASSWORD [0:PASSWORD_LENGTH-1] = {2'b00, 2'b01, 2'b10, 2'b11}; // 默认密码为 0011

reg [3:0] input_buffer [0:PASSWORD_LENGTH-1];
reg [3:0] correct_password [0:PASSWORD_LENGTH-1];
reg [3:0] current_password [0:PASSWORD_LENGTH-1];
reg [3:0] last_password;
reg [3:0] unlock_count;
reg [3:0] i;
reg correct_unlock;
reg unlock_success;

// 初始化
initial begin
for (i=0; i<PASSWORD_LENGTH; i=i+1) begin
correct_password[i] = PASSWORD[i];
input_buffer[i] = 4'b0000;
current_password[i] = 4'b0000;
end
last_password = 4'b0000;
unlock_count = 4'b0000;
correct_unlock = 1'b0;
unlock_success = 1'b0;
end

always @(posedge clk) begin
if (reset) begin
for (i=0; i<PASSWORD_LENGTH; i=i+1) begin
input_buffer[i] <= 4'b0000;
current_password[i] <= 4'b0000;
end
last_password <= 4'b0000;
unlock_count <= 4'b0000;
correct_unlock <= 1'b0;
unlock_success <= 1'b0;
lock <= 1'b1;
led <= 1'b0;
end else begin
// 更新输入缓存
input_buffer[unlock_count] <= password_input;

// 判断是否按下解锁键
if (unlock) begin
if (correct_unlock) begin // 解锁成功
unlock_success <= 1'b1;
lock <= 1'b0;
led <= 1'b1;
for (i=0; i<PASSWORD_LENGTH; i=i+1) begin
input_buffer[i] <= 4'b0000;
current_password[i] <= 4'b0000;
end
last_password <= 4'b0000;
unlock_count <= 4'b0000;
correct_unlock <= 1'b0;
end else begin // 解锁失败
for (i=0; i<PASSWORD_LENGTH; i=i+1) begin
input_buffer[i] <= 4'b0000;
current_password[i] <= 4'b0000;
end
last_password <= 4'b0000;
unlock_count <= 4'b0000;
end
end else begin
// 判断当前输入是否正确
if (password_input == correct_password[unlock_count]) begin
current_password[unlock_count] <= password_input;
last_password <= password_input;
unlock_count <= unlock_count + 1;
if (unlock_count == PASSWORD_LENGTH) begin
correct_unlock <= 1'b1;
end
end else begin
for (i=0; i<PASSWORD_LENGTH; i=i+1) begin
input_buffer[i] <= 4'b0000;
current_password[i] <= 4'b0000;
end
last_password <= 4'b0000;
unlock_count <= 4'b0000;
end
end
end
end

endmodule