// --------小時、分鐘和秒計時子模塊 --------//
// 采用同步時鐘計時，此程序是按秒、分、小時計時的
module time1(clk,reset,start,reg1,reg2,reg3,reg4,reg5,reg6);
  input clk,reset,start;
  output[3:0] reg1,reg2,reg3,reg4,reg5,reg6; 
  reg[3:0] reg1,reg2,reg3,reg4,reg5,reg6; 

  reg[7:0] sec,min,hour;   //不必采用re1~reg6，可直接將sec,min,hour作為輸出信號
  reg started;
  always @(posedge clk or posedge reset or posedge start)
    begin
       if(reset)                    // 復位
         begin
         sec<=0;min<=0;hour<=0;reg1<=0;started<=0;
         reg2<=0;reg3<=0;reg4<=0;reg5<=0;reg6<=0;
         end
       else if(start) started<=1; 
       if(started)               // 若已開始計數
         begin
           if(sec[3:0]==9)                      // ------（1）秒計時
             begin                //若秒個位為9
               sec[3:0]<=0;
               sec[7:4]<=sec[7:4]+1;
             end
           else sec[3:0]<=sec[3:0]+1;            
           if(sec==8'h59)        // 若計到59s
             begin
               sec[7:0]<=0;
               min[3:0]<=min[3:0]+1;
             end
              
           if(min[3:0]==9)                       // ------（2）分計時   
             begin                 // 若分低位為9
               if(sec==8'h59 )     // 若計到59s
                 begin 
                   min[3:0]<=0;
                   min[7:4]<=min[7:4]+1;
                 end
             end
                         
           if(min==8'h59)          // 若計到59分
             begin 
               if( sec==8'h59)     // 且計到59s
                 begin
                   sec[7:0]<=0; 
                   min[7:0]<=0;
                   if(hour[7:0]==8'h23)        // ------（3）小時計時
                     hour[7:0]<=0;                     
                   else if(hour[3:0]==9)
                     begin
                       hour[3:0]<=0;
                       hour[7:4]<=hour[7:4]+1;                     
                     end
                   else hour[3:0]<=hour[3:0]+1;
                 end
             end                
              
           reg1[3:0]<=hour[7:4];
           reg2[3:0]<=hour[3:0];
           reg3[3:0]<=min[7:4];
           reg4[3:0]<=min[3:0];
           reg5[3:0]<=sec[7:4];
           reg6[3:0]<=sec[3:0];  
         end
    end      
endmodule