Verilog简易电梯控制系统(2层)

Verilog简易电梯控制系统(2层)_第1张图片

 工程文件链接:Verilog简易电梯控制系统设计(两层,含附加项蜂鸣器和流水灯)-单片机文档类资源-CSDN下载

一、实验项目名称:简易电梯控制系统(2层)

二、实验学时:2

三、设计目标:

        1.实现2层楼的简易电梯控制系统。

        2.电梯有4个按键。

        1楼外只有向上按键(KEY0),2楼外只有向下按键(KEY1),电梯内还有2个按键分别为1楼按键(KEY2)和2楼按键(KEY3)。所有楼层外和电梯内的按键产生的信号作为给电梯的运行请求信号。

        3.电梯有4个指示灯(LED0、 LED1 、 LED2 、 LED3)。

LED0: 按下KEY0键,若电梯不在1楼,则LED0亮。

LED1: 按下KEY1键,若电梯不在2楼,则LED1亮。

LED2: 电梯在2楼,按KEY2键, 则LED2亮,电梯到1楼后LED2灭。

LED3: 电梯在1楼,按KEY3键, 则LED3亮,电梯到2楼后LED3灭。

        4.有2个数码管,分别显示当前运行状态及楼层。

        (1)1个数码管显示当前运行状态,电梯有三个运行状态:待机、上行、下行。

         待机:电梯停在1楼或2楼且无请求信号时均为待机状态。

        上行状态:电梯停在1楼,有KEY1或KEY3被按下,进入上行状态。

        下行状态:电梯停在2楼,有KEY0或KEY2被按下,进入下行状态。

        (2)1个数码管显示所在楼层,显示1或2;每一层楼之间的运行时间间隔为5秒。

        5.有2个拨码开关。

        (1)复位开关。向下拨动后,电梯复位回到1楼。

        (2)启动开关。向上拨动后,按键有效,电梯正常工作。

        6.增加其它功能后续发布,如能实现有加分:

        1.电梯上行时,LED11至LED7五个指示灯从左到右每隔一秒点亮一个;

 电梯下行时,LED7至LED11五个指示灯从右到左每个一秒点亮一个。

        2.电梯运行到达心楼层时,蜂鸣器发出一声清晰“嘀”声。

        3.电梯开始上行或者下行时,在最左边的两个数码管上倒计时显示运行时间4.9~0.0秒,精度为0.1s。到达新楼层时显示0.0秒

        4.电梯上行时,楼层显示数码管前4s显示1,后1s显示2;

电梯下行时,楼层显示数码管前4s显示2,后1s显示1。

四、设计方案框图

Verilog简易电梯控制系统(2层)_第2张图片

五、程序代码:

`timescale 1ns / 1ps
//
// Company: 
// Engineer: 
// 
// Create Date: 2022/06/02 19:34:35
// Design Name: 
// Module Name: top
// Project Name: 
// Target Devices: 
// Tool Versions: 
// Description: 
// 
// Dependencies: 
// 
// Revision:
// Revision 0.01 - File Created
// Additional Comments:
// 
//


module top(
    input clk,
    input rst_n,
    input start,
    input  [3:0] key,
    output reg [4:0] state_led = 0,
    output reg buzzer = 1,
    output reg [3:0] led =0,
    output  [3:0] row,
    output  [7:0] data_seg,
    output  [5:0] data_dig
    ); 
    
  
 //--------------------------------------------------------------------------------------------------   
//按键相关    
assign row = 4'b1110;  //只需要用到最下面一行,不需要按建行扫描
//按键消抖
wire [3:0] key_xd;
ajxd u2 (
.clk  (clk),
.btn_in  ( key),
.rst_n  (rst_n),
.btn_out  (key_xd)
);
//定义四个按键信号,代表按下按键并消抖之后的信号
wire key0,key1,key2,key3;
//按键按下时定义为高电平
assign key0 = ~(key_xd[0]|row[0]);
assign key1 = ~(key_xd[1]|row[0]);
assign key2 = ~(key_xd[2]|row[0]);
assign key3 = ~(key_xd[3]|row[0]);
//--------------------------------------------------------------------------------------------------
/*
每一个按键都对应了一个五秒的计时器,
该计时器检测到按键上升沿信号后开始计时,
计时状态位--status:  1 = 计时中  ;  0 = 计时完成
*/
//四个状态位,分别代表了key0下行,key1上行,key2下行,key3上行状态
wire status_dow0;
wire status_up1;
wire status_dow2;
wire status_up3;
/*
四个按键信号延迟位 key_delay_x    x=0,1,2,3
为了完成"在上行状态时按下KEY0或KEY2下行,电梯到达2楼后立刻下行"这一要求
在计时器中添加了一个按键被按下后的延迟按键信号输出
其功能为:
若处于上行状态中,按下KEY0或KEY2,那么KEY0或KEY2对应的计时器会被触发,但由于
还处于上行状态,无法开启下行状态。于是将等待上行状态完成后模拟一次KEY0或KEY2被
按下的信号。相当于在上行状态结束的一瞬间再按下了KEY0或KEY2一次,以此来达到期望的效果。
在下行状态按下上行按键也同理
*/
wire key_d0;
wire key_d1;
wire key_d2;
wire key_d3;
 
/*
用来记录四个按键是否被按下的信号,其主要作用是点亮按键对应的led灯
当按键被按下对应的flag就会置位为1,后面会用到该信号来点亮按键对应的
led灯
*/
wire flag0;
wire flag1;
wire flag2;
wire flag3;
 
//定义两个楼层
reg lou1,lou2;
//定义5个状态---上行(key1)、上行(key3)、下行(key0)、下行(key2)、待机
reg state_up1,state_up3,state_dow0,state_dow2,state_wait;

wire rstout;//实现复位功能需要的中间变量
//当复位键按下,rstout表示产生的脉冲信号


maichong u1(clk_1khz,rst_n,rstout );

 
/*
例化计时器模块
*/
count_5 dow_count0 (
.clk  (clk),
.en  ((key0|rstout==0)&(lou2|(~state_wait))&(~led[2])),
.flag  (flag0),
.key_d (key_d0),
.wait1  (status_up1),
.wait2  (status_up3),
.status  (status_dow0)
);
 
count_5 up_count1 (
.clk  (clk),
.en  (key1&(lou1|(~state_wait))&(~led[3])),
.flag  (flag1),
.key_d (key_d1),
.wait1  (status_dow0),
.wait2  (status_dow2),
.status  (status_up1)
);
 
count_5 dow_count2 (
.clk  (clk),
.en  ((key2|rstout==0)&(lou2|(~state_wait))&(~led[0])),
.flag  (flag2),
.key_d (key_d2),
.wait1  (status_up1),
.wait2  (status_up3),
.status  (status_dow2)
);
 
count_5 up_count3 (
.clk  (clk),
.en  (key3&(lou1|(~state_wait))&(~led[1])),
.flag  (flag3),
.key_d (key_d3),
.wait1  (status_dow0),
.wait2  (status_dow2),
.status  (status_up3)
);
 
//--------------------------------------------------------------------------------------------------
/*
楼层及电梯状态判断
*/
//定义5个状态---上行(key1)、上行(key3)、下行(key0)、下行(key2)、待机
//reg state_up1,state_up3,state_dow0,state_dow2,state_wait;
//定义两个楼层
//reg lou1,lou2;
//初始状态:电梯停在一楼,待机状态
initial
begin
lou1 = 1;
lou2 = 0;
state_up1 = 0;
state_up3 = 0;
state_dow0 = 0;
state_dow2 = 0;
state_wait = 1;
end
 
/*
使用计时器状态和楼层状态以及按键被按下的信号做逻辑判断
以此来改变楼层状态位和上下行状态位以及待机状态位
*/
always@(posedge clk)
begin
//    if(rst_n == 0)    //复位,所有状态皆回到初始值
//        begin 
//            lou1 = 1;
//            lou2 = 0;
//            state_up1 = 0;
//            state_up3 = 0;
//            state_dow0 = 0;
//            state_dow2 = 0;
//            state_wait = 1;
//        end
     if (start == 1)   //启动
        begin                                   
            if(lou1&(~lou2)&(key_d1|key_d3)) //电梯不处于上行状态且电梯在一楼、KEY1或KEY3被按下,则电梯进入上行状态,跳出待机状态
                begin
                    if(status_up1 == 1)   
                        begin
                            state_up1 <= 1;
                            state_wait <= 0;                           
                        end
                    else if (status_up3 == 1)
                        begin
                            state_up3 <= 1;
                            state_wait <= 0;                           
                        end
                end                                
            else  
                begin
                    if((status_up1 == 0)&(state_up1 == 1)) //上行状态保持5秒后,status_up1/3置位、上行状态结束、进入待机状态、楼层状态翻转
                    begin    
                        state_up1 <= 0;
                        state_wait <= 1;
                        lou1 <= ~lou1;
                        lou2 <= ~lou2;
                    end
                    else if((status_up3 == 0)&(state_up3 == 1))
                    begin    
                        state_up3 <= 0;
                        state_wait <= 1;
                        lou1 <= ~lou1;
                        lou2 <= ~lou2;
                    end
                end
                
            if(lou2&(~lou1)&(key_d0|key_d2|(rstout==0))) //电梯不处于下行状态且电梯在二楼、KEY2或KEY0被按下,则电梯进入下行状态,跳出待机状态
                begin
                    if(status_dow0 == 1)   
                        begin
                            state_dow0 <= 1;
                            state_wait <= 0;                           
                        end
                    else if (status_dow2 == 1)
                        begin
                            state_dow2 <= 1;
                            state_wait <= 0;                           
                        end
                      
                end                                
            else  
                begin
                    if((status_dow0 == 0)&(state_dow0 == 1))   //下行状态保持5秒后,status_dow0/2置位、下行状态结束、进入待机状态、楼层状态翻转
                    begin    
                        state_dow0 <= 0;
                        state_wait <= 1;
                        lou1 <= ~lou1;
                        lou2 <= ~lou2;
                    end
                    else if((status_dow2 == 0)&(state_dow2 == 1))
                    begin    
                        state_dow2 <= 0;
                        state_wait <= 1;
                        lou1 <= ~lou1;
                        lou2 <= ~lou2;
                    end
                    
                end                
   
        end
end
点亮LED灯
*/
always@(posedge clk )
begin
    if(rst_n == 1'b0)   //reset
        begin
            led <= 0;
        end
    else
       if(start == 1)  //start
        begin
           led[0] <=  (status_dow0&(~status_dow2)&(lou2&(~lou1)))|((state_up1|state_up3)&flag0);
           led[1] <=  (status_up1&(~status_up3)&(lou1&(~lou2)))|((state_dow0|state_dow2)&flag1);
           led[2] <=  (status_dow2&(~status_dow0)&(lou2&(~lou1)))|((state_up1|state_up3)&flag2);
           led[3] <=  (status_up3&(~status_up1)&(lou1&(~lou2)))|((state_dow0|state_dow2)&flag3);
       end
end
 
 
//--------------------------------------------------------------------------------------------------
/*
这里使用的是共阴极数码管,若为共阳极数码管则只需要改动数码管相关的一些代码
调用数码管动态显示模块控制数码管的显示
用两个七段(八段)数码管,一个显示楼层数字,一个显示上行、下行、待机状态。
上行用数码管a亮其他灭表示;待机用数码管g亮其他灭表示;下行用数码管d亮其他灭表示。
*/
reg [6:0] data_seg0;  //运行状态显示
reg [6:0] data_seg1;  //当前楼层显示
seg_scan  scan (
.clk  (clk),
.data_seg0  (data_seg1),
.data_seg1  (data_seg0),
.data_seg  (data_seg),
.data_dig  (data_dig)
);
//定义一个数码管状态变量,方便用数码管显示状态
wire [6:0] status_seg ;
assign status_seg = {lou1,lou2,state_up1,state_up3,state_dow0,state_dow2,state_wait};
always@(posedge clk)
begin
    case(status_seg)    
        7'b1000001:     //1楼待机
            begin
               data_seg0 <= 7'b1000000;
               data_seg1 <= 7'b0000110;
           end
         7'b1010000:    //1楼上行--status_up1--KEY1被按下
            begin
               data_seg0 <= 7'b0000001;
               data_seg1 <= 7'b0000110;
           end
         7'b1001000:    //1楼上行--status_up3--KEY3被按下
            begin
               data_seg0 <= 7'b0000001;
               data_seg1 <= 7'b0000110;
           end
         7'b0100001:    //2楼待机
            begin
               data_seg0 <= 7'b1000000;
               data_seg1 <= 7'b1011011;
           end
         7'b0100100:    //2楼下行--status_dow0--KEY0被按下
            begin
               data_seg0 <= 7'b0001000;
               data_seg1 <= 7'b1011011;
           end
         7'b0100010:    //2楼下行--status_dow2--KEY2被按下
            begin
               data_seg0 <= 7'b0001000;
               data_seg1 <= 7'b1011011;
           end
         default:    //其他情况,显示E,待机
            begin
               data_seg0 <= 7'b1000000;
               data_seg1 <= 7'b1111001;
            end
    endcase
end
 
 
 
//--------------------------------------------------------------------------------------------------   
//附加功能:蜂鸣器
//这里采用无源蜂鸣器,需要输入一定频率的方波信号
//输入信号频率决定了蜂鸣器发出的声音频率,这里采用500hz的方波信号
 
//获得1khz的信号
reg [31:0] temp =0;
reg clk_1khz = 0;
always@(posedge clk)
begin
    if(temp == 49999)
        begin
            temp <= 0;
            clk_1khz <= 1;
        end
    else
        begin
            temp <= temp +1;
            clk_1khz <= 0;
        end
end
 
 
reg lou1_dly;
reg turn = 0;
reg [15:0] cnt = 0;
//这是一个检测信号翻转的模块
//检测楼层状态是否翻转,若翻转则turn = 1并开始计时,计时完成后turn = 0
always@(posedge clk)
begin
    lou1_dly <= lou1;
    if(lou1 != lou1_dly)
         turn <= 1;
    else if(cnt == 100)
            turn <= 0;
end  
 
//当turn = 1时向蜂鸣器输入1khz的信号,蜂鸣器响0.1s,这里蜂鸣器响的时间由上面的cnt计数器决定
//t = cnt_max / 1000     单位s
parameter cnt_max = 100;        
always@(posedge clk_1khz)
begin
    if(turn == 1)
        begin
            if(cnt == cnt_max)
                cnt <= 0;
            else
                cnt <= cnt + 1;
        end
    else
        cnt <= 0;
end   


//作为蜂鸣器的输入信号buzzer的声音频率为500hz
always@(posedge clk_1khz)
begin
    if(turn == 1)
         buzzer <= ~buzzer;
    else if(turn == 0)
         buzzer <= 0;
end                                                     
   
//--------------------------------------------------------------------------------------------------  
//附加功能:流水灯,上行状态将LED11---LED7从左到右每隔一秒依次点亮;
//                 下行状态将LED7---LED11从右到左每隔一秒依次点亮 
//定义两个状态位控制流水灯的状态
wire state_up;//用来控制上行流水灯
wire state_dow;//用来控制下行流水灯
//为了防止预期以外的情况出现,这里采用了楼层和按键对应的led灯来共同控制流水灯的状态
assign state_up = (led[1]|led[3])&(lou1&(~lou2));
assign state_dow = (led[0]|led[2])&(lou2&(~lou1));

/*
获得1.05hz的信号(总共5个灯,每隔一秒亮一个)
*/
reg [31:0] temp1 =0;
reg clk_1hz = 0;
always@(posedge clk or negedge state_up or negedge state_dow)
begin
    if(~(state_up|state_dow))
    begin
        temp1 <= 0;
        clk_1hz <= 0;
    end
    else if(state_up | state_dow)
    begin
        if(temp1 == 47619046)
            begin
                temp1 <= 0;
                clk_1hz <= 1;
            end
        else
            begin
                temp1 <= temp1 +1;
                clk_1hz <= 0;
            end
    end
    else
        temp1 <= 0;
end
 
 
//计数器
reg [3:0] cnt1 = 0;
always@(posedge clk_1hz or negedge state_up or negedge state_dow)
begin
     if(~(state_up|state_dow))
    begin
        cnt1 <= 0;
    end
    else if(state_up | state_dow)
    begin
        if(cnt1 == 5)
        cnt1 <= 0;
        else
        cnt1 <= cnt1 + 1;
    end
    else
        cnt1 <= 0;
end
 
always@(posedge clk )
begin
    if(state_up)
    begin
         case(cnt1)
            0 :state_led <= 5'b10000;
            1 :state_led <= 5'b11000;
            2 :state_led <= 5'b11100;
            3 :state_led <= 5'b11110;
            4 :state_led <= 5'b11111;
            default:state_led <= 5'b00000;
         endcase
    end
    else if(state_dow)
    begin
         case(cnt1)
            0 :state_led <= 5'b00001;
            1 :state_led <= 5'b00011;
            2 :state_led <= 5'b00111;
            3 :state_led <= 5'b01111;
            4 :state_led <= 5'b11111;
            default:state_led <= 5'b00000;
         endcase
    end
     else 
            state_led <= 5'b00000;
 
end
  
    
endmodule

//开关消抖部分
 module ajxd(
    input clk,
    input  [3:0] btn_in,
    output [3:0] btn_out,
    input rst_n
    );
 
reg clk_20ms = 0;
reg [31:0] temp = 0;
always@(posedge clk)
begin
    if(rst_n == 0)
    begin
        temp <= 0;
        clk_20ms <= 0;
    end
    else if(temp == 999999)
        begin
            temp <= 0;
            clk_20ms <= 1;
        end
        else if(temp < 999999)
            begin
                clk_20ms <= 0;
                temp <= temp+1;
            end
end    
 
reg [3:0] btn0;
reg [3:0] btn1;
reg [3:0] btn2;
initial
begin
btn0=0;
btn1=0;
btn2=0;
end
 
always@(posedge clk_20ms)
begin
btn0<=btn_in;
btn1<=btn0;
btn2<=btn1;
end
 
assign btn_out=((btn0&btn1)&(~btn2) | (btn0&btn1&btn2) | ((~btn0)&btn1&btn2));
 
endmodule

//计时部分
module count_5(
    input en,    //使能位,即满足这次操作的条件
    input clk,
    input wait1,         //两个等待位,检测是否处于冲突状态
    input wait2,
    output reg flag =0,   //led灯使能信号,表示主灯,即每次操作第一次按下的灯
    output reg key_d,    //按键延迟信号
    output reg status = 0   //计数状态输出:为1计数、为0不计数,表示主灯所对应的状态
    );
    
//等待位,如果该计时器被用于上行计时,那么如果处于下行状态时,计时器就会等待下行状态结束再开始计时 
//这里的两个等待位分别对应了两个上行计数器的状态输出位---status   
reg flag2 = 1;    
always@(posedge clk)
begin
    if(wait1 | wait2)  //情况1:例:按下下行按键后再立刻按下上行按键中的某一个
        flag2 <= 0;    
    else              //情况2:例:只按下下行按键
        flag2 <= 1;              
end        
 
 
//使能位上升沿来临,计数器使能信号置位为1
//作用是记住按键被按下的状态 
//flag1=1表示这个状态仍然成立,不管使能
reg flag1 = 1;
always@(posedge clk)
begin
    if(en == 1)      //若操作满足条件,则主灯亮
        flag <= 1;  
    else if (flag1 == 0)
        flag <= 0;
end
 
//当使能位为1且不处于冲突状态时计时器开始计时,并将输出状态位置位为1
always@(posedge clk)
begin
    if(flag & flag2)
        status <= 1 ;
    else if (flag1 == 0)
        status <= 0;   
end
 
 
//在开始计时的时候获得一个冲激信号
//这个信号被用来模拟按键被按下的动作
reg [31:0] temp1 =0;
reg impluse = 0;
always@(posedge clk)
begin
    if(status == 0)
        begin
            temp1 <= 0;
            impluse <= 0;
        end
    else if(temp1 < 10)
        begin
            temp1 <= temp1 +1;
            impluse <= 1;
        end
    else 
        begin
            temp1 <= temp1+1;
            impluse <= 0;
        end  
end
//key_d = key_delay,是处于冲突状态时有按键被按下的延时信号,即冲突状态结束后模拟一次按键被按下的动作
always@(posedge clk)
begin
    if(impluse)
    key_d = 1;
    else
    key_d = 0;
end
 
 
 
//获得1hz的信号,用来计时
reg [31:0] temp =0;
reg clk_1hz = 0;
always@(posedge clk)
begin
    if(status == 0)
        begin
            temp <= 0;
            clk_1hz <= 0;
        end
    else if(temp == 49999999)
        begin
            temp <= 0;
            clk_1hz <= 1;
        end
    else
        begin
            temp <= temp +1;
            clk_1hz <= 0;
        end
end
 
//开始计时
//计时完成后,计时器状态位复位,使能信号复位,等待下一次按键被按下
reg [2:0] count = 0;
always@(posedge clk_1hz or negedge status)
begin
    if(status == 0)
        begin
            count <=0;
            
            flag1 <= 1;
          
        end
    else if(count == 4 )
        begin
            count <= 0;
            
            flag1 <= 0;
        end
    else
        begin
        count <= count + 1;
        
        flag1 <= 1;
        end
end   
 
endmodule

//数码管显示部分
module seg_scan(
input  clk,
input [6:0] data_seg0,
input [6:0] data_seg1,
output reg [7:0] data_seg,
output reg [5:0] data_dig
);
parameter clk_freq=50000000;//50Mhz
parameter scan_freq=200;//200hz
parameter scan_cont=clk_freq/scan_freq/2-1;
 
reg [31:0] time_cont = 0;
reg  temp = 0;
always@(posedge clk)
begin
            if(time_cont

六、RTL仿真截图

Verilog简易电梯控制系统(2层)_第3张图片

 文件链接:Verilog简易电梯控制系统设计(两层,含附加项蜂鸣器和流水灯)-单片机文档类资源-CSDN下载

七、自己对设计要求完成度的评价:

基础部分

电梯处于1楼,按KEY3,LED3亮,电梯处于上行状态,楼层显示1;运行5秒至2楼后LED3灭,2楼待机。

已完成

电梯处于2楼,按KEY2,LED2亮,电梯处于下行状态,楼层显示2;运行5秒至1楼后LED2灭,1楼待机。

已完成

电梯处于1楼,按KEY1,LED1亮,电梯处于上行状态,楼层显示1;电梯运行至2楼后LED1灭,2楼待机。

已完成

电梯处于2楼,按KEY0,LED0亮,电梯处于下行状态,楼层显示2;运行至1楼后LED0灭,1楼待机。

已完成

电梯处于1楼,按KEY0或KEY2,指示灯均不应该亮,电梯1楼待机。

已完成

电梯处于1楼,按KEY3,LED3亮,电梯处于上行状态时,立刻按 KEY2,LED2亮,电梯继续运行至2楼,LED3灭;然后电梯自动返回1楼待机,LED2灭。

已完成

电梯处于1楼;按KEY3,LED3亮,电梯处于上行状态时,立刻按 KEY0,LED0亮,电梯继续运行至2楼,LED3灭;然后电梯自动返回1楼待机,LED0灭。

已完成

电梯处于1楼,按KEY1或 KEY3,让电梯运行至2楼待机;再按KEY1/ KEY3,指示灯均不应该亮,电梯继续待机。

已完成

电梯处于2楼,按KEY2,LED2亮,电梯处于下行状态时,立刻按 KEY3,LED3亮,电梯继续运行至1楼,LED2灭;然后电梯自动返回2楼待机,LED3灭。

已完成

电梯处于2楼,按KEY2,LED2亮,电梯处于下行状态时,立刻按 KEY1,LED1亮,电梯继续运行至1楼,LED2灭;然后电梯自动返回2楼待机,LED1灭。

已完成

将复位开关SW11拨至下方,电梯运行至1楼(运行时间5S)。

已完成

将启动开关SW0拨至下方,按任意按键均无反应。

已完成

发挥部分

电梯上行时,LED11至LED7五个指示灯从左到右每隔一秒点亮一个;

电梯下行时,LED7至LED11五个指示灯从右到左每隔一秒点亮一个。

已完成

电梯运行到达新楼层时,蜂鸣器发出一声清晰“嘀”声。

已完成

电梯开始上行或下行时,在最左边两个数码管上倒计时显示运行时间4.9~0.0(秒),精度为0.1秒。到达新楼层时显示0.0(秒)。

未完成

电梯上行时,楼层显示数码管前4秒显示1,后1秒显示2;

电梯下行时,楼层显示数码管前4秒显示2,后1秒显示1。

未完成

你可能感兴趣的:(Verilog,课程设计,fpga开发)