FPGA开发（基于Quartus II）万年历，简单代码

已于 2023-11-15 14:54:02 修改
阅读量1.9k 收藏 24
点赞数 9
文章标签： fpga开发
于 2023-11-15 14:47:53 首次发布
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/weixin_48016703/article/details/134419238
版权

设计内容：万年历

   设计一个基于FPGA的电子万年历。设计的主要任务是在Quartus II开发环境中完成电子万年历系统FPGA内部各电路模块的设计，包括各个模块的设计输入、编译、仿真、验证和硬件测试任务。具体要求如下：

  1. 能实现24小时、60分、60秒的基本计时功能，格式为08-56-36：时-分-秒；可以通过按键设置定时和调整时间，并通过数码管显示时间；
  2. 能实现年月日的日期功能，格式为05-16-2018：月-日-年；
  3. 上板复位（拨码键SW0）后从2000年1月1号0时0分0秒开始计时；
  4. 闰年：每400年整一闰，或每4年且不为百年的一闰。即能被400整除，或不能被100整除但能被4整除的年份为闰年；
  5. 平年365天（52周+1天），闰年366天（52周+2天），其中平年2月28天，闰年2月29天。
  6. 拨码键SW1用于选择是日历模式还是时间模式（高电平）；SW2用于决定是时间设置模式（高电平），还是计数模式；SW3用于设置秒，SW4用于设置分，SW5用于设置小时，SW17用于设置天，SW16用于设置月，SW15，SW14, SW13, SW12分别用于设置年的千位、百位、十位、各位，高电平是选中设置状态；
  7. 按键要有防抖功能，按下按键0时任务（6）中的设置位自增1。
  8. 设计思路：计数器记够一秒，秒加一；秒记够59秒且计数器记够1秒，，分钟加1；分钟记够59分且秒记够59秒且计数器记够1秒，小时加1；小时记够23小时且分钟记够59分且秒记够59秒且计数器记够1秒，天加1；当1.3.5.7.8.10.12月时天记够31天且小时记够23小时且分钟记够59分且秒记够59秒且计数器记够1秒，月加1；当4.6.9.11月时天记够30天且小时记够23小时且分钟记够59分且秒记够59秒且计数器记够1秒，月加1；当2月时平年天记够28天且小时记够23小时且分钟记够59分且秒记够59秒且计数器记够1秒，月加1；当月记够12月且天记够31天且小时记够23小时且分钟记够59分且秒记够59秒且计数器记够1秒，年加1。
  9. 注意事项：顶层文件中有两种计数方式，一种是仿真使用，另一种加//的是上板使用（板子时钟频率为50Mkz）

  10. 代码:

  11. 顶层文件：

    module wnl (

    input clk,

    input rst_n,

    input sw1,

    input sw2,

    input sw3,//秒

    input sw4,//分钟

    input sw5,//小时

    input sw6,//年[3:0]最低位

    input sw7,//年[7:4]次低位

    input sw8,//年[11:8]次高位

    input sw9,//年[15:12]最高位

    input sw10,//日

    input sw11,//月

    input key_plus,input key_sub,

    output reg [7:0] s,output reg [7:0] m,

    output reg [7:0] h,output reg [7:0] r,

    output reg [7:0] y,output reg [15:0] n,

    output reg [6:0] data_out1,output reg [6:0] data_out2,

    output reg [6:0] data_out3,output reg [6:0] data_out4,

    output reg [6:0] data_out5,output reg [6:0] data_out6,

    output reg [6:0] data_out7,output reg [6:0] data_out8

    );

    wire up_flag;wire down_flag;

    wire key_plus_flag;wire key_sub_flag;

    wire key_plus_value;wire key_sub_value;

    reg [32:0] cnt;

    assign up_flag = key_plus_flag && (~key_plus_value);

    assign down_flag = key_sub_flag && (~key_sub_value);

    always@(posedge clk or negedge rst_n)begin

    if(!rst_n)begin

    cnt<=32'd0;end

    //else if (cnt <= 32'd49_999_999)begin

    else if(cnt <= 32'd2)begin

    cnt<=cnt+32'd1;end

    else begin

    cnt<=32'd0;end

    end

    always@(posedge clk or negedge rst_n)begin//s

    if(!rst_n)begin

    s<=0;end

    else if(sw2==0)begin

    //if(cnt == 32'd49_999_999)begin

    if(cnt == 32'd2)begin

    if((s[3:0]<9) && (s[7:4]<5))begin

    s[3:0]<=s[3:0]+1;s[7:4]<=s[7:4];end

    else if((s[3:0]==9) && (s[7:4]<5))begin

    s[3:0]<=0;s[7:4]<=s[7:4]+1;end

    else if((s[3:0]<9) && (s[7:4]==5))begin

    s[3:0]<=s[3:0]+1;s[7:4]<=s[7:4];end

    else if((s[3:0]==9) && (s[7:4]==5))begin

    s[3:0]<=0;s[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw3==1)begin

    if(up_flag)begin

    if((s[3:0]<9) && (s[7:4]<5))begin

    s[3:0]<=s[3:0]+1;s[7:4]<=s[7:4];end

    else if((s[3:0]==9) && (s[7:4]<5))begin

    s[3:0]<=0;s[7:4]<=s[7:4]+1;end

    else if((s[3:0]<9) && (s[7:4]==5))begin

    s[3:0]<=s[3:0]+1;s[7:4]<=s[7:4];end

    else if((s[3:0]==9) && (s[7:4]==5))begin

    s[3:0]<=0;s[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw3==0)begin

    s[3:0]<=s[3:0];s[7:4]<=s[7:4];end

    end

    always@(posedge clk or negedge rst_n)begin//m

    if(!rst_n)begin

    m<=0;end

    else if(sw2==0)begin

    //if((s[3:0]==9) && (s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((s[3:0]==9) && (s[7:4]==5) && (cnt == 32'd2))begin

    if((m[3:0]<9) && (m[7:4]<5))begin

    m[3:0]<=m[3:0]+1;m[7:4]<=m[7:4];end

    else if((m[3:0]==9) && (m[7:4]<5))begin

    m[3:0]<=0;m[7:4]<=m[7:4]+1;end

    else if((m[3:0]<9) && (m[7:4]==5))begin

    m[3:0]<=m[3:0]+1;m[7:4]<=m[7:4];end

    else if((m[3:0]==9) && (m[7:4]==5))begin

    m[3:0]<=0;m[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw4==1)begin

    if(up_flag)begin

    if((m[3:0]<9) && (m[7:4]<5))begin

    m[3:0]<=m[3:0]+1;m[7:4]<=m[7:4];end

    else if((m[3:0]==9) && (m[7:4]<5))begin

    m[3:0]<=0;m[7:4]<=m[7:4]+1;end

    else if((m[3:0]<9) && (m[7:4]==5))begin

    m[3:0]<=m[3:0]+1;m[7:4]<=m[7:4];end

    else if((m[3:0]==9) && (m[7:4]==5))begin

    m[3:0]<=0;m[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw4==0)begin

    m[3:0]<=m[3:0];m[7:4]<=m[7:4];end

    end

    always@(posedge clk or negedge rst_n)begin//h

    if(!rst_n)begin

    h<=0;end

    else if(sw2==0)begin

    //if((m[3:0]==9) && (m[7:4]==5) && (s[3:0]==9) && (s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((m[3:0]==9) && (m[7:4]==5) && (s[3:0]==9) && (s[7:4]==5) && (cnt == 32'd2))begin

    if((h[3:0]<9) && (h[7:4]<2))begin

    h[3:0]<=h[3:0]+1;h[7:4]<=h[7:4];end

    else if((h[3:0]==9) && (h[7:4]<2))begin

    h[3:0]<=0;h[7:4]<=h[7:4]+1;end

    else if((h[3:0]<3) && (h[7:4]==2))begin

    h[3:0]<=h[3:0]+1;h[7:4]<=h[7:4];end

    else if((h[3:0]==3) && (h[7:4]==2))begin

    h[3:0]<=0;h[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw5==1)begin

    if(up_flag)begin

    if((h[3:0]<9) && (h[7:4]<2))begin

    h[3:0]<=h[3:0]+1;h[7:4]<=h[7:4];end

    else if((h[3:0]==9) && (h[7:4]<2))begin

    h[3:0]<=0;h[7:4]<=h[7:4]+1;end

    else if((h[3:0]<3) && (h[7:4]==2))begin

    h[3:0]<=h[3:0]+1;h[7:4]<=h[7:4];end

    else if((h[3:0]==3) && (h[7:4]==2))begin

    h[3:0]<=0;h[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw5==0)begin

    h[3:0]<=h[3:0];h[7:4]<=h[7:4];end

    end

    always@(posedge clk or negedge rst_n)begin//r

    if(!rst_n)begin

    r[3:0]<=1;r[7:4]<=0;end

    else if(sw2==0)begin

    //if((h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd42))begin

    if((y[3:0]==1 && y[7:4]==0)|(y[3:0]==3 && y[7:4]==0)|(y[3:0]==5 && y[7:4]==0)|(y[3:0]==7 && y[7:4]==0)|(y[3:0]==8 && y[7:4]==0)|(y[3:0]==0 && y[7:4]==1)|(y[3:0]==2 && y[7:4]==1))begin

    if((r[3:0]<9) && (r[7:4]<3))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<3))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]==1) && (r[7:4]==3))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==4 && y[7:4]==0)|(y[3:0]==6 && y[7:4]==0)|(y[3:0]==9 && y[7:4]==0)|(y[3:0]==1 && y[7:4]==1))begin

    if((r[3:0]<9) && (r[7:4]<3))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<3))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]==0) && (r[7:4]==3))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)==0))begin

    if((r[3:0]<9) && (r[7:4]<2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<2))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]==9) && (r[7:4]==2))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)!=0))begin

    if((r[3:0]<9) && (r[7:4]<2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<2))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]==8) && (r[7:4]==2))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    end

    end

    else if(sw2==1 && sw10==1)begin

    if(up_flag)begin

    if((y[3:0]==1 && y[7:4]==0)|(y[3:0]==3 && y[7:4]==0)|(y[3:0]==5 && y[7:4]==0)|(y[3:0]==7 && y[7:4]==0)|(y[3:0]==8 && y[7:4]==0)|(y[3:0]==0 && y[7:4]==1)|(y[3:0]==2 && y[7:4]==1))begin

    if((r[3:0]<9) && (r[7:4]<3))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<3))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;

    end

    else if((r[3:0]<1) && (r[7:4]==3))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==1) && (r[7:4]==3))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==4 && y[7:4]==0)|(y[3:0]==6 && y[7:4]==0)|(y[3:0]==9 && y[7:4]==0)|(y[3:0]==1 && y[7:4]==1))begin

    if((r[3:0]<9) && (r[7:4]<3))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<3))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]==0) && (r[7:4]==3))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)==0))begin

    if((r[3:0]<9) && (r[7:4]<2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<2))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]<9) && (r[7:4]==2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]==2))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)!=0))begin

    if((r[3:0]<9) && (r[7:4]<2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==9) && (r[7:4]<2))begin

    r[3:0]<=0;r[7:4]<=r[7:4]+1;end

    else if((r[3:0]<8) && (r[7:4]==2))begin

    r[3:0]<=r[3:0]+1;r[7:4]<=r[7:4];end

    else if((r[3:0]==8) && (r[7:4]==2))begin

    r[3:0]<=1;r[7:4]<=0;end

    end

    end

    end

    else if(sw2==1 && sw10==0)begin

    r[3:0]<=r[3:0];r[7:4]<=r[7:4];end

    end

    always@(posedge clk or negedge rst_n)begin//y

    if(!rst_n)begin

    y[3:0]<=1;y[7:4]<=0;end

    else if(sw2==0)begin

    if((y[3:0]==1 && y[7:4]==0)|(y[3:0]==3 && y[7:4]==0)|(y[3:0]==5 && y[7:4]==0)|(y[3:0]==7 && y[7:4]==0)|(y[3:0]==8 && y[7:4]==0)|(y[3:0]==0 && y[7:4]==1))begin

    //if((r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    end

    else if(y[3:0]==2 && y[7:4]==1)begin

    //if((r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    y[3:0]<=1;y[7:4]<=0;end

    end

    else if((y[3:0]==4 && y[7:4]==0)|(y[3:0]==6 && y[7:4]==0)|(y[3:0]==9 && y[7:4]==0)|(y[3:0]==1 && y[7:4]==1))begin

    //if((r[3:0]==0) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((r[3:0]==0) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)==0))begin

    //if((r[3:0]==9) && (r[7:4]==2) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((r[3:0]==9) && (r[7:4]==2) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    end

    else if((y[3:0]==2 && y[7:4]==0) && ((n%4)!=0))begin

    //if((r[3:0]==8) && (r[7:4]==2) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((r[3:0]==8) && (r[7:4]==2) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    end

    end

    else if(sw2==1 && sw11==1)begin

    if(up_flag)begin

    if((y[3:0]<9) && (y[7:4]<1))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    else if((y[3:0]==9) && (y[7:4]<1))begin

    y[3:0]<=0;y[7:4]<=y[7:4]+1;end

    else if((y[3:0]<2) && (y[7:4]==1))begin

    y[3:0]<=y[3:0]+1;y[7:4]<=y[7:4];end

    else if((y[3:0]==2) && (y[7:4]==1))begin

    y[3:0]<=1;y[7:4]<=0;end

    end

    end

    else if(sw2==1 && sw11==0)begin

    y[3:0]<=y[3:0];y[7:4]<=y[7:4];end

    end

    always@(posedge clk or negedge rst_n)begin//n

    if(!rst_n)begin

    n[3:0]<=0;n[7:4]<=0;n[11:8]<=0;n[15:12]<=2;end

    else if(sw2==0)begin

    //if((y[3:0]==2) && (y[7:4]==1) && (r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd49_999_999))begin

    if((y[3:0]==2) && (y[7:4]==1) && (r[3:0]==1) && (r[7:4]==3) && (h[3:0]==3 && h[7:4]==2) && (m[3:0]==9 && m[7:4]==5) && (s[3:0]==9 && s[7:4]==5) && (cnt == 32'd2))begin

    if((n[3:0]<9) && (n[7:4]<9) && (n[11:8]<9) && (n[15:12]<9))begin

    n[3:0]<=n[3:0]+1;n[7:4]<=n[7:4];n[11:8]<=n[11:8];n[15:12]<=n[15:12];end

    else if((n[3:0]==9) && (n[7:4]<9) && (n[11:8]<9) && (n[15:12]<9))begin

    n[3:0]<=0;n[7:4]<=n[7:4]+1;n[11:8]<=n[11:8];n[15:12]<=n[15:12];end

    else if((n[3:0]<9) && (n[7:4]==9) && (n[11:8]<9) && (n[15:12]<9))begin

    n[3:0]<=n[3:0]+1;n[7:4]<=n[7:4];n[11:8]<=n[11:8];n[15:12]<=n[15:12];end

    else if((n[3:0]==9) && (n[7:4]==9) && (n[11:8]<9) && (n[15:12]<9))begin

    n[3:0]<=0;n[7:4]<=0;n[11:8]<=n[11:8]+1;n[15:12]<=n[15:12];end

    else if((n[3:0]<9) && (n[7:4]<9) && (n[11:8]==9) && (n[15:12]<9))begin

    n[3:0]<=n[3:0]+1;n[7:4]<=n[7:4];n[11:8]<=n[11:8];n[15:12]<=n[15:12];end

    else if((n[3:0]==9) && (n[7:4]<9) && (n[11:8]==9) && (n[15:12]<9))begin

    n[3:0]<=0;n[7:4]<=n[7:4]+1;n[11:8]<=n[11:8];n[15:12]<=n[15:12];end

    else if((n[3:0]==9) && (n[7:4]==9) && (n[11:8]==9) && (n[15:12]<9))begin

    n[3:0]<=0;n[7:4]<=0;n[11:8]<=0;n[15:12]<=n[15:12]+1;end

    else if((n[3:0]==9) && (n[7:4]==9) && (n[11:8]==9) && (n[15:12]==9))begin

    n[3:0]<=0;n[7:4]<=0;n[11:8]<=0;n[15:12]<=0;end

    end

    end

    else if((sw2==1) && (sw6==1))begin

    if(up_flag)begin

    if(n[3:0]<9)begin

    n[3:0]<=n[3:0]+1;end

    else if(n[3:0]==9)begin

    n[3:0]<=0;end

    end

    end

    else if((sw2==1) && (sw7==1))begin

    if(up_flag)begin

    if(n[7:4]<9)begin

    n[7:4]<=n[7:4]+1;end

    else if(n[7:4]==9)begin

    n[7:4]<=0;end

    end

    end

    else if((sw2==1) && (sw8==1))begin

    if(up_flag)begin

    if(n[11:8]<9)begin

    n[11:8]<=n[11:8]+1;end

    else if(n[11:8]==9)begin

    n[11:8]<=0;end

    end

    end

    else if((sw2==1) && (sw9==1))begin

    if(up_flag)begin

    if(n[15:12]<9)begin

    n[15:12]<=n[15:12]+1;end

    else if(n[15:12]==9)begin

    n[15:12]<=0;end

    end

    end

    end

    always @(s[3:0] or n[3:0] or sw1)begin

    data_out1=7'b11111111;

    if(sw1==0)begin

    case (s[3:0])

    4'b0000: data_out1 = 7'b1000000; 4'b0001: data_out1 = 7'b1111001;

    4'b0010: data_out1 = 7'b0100100;4'b0011: data_out1 = 7'b0110000;

    4'b0100: data_out1 = 7'b0011001;4'b0101: data_out1 = 7'b0010010;

    4'b0110: data_out1 = 7'b0000010;4'b0111: data_out1 = 7'b1111000;

    4'b1000: data_out1 = 7'b0000000;4'b1001: data_out1 = 7'b0010000;

    default: data_out1 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (n[3:0])

    4'b0000: data_out1 = 7'b1000000;4'b0001: data_out1 = 7'b1111001;

    4'b0010: data_out1 = 7'b0100100;4'b0011: data_out1 = 7'b0110000;

    4'b0100: data_out1 = 7'b0011001;4'b0101: data_out1 = 7'b0010010;

    4'b0110: data_out1 = 7'b0000010;4'b0111: data_out1 = 7'b1111000;

    4'b1000: data_out1 = 7'b0000000;4'b1001: data_out1 = 7'b0010000;

    default: data_out1 = 7'b1111111;

    endcase

    end

    end

    always @(s[7:4] or n[7:4] or sw1)begin

    data_out2=7'b11111111;

    if(sw1==0)begin

    case (s[7:4])

    4'b0000: data_out2 = 7'b1000000;4'b0001: data_out2 = 7'b1111001;

    4'b0010: data_out2 = 7'b0100100;4'b0011: data_out2 = 7'b0110000;

    4'b0100: data_out2 = 7'b0011001;4'b0101: data_out2 = 7'b0010010;

    4'b0110: data_out2 = 7'b0000010;4'b0111: data_out2 = 7'b1111000;

    4'b1000: data_out2 = 7'b0000000;4'b1001: data_out2 = 7'b0010000;

    default: data_out2 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (n[7:4])

    4'b0000: data_out2 = 7'b1000000;4'b0001: data_out2 = 7'b1111001;

    4'b0010: data_out2 = 7'b0100100;4'b0011: data_out2 = 7'b0110000;

    4'b0100: data_out2 = 7'b0011001;4'b0101: data_out2 = 7'b0010010;

    4'b0110: data_out2 = 7'b0000010;4'b0111: data_out2 = 7'b1111000;

    4'b1000: data_out2 = 7'b0000000;4'b1001: data_out2 = 7'b0010000;

    default: data_out2 = 7'b1111111;

    endcase

    end

    end

    always @(m[3:0] or n[11:8] or sw1)begin

    data_out3=7'b11111111;

    if(sw1==0)begin

    case (m[3:0])

    4'b0000: data_out3 = 7'b1000000;4'b0001: data_out3 = 7'b1111001;

    4'b0010: data_out3 = 7'b0100100;4'b0011: data_out3 = 7'b0110000;

    4'b0100: data_out3 = 7'b0011001;4'b0101: data_out3 = 7'b0010010;

    4'b0110: data_out3 = 7'b0000010;4'b0111: data_out3 = 7'b1111000;

    4'b1000: data_out3 = 7'b0000000;4'b1001: data_out3 = 7'b0010000;

    default: data_out3 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (n[11:8])

    4'b0000: data_out3 = 7'b1000000;4'b0001: data_out3 = 7'b1111001;

    4'b0010: data_out3 = 7'b0100100;4'b0011: data_out3 = 7'b0110000;

    4'b0100: data_out3 = 7'b0011001;4'b0101: data_out3 = 7'b0010010;

    4'b0110: data_out3 = 7'b0000010;4'b0111: data_out3 = 7'b1111000;

    4'b1000: data_out3 = 7'b0000000;4'b1001: data_out3 = 7'b0010000;

    default: data_out3 = 7'b1111111;

    endcase

    end

    end

    always @(m[7:4] or n[15:12] or sw1)begin

    data_out4=7'b11111111;

    if(sw1==0)begin

    case (m[7:4])

    4'b0000: data_out4 = 7'b1000000;4'b0001: data_out4 = 7'b1111001;

    4'b0010: data_out4 = 7'b0100100;4'b0011: data_out4 = 7'b0110000;

    4'b0100: data_out4 = 7'b0011001;4'b0101: data_out4 = 7'b0010010;

    4'b0110: data_out4 = 7'b0000010;4'b0111: data_out4 = 7'b1111000;

    4'b1000: data_out4 = 7'b0000000;4'b1001: data_out4 = 7'b0010000;

    default: data_out4 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (n[15:12])

    4'b0000: data_out4 = 7'b1000000;4'b0001: data_out4 = 7'b1111001;

    4'b0010: data_out4 = 7'b0100100;4'b0011: data_out4 = 7'b0110000;

    4'b0100: data_out4 = 7'b0011001;4'b0101: data_out4 = 7'b0010010;

    4'b0110: data_out4 = 7'b0000010;4'b0111: data_out4 = 7'b1111000;

    4'b1000: data_out4 = 7'b0000000;4'b1001: data_out4 = 7'b0010000;

    default: data_out4 = 7'b1111111;

    endcase

    end

    end

    always @(h[3:0] or r[3:0] or sw1)begin

    data_out5=7'b11111111;

    if(sw1==0)begin

    case (h[3:0])

    4'b0000: data_out5 = 7'b1000000;4'b0001: data_out5 = 7'b1111001;

    4'b0010: data_out5 = 7'b0100100;4'b0011: data_out5 = 7'b0110000;

    4'b0100: data_out5 = 7'b0011001;4'b0101: data_out5 = 7'b0010010;

    4'b0110: data_out5 = 7'b0000010;4'b0111: data_out5 = 7'b1111000;

    4'b1000: data_out5 = 7'b0000000;4'b1001: data_out5 = 7'b0010000;

    default: data_out5 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (r[3:0])

    4'b0000: data_out5 = 7'b1000000;4'b0001: data_out5 = 7'b1111001;

    4'b0010: data_out5 = 7'b0100100;4'b0011: data_out5 = 7'b0110000;

    4'b0100: data_out5 = 7'b0011001;4'b0101: data_out5 = 7'b0010010;

    4'b0110: data_out5 = 7'b0000010;4'b0111: data_out5 = 7'b1111000;

    4'b1000: data_out5 = 7'b0000000;4'b1001: data_out5 = 7'b0010000;

    default: data_out5 = 7'b1111111;

    endcase

    end

    end

    always @(h[7:4] or r[7:4] or sw1)begin

    data_out6=7'b11111111;

    if(sw1==0)begin

    case (h[7:4])

    4'b0000: data_out6 = 7'b1000000;4'b0001: data_out6 = 7'b1111001;

    4'b0010: data_out6 = 7'b0100100;4'b0011: data_out6 = 7'b0110000;

    4'b0100: data_out6 = 7'b0011001;4'b0101: data_out6 = 7'b0010010;

    4'b0110: data_out6 = 7'b0000010;4'b0111: data_out6 = 7'b1111000;

    4'b1000: data_out6 = 7'b0000000;4'b1001: data_out6 = 7'b0010000;

    default: data_out6 = 7'b1111111;

    endcase

    end

    else if(sw1==1)begin

    case (r[7:4])

    4'b0000: data_out6 = 7'b1000000;4'b0001: data_out6 = 7'b1111001;

    4'b0010: data_out6 = 7'b0100100;4'b0011: data_out6 = 7'b0110000;

    4'b0100: data_out6 = 7'b0011001;4'b0101: data_out6 = 7'b0010010;

    4'b0110: data_out6 = 7'b0000010;4'b0111: data_out6 = 7'b1111000;

    4'b1000: data_out6 = 7'b0000000;4'b1001: data_out6 = 7'b0010000;

    default: data_out6 = 7'b1111111;

    endcase

    end

    end

    always @(y[3:0] or sw1)begin

    data_out7=7'b11111111;

    if(sw1==1)begin

    case (y[3:0])

    4'b0000: data_out7 = 7'b1000000;4'b0001: data_out7 = 7'b1111001;

    4'b0010: data_out7 = 7'b0100100;4'b0011: data_out7 = 7'b0110000;

    4'b0100: data_out7 = 7'b0011001;4'b0101: data_out7 = 7'b0010010;

    4'b0110: data_out7 = 7'b0000010;4'b0111: data_out7 = 7'b1111000;

    4'b1000: data_out7 = 7'b0000000;4'b1001: data_out7 = 7'b0010000;

    default: data_out7 = 7'b1111111;

    endcase

    end

    end

    always @(y[7:4] or sw1)begin

    data_out8=7'b11111111;

    if(sw1==1)begin

    case (y[7:4])

    4'b0000: data_out8 = 7'b1000000;4'b0001: data_out8 = 7'b1111001;

    4'b0010: data_out8 = 7'b0100100;4'b0011: data_out8 = 7'b0110000;

    4'b0100: data_out8 = 7'b0011001;4'b0101: data_out8 = 7'b0010010;

    4'b0110: data_out8 = 7'b0000010;4'b0111: data_out8 = 7'b1111000;

    4'b1000: data_out8 = 7'b0000000;4'b1001: data_out8 = 7'b0010000;

    default: data_out8 = 7'b1111111;

    endcase

    end

    end

    key_debounce u1_key_debounce(

        .sys_clk        (clk),

        .sys_rst_n      (rst_n),

        .key            (key_plus),

        .key_flag       (key_plus_flag),

        .key_value      (key_plus_value)

        );

    key_debounce u2_key_debounce(

        .sys_clk        (clk),

        .sys_rst_n      (rst_n),

        .key            (key_sub),

        .key_flag       (key_sub_flag),

        .key_value      (key_sub_value)

        );

    endmodule

    按键消抖：

    //***************************************************************************//

    module key_debounce(

    input sys_clk,          //外部50M时钟

    input sys_rst_n,        //外部复位信号，低有效

    input key,              //外部按键输入

    output reg key_flag,         //按键数据有效信号

    output reg key_value         //按键消抖后的数据  

    );   

    reg [31:0] delay_cnt;reg key_reg;

    always @(posedge sys_clk or negedge sys_rst_n) begin

    if (!sys_rst_n) begin

    key_reg   <= 1'b1;delay_cnt <= 32'd0;end

    else begin

    key_reg <= key;

    if(key_reg != key)begin      //一旦检测到按键状态发生变化(有按键被按下或释放)     

    delay_cnt <= 32'd1000000; //给延时计数器重新装载初始值（计数时间为20ms）   

    //delay_cnt <= 32'd10; //给延时计数器重新装载初始值（计数时间为20ms）//仿真时改为10

    end

    else if(key_reg == key) begin  //在按键状态稳定时，计数器递减，开始20ms倒计时

    if(delay_cnt > 32'd0)begin

    delay_cnt <= delay_cnt - 1'b1;end

    else begin

    delay_cnt <= delay_cnt;end

    end

    end

    end

    always @(posedge sys_clk or negedge sys_rst_n) begin

    if (!sys_rst_n) begin

    key_flag  <= 1'b0;key_value <= 1'b1;end

    else begin

    if(delay_cnt == 32'd1) begin   //当计数器递减到1时，说明按键稳定状态维持了20ms

    key_flag  <= 1'b1;         //此时消抖过程结束，给出一个时钟周期的标志信号

    key_value <= key;          //并寄存此时按键的值

    end

    else begin

    key_flag  <= 1'b0;key_value <= key_value;end

    end

    end

    endmodule

    仿真代码：

    `timescale 1ns/1ns

    module tb;

    reg clk;reg rst_n;

    reg sw2;reg sw3;

    reg sw4;reg sw5;

    reg sw6;reg sw7;

    reg sw8;reg sw9;

    reg sw10;reg sw11;

    reg key_plus;reg key_sub;

    reg [4:0] i;wire [7:0] s;

    wire [7:0] m;wire [7:0] h;

    wire [7:0] r;wire [7:0] y;

    wire [15:0] n;

    initial begin

    i=0;clk=0;

    rst_n=1;key_plus=1;

    key_sub=1;

    #20

    rst_n=0;

    #20

    rst_n=1;

    #20

    sw2=1;

    #20

    sw3=1;

    #20

    sw3=0;sw4=1;

    #20

    sw4=0;sw5=1;

    #20

    sw5=0;sw6=1;

    #20

    sw6=0;sw7=1;

    #20

    sw7=0;sw8=1;

    #20

    sw8=0;sw9=1;

    #20

    sw9=0;sw10=1;

    #20

    sw10=0;sw11=1;

    #20

    sw11=0;

    #20

    sw2=0;

    repeat(3)begin

    key_plus=1;

    for(i=0;i<10;i=i+1)

    #20

    key_plus=~key_plus;key_plus=0;

    #1000

    key_plus=1;

    for(i=0;i<10;i=i+1)

    #20

    key_plus=~key_plus;key_plus=1;

    end

    #1000

    key_sub=1;

    repeat(3)begin

    for(i=0;i<10;i=i+1)

    #20

    key_sub=~key_sub;key_sub=0;

    #1000

    key_sub=1;

    for(i=0;i<10;i=i+1)

    #20

    key_sub=~key_sub;key_sub=1;

    #1000

    key_sub=0;end

    #10000

    $stop;

    end

    always #10 clk=~clk;

    wnl u1(

    .clk(clk),

    .rst_n(rst_n),

    .s(s),

    .m(m),

    .h(h),

    .r(r),

    .y(y),

    .n(n),

    .key_plus(key_plus),

    .key_sub(key_sub),

    .sw2(sw2),

    .sw3(sw3),//s

    .sw4(sw4),//m

    .sw5(sw5),//h

    .sw6(sw6),//n[3:0]

    .sw7(sw7),//n[7:4]

    .sw8(sw8),//n[11:8]

    .sw9(sw9),//n[15:12]

    .sw10(sw10),//r

    .sw11(sw11)//y

    );

    endmodule

  12. 实验结果：

  • 实验时间为2021年12月21日18时42分12秒
摇头晃脑小猪头
关注
  • 9
    点赞
  • 踩
  • 24
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
verilog设计万年历带实验报告
QQ_778132974的博客
05-18 3736
FPGA对万年历的课程设计（完整代码+完整报告+题目要求） 下面有截图： FPGA万年历课程设计参考资料，内部含有完整代码和课程设计完整报告和具体的题目要求指标。该万年历实现的功能有日期（年月日）、时间（时分秒）的走时，区分闰年与平年。另外还有闹钟功能。按键调整设置日期、时间和闹钟。当选中需要调整的内容时，数码管闪烁。其它具体要求见内部的题目具体要求。 ...
基于FPGA设计的万年历数字时钟课程设计Quartus工程源码+设计报告文档资料.zip
01-17
基于FPGA设计的万年历数字时钟课程设计Quartus工程源码+设计报告文档资料,可以做为你的学习设计参考。 系统总体设计 2.1.1 系统功能介绍 本次万年历实现的功能有： （1）年月日、时分秒的走时、设置及其显示。 （2）闹钟功能、闹钟设置及其闹钟设置显示。 2.1.2 系统硬件介绍 本次万年历设计使用的硬件资源有：6个数码管、三个微动开关、两个拨码开关和两个LED灯。 其中，6个数码管选择显示年月日、时分秒及其闹钟设置的时分秒。三个按键分别为翻页按键（选择数码管显示内容）、选择按键（选择需调整的内容）、加一按键（调整的内容加一），用于翻页和时间及其闹钟的设置。两个拨码开关分别为闹钟使能开关和复位开关，用于闹钟的打开及其关闭和将整个系统复位。两个LED灯分别为闹钟开关状态和闹钟标志（代替蜂鸣器）。 2.1.3 系统总体框图介绍 整个系统采用自顶向下的设计方法，从系统的总体功能出发，将整个系统划分为多个模块，然后再将各个模块划分为多个功能部分，编程完成后将各个部分联系起来组成整个系统。 module calendar(system_clk,reset,key_turn,key_switch,key_add,switch_alarm,led,beep,hex0,hex1,hex2,hex3,hex4,hex5); input system_clk,reset,key_turn,key_switch,key_add,switch_alarm;//系统时钟、复位、三个按键和一个拨码开关 output led,beep; //LED灯和蜂鸣器 output [6:0] hex0; //输出：数码管0 output [6:0] hex1; //输出：数码管1 output [6:0] hex2; //输出：数码管2 output [6:0] hex3; //输出：数码管3 output [6:0] hex4; //输出：数码管4 output [6:0] hex5; //输出：数码管5 wire second_add,minute_add,hour_add,day_add,month_add,year_add,alarm_second_add,alarm_minute_add,alarm_hour_add; //专属增一信号 wire [1:0] flag_turn; //翻页状态信号 wire [1:0] flag_switch; //闪烁数码管选择信号 wire select_sign; //选择状态 wire [5:0] second; //秒 wire [5:0] minute; //分 wire [4:0] hour; //小时 wire [4:0] day; //日 wire [3:0] month; //月 wire [6:0] year; //年 wire [5:0] alarm_second; //闹钟秒 wire [5:0] alarm_minute; //闹钟分 wire [4:0] alarm_hour; //闹钟小时 //例化按键模块 key_drive_module use_key_drive_module( .system_clk (system_clk), .reset (reset), .key_turn (key_turn), .key_switch (key_switch), .key_add (key_add), .flag_switch (flag_switch), .flag_turn (flag_turn), .second_add (second_add), .minute_add (minute_add), .hour_add (hour_add), .day_add (day_add), .month_add (month_add), .year_add (year_add), .alarm_second_add (alarm_second_add), .alarm_minute_add (alarm_minute_add), .alarm_hour_add (alarm_hour_add), .select_sign (select_sign) ); //例化时钟模块 clock
基于FPGA的电子万年历显示年月日设计Verilog代码VIVADO仿真
最新发布
xiakunpei123的博客
06-07 1001
电子万年历显示年月日
基于FPGA的万年历
QQ1391074994的博客
04-25 3713
CASE_02 基于FPGA的数字钟万年历
比特电子工作室
07-11 6348
1 简介 本数字钟实则是数字钟万年历，具备以下功能： （1）数码管可显示：时分秒，年月日，闹钟时间； （2）可实现时分秒、年月日、闹钟时间的任意设定； （3）自动实现大小月与闰年的判断； 2 数字钟计数方案 2.1计数方案一 计数方案一，如图： 该计数方案，比较符合人类思维对时间的认知，在FPGA逻辑也比较好实现，对年月日时分秒的逻辑都一样好实现，尤其是在月份的大小的判断计数和闰年的判断都好处理；但是存在一个致命的缺点，产生的结果不能直...
基于FPGA的电子万年历设计
FPGA/MATLAB学习教程/源码/项目合作开发
06-14 7297
quartusii12.1系统的整个结构框图： 然后，设置控制输入有5个脚，分析功能如下所示：i_Function_Controller=0；显示年月日i_sel：选择需要调整的某位数字。i_set：计数器，调整需要调整的位置的数字。具体调整的时候，首先选择i_sel，按键按一下，需要调整的位置会移动一次，然后移动到需要调整的位置上，然后松开i_sel，然后按下i_set，调整显示的数字。i_run：不使用i_Function_Controller=1；显示时间，小时，分，秒i_sel：i_set：i_ru
基于FPGA的数字时钟显示（万年历lcd1602）
热门推荐
参宿七的博客
02-28 1万+
一、  lcd1602a的驱动和配置（1）  lcd1602a的管脚分配图，在程序中，我们需要对相应的管脚进行操作，才能使其正确显示（2） 由于我使用的板子EP4CE6上的晶振是50MHZ，而lcd1602a所需要的晶振是500HZ，所以我们要想驱动他，首先要产生一个500HZ的时钟，所以我定义了如下lcd时钟代码：always@(posedge clk)//获得LCD时钟 begin coun...
基于FPGA的万年历实验
01-09
**Quartus II**是Altera公司（现Intel公司）开发的一款强大的FPGA设计工具，集成了项目管理、设计输入、编译、仿真、适配、编程和调试等功能。在实验中，我们需要使用Quartus II创建工程，导入Verilog源代码，进行...
niosII.zip_NIOSII_fpga万年历
09-24
在"基于niosII万年历C代码"这个文件中，我们可以期待找到实现这些功能的源代码。这些代码可能包括初始化设置、时钟处理函数、状态机逻辑、中断处理程序以及与硬件交互的I/O操作。通过阅读和分析这些代码，开发者和...
基于FPGA的数字万年历
01-02
总之，基于FPGA的数字万年历设计展示了硬件描述语言VHDL在数字系统设计中的应用，以及如何在Quartus ii环境下进行FPGA开发。通过这个项目，学生或工程师不仅可以掌握FPGA设计基础，还能深入了解日期和时间处理的逻辑...
基于fpga的万年历设计，新版AX301开发板源码
04-25
在标签中提到的“软件/插件”可能指的是FPGA设计工具，例如Xilinx的Vivado或Altera的Quartus II。这些软件提供了图形化界面和硬件描述语言（HDL，如VHDL或Verilog）的支持，帮助开发者编写、仿真、综合和配置FPGA。...
Verilog实现闰年的判断(ISE8.21中调试通过
11-30
Verilog实现闰年的判断(ISE8.21中调试通过
基于FPGA的数字钟万年历 第二部分：Clock_Verilog.part2.rar
07-11
基于FPGA的数字钟万年历Verilog资料合集，包含源码工程、仿真工程、视频教程、原理图PCB图，是FPGA经典案例系列博客的其中资源之一，系列博客地址：https://blog.csdn.net/qq_33486907/article/details/118653742 欢迎浏览。 由于资源过大超过CSDN 1000M的限制，所以此资源为压缩卷第二卷，第一卷地址为：https://download.csdn.net/download/qq_33486907/20203102 两卷要放在同一个文件夹下才能解压成功。
万年历.zip_FPGA verilog_fpga 万年历_fpga万年历_万年历
07-14
基于FPGA的数码管显示，万年历，包括时分秒年月日的现实
FPGA万年历课程设计（完整代码+完整报告+题目要求）
02-05
大学生FPGA万年历课程设计参考资料，内部含有完整代码和课程设计完整报告和具体的题目要求指标。该万年历实现的功能有日期（年月日）、时间（时分秒）的走时，区分闰年与平年。另外还有闹钟功能。按键调整设置日期、时间和闹钟。当选中需要调整的内容时，数码管闪烁。其它具体要求见内部的题目具体要求。
万年历1_基于VHDL的万年历设计_VHDL万年历_journeysuw_万年历vhdl_
10-01
【万年历1_基于VHDL的万年历设计_VHDL万年历_journeysuw_万年历vhdl_】这个项目是关于利用VHDL语言设计一款能够显示时分秒、日月年信息的万年历。VHDL（Very High Speed Integrated Circuit Hardware Description ...
万年历设计DE1-SOC开发板年月日时分秒显示verilog代码下载
diaojiangxue的博客
11-01 206
名称：万年历设计DE1-SOC开发板年月日时分秒显示（代码在文末下载）软件：Quartus II语言：Verilog代码功能：万年历要求1、实现万年历功能，可以显示年月日，时分秒2、支持按键调整时间，年月日，时分秒均可调整3、使用按键切换年月日和时分秒的显示本代码已在DE1-SOC开发板验证，开发板如下，其他开发板可以通过修改管脚适配：演示视频：FPGA代码Verilog/VHDL代码资源下载：w。. month_minute_key(month_minute_key),//月调整信号、分钟调整信号。
FPGA实现万年历
weixin_52339868的博客
02-05 963
文章模拟了万年历的实现
FPGA项目（12）——基于FPGA的万年历设计
guangali的博客
06-23 6302
基于FPGA的万年历，可以显示年月日时分秒，有闹钟功能。
"从简单到复杂：FPGA开发软件Quartus II完整指南，适合新手入门
FPGA开发软件Quartus II是Intel公司提供的一款综合开发环境，适用于可编程片上系统（SOPC）设计。该软件集成了系统级设计、嵌入式软件开发、可编程逻辑器件设计、综合、布局和布线、验证和仿真等功能，为FPGA新手...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值