【代码】verilog之：电子钟

功能：显示时分秒，能够设置时间。

实现：两个按键，一个进入设置，一个加数字。显示用LCD5110

用状态机实现，总共四种状态

　　idle（正常运行）——s_hour（时设置状态）——s_min（分设置状态）——s_sec（秒设置状态）

　　四种状态用set键循环切换，add键在后三种状态中可以对值进行加1操作。

代码如下，此处按键输入为消抖后的

需要注意的是时间运行时的判断阈值和按键设置时的判断阈值不同

 /*--------------------------------------------------------------------------------------
 -- Filename ﹕ lcd5110.v
 -- Author ﹕ZRtech
 -- Description ﹕5110显示字符
 -- Called by ﹕Top module
 -- Revision History ﹕10-5-20
 -- Revision 1.0
 -- Company ﹕ ZRtech Technology .Inc
 -- Copyright(c) 2010, ZRtech Technology Inc, All right reserved
 ---------------------------------------------------------------------------------------*/
 module time_module
 (
     CLK,RSTn,keyset,keyadd,hour1,hour2,min1,min2,sec1,sec2,kstate,CLK2HZ
 );
     input CLK;
     input RSTn;
     input keyset;
     input keyadd;
     output reg[:]hour1;
     output reg[:]hour2;
     output reg[:]min1;
     output reg[:]min2;
     output reg[:]sec1;
     output reg[:]sec2;
     output [:]kstate;
     output reg CLK2HZ;

 //****************************************************
     reg [:]cnt;//分频计数器
     reg CLK1HZ;//分频时钟
     reg s_hour_cnt;//小时计数进位状态

     reg[:] p;  //状态机定义
     //reg[2:0] p_back; //状态返回

     parameter idle='d0;//状态值定义
     parameter s_hour='d1;
     parameter s_minute='d2;
     parameter s_second='d3;

     assign kstate=p;

     always@(posedge CLK ) //时钟分频
     begin
         if(!RSTn)
             cnt<=;
         else if(cnt=='d24_999_999)   //产生1Hz时钟脉冲
                 begin
                 cnt<=;
                 CLK1HZ<=;
                 CLK2HZ<=~CLK2HZ;//2hz时钟输出
                 //min1<=0;
                 end
             else begin
                 cnt<=cnt+;
                 CLK1HZ<=;
                 //min1<=min1+1;
                 end
     end

     always@(posedge CLK )//状态机切换
     begin
         if(!RSTn)
         p<=idle;
         else
         case (p)
         idle: begin
                     if (keyset)
                     p<=s_hour;  //next设置小时
                     else p<=idle;
                     /***************************************/
                     case(s_hour_cnt)//小时计数
                     :    begin
                         if(hour1==)//10进位情况
                             begin
                             s_hour_cnt<=;
                             end
                         if(hour2 ==)
                             begin
                             hour2<=;
                             hour1<=hour1+;
                             end
                         //else hour2<=hour2+1;
                         end
                     :    if(hour2==)
                             begin
                             s_hour_cnt<=;//4进位情况
                             hour1<=;
                             hour2<=;
                             end
                     endcase
                     /***************************************/
                     if(min1==)        //分钟计数
                         begin
                         min1<=;
                         hour2<=hour2+;
                         end
                     else if(min2==)
                         begin
                         min1<=min1+;
                         min2<=;
                         end

                     /***************************************/
                     if(sec1==)        //秒计数
                         begin
                         sec1<=;
                         min2<=min2+;
                         end
                     else if(sec2==)
                         begin
                         sec1<=sec1+;
                         sec2<=;
                         end
                     else if(CLK1HZ)//每秒加一
                         sec2<=sec2+;
             end
         s_hour:
             begin
                    if (keyset)
                    p<=s_minute;  //next设置分钟
                    else p<=s_hour;
                    /***************************************/
                    if(keyadd)    //小时数值按键设定
                    begin
                         case(s_hour_cnt)//小时计数
                         :    begin
                             if(hour1==)//10进位情况
                                 begin
                                 s_hour_cnt<=;
                                 end
                             if(hour2 ==)
                                 begin
                                 hour2<=;
                                 hour1<=hour1+;
                                 end
                             else hour2<=hour2+;
                             end
                         :    if(hour2==)
                                 begin
                                 s_hour_cnt<=;//4进位情况
                                 hour1<=;
                                 hour2<=;
                                 end
                             else hour2<=hour2+;
                         endcase
                    end
             end
         s_minute:
             begin
                    if (keyset)
                    p<=s_second;  //next设置秒
                    else p<=s_minute;

                    if(keyadd)    //分钟数值按键设定
                    begin
                        if(min1== && min2==)        //分钟计数
                             begin
                             min1<=;
                             min2<=;
                             hour2<=hour2+;
                             end
                         else if(min2==)
                             begin
                             min1<=min1+;
                             min2<=;
                             end
                         else min2<=min2+;
                    end
             end
         s_second:begin
                        if (keyset)
                        p<=idle;  //next返回正常显示
                        else p<=s_second;

                        if(keyadd)    //秒数值按键设定
                        begin
                             if(sec1== && sec2==)        //秒计数
                                 begin
                                 sec1<=;
                                 min2<=min2+;
                                 end
                             else if(sec2==)
                                 begin
                                 sec1<=sec1+;
                                 sec2<=;
                                 end
                             else sec2<=sec2+;
                        end
                 end

         endcase
     end 

 endmodule