model4.v

一个圣诞彩灯控制芯片的vrilog源代码

module model4(l1,l2,l3,l4,c,clk,reset,en);
    output [1:0] l1,l2,l3,l4;
    output c;
    input clk,reset,en;
    reg [1:0] l1,l2,l3,l4;
    reg c;
    reg [5:0] i;
       
   // initial
   //     begin
   //         i=0;
   //         l1=0;
   //         l2=0;
   //         l3=0;
   //         l4=0;
   //     end    
    
    always@(posedge clk or negedge reset)
    begin
     if(reset==1'b0)
       begin
        i<=6'b000000;
        l1<=2'b00;
        l2<=2'b00;
        l3<=2'b00;
        l4<=2'b00;
        c<=1'b0;
       end    
     else if(en==1'b1)
            begin
              case(i)
                6'd0:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd1:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd2:begin l1<=2'b11;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end
                6'd3:begin l1<=2'b11;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end  
                6'd4:begin l1<=2'b01;l2<=2'b01;l3<=2'b00;l4<=2'b00;c<=1'b0;end
                6'd5:begin l1<=2'b01;l2<=2'b01;l3<=2'b00;l4<=2'b00;c<=1'b0;end
                6'd6:begin l1<=2'b00;l2<=2'b11;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd7:begin l1<=2'b00;l2<=2'b11;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd8:begin l1<=2'b00;l2<=2'b01;l3<=2'b01;l4<=2'b00;c<=1'b0;end
                6'd9:begin l1<=2'b00;l2<=2'b01;l3<=2'b01;l4<=2'b00;c<=1'b0;end  
                6'd10:begin l1<=2'b00;l2<=2'b00;l3<=2'b11;l4<=2'b00;c<=1'b0;end 
                6'd11:begin l1<=2'b00;l2<=2'b00;l3<=2'b11;l4<=2'b00;c<=1'b0;end  
                6'd12:begin l1<=2'b00;l2<=2'b00;l3<=2'b01;l4<=2'b01;c<=1'b0;end 
                6'd13:begin l1<=2'b00;l2<=2'b00;l3<=2'b01;l4<=2'b01;c<=1'b0;end        
                6'd14:begin l1<=2'b00;l2<=2'b00;l3<=2'b00;l4<=2'b11;c<=1'b0;end 
                6'd15:begin l1<=2'b00;l2<=2'b00;l3<=2'b00;l4<=2'b11;c<=1'b0;end             
                6'd16:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b01;c<=1'b0;end 
                6'd17:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b01;c<=1'b0;end
                6'd18:begin l1<=2'b11;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd19:begin l1<=2'b01;l2<=2'b01;l3<=2'b00;l4<=2'b00;c<=1'b0;end
                6'd20:begin l1<=2'b00;l2<=2'b11;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd21:begin l1<=2'b00;l2<=2'b01;l3<=2'b01;l4<=2'b00;c<=1'b0;end 
                6'd22:begin l1<=2'b00;l2<=2'b00;l3<=2'b11;l4<=2'b00;c<=1'b0;end  
                6'd23:begin l1<=2'b00;l2<=2'b00;l3<=2'b01;l4<=2'b01;c<=1'b0;end        
                6'd24:begin l1<=2'b00;l2<=2'b00;l3<=2'b00;l4<=2'b11;c<=1'b0;end             
                6'd25:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b01;c<=1'b0;end  
                6'd26:begin l1<=2'b11;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd27:begin l1<=2'b01;l2<=2'b01;l3<=2'b00;l4<=2'b00;c<=1'b0;end
                6'd28:begin l1<=2'b00;l2<=2'b11;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
                6'd29:begin l1<=2'b00;l2<=2'b01;l3<=2'b01;l4<=2'b00;c<=1'b0;end 
                6'd30:begin l1<=2'b00;l2<=2'b00;l3<=2'b11;l4<=2'b00;c<=1'b0;end  
                6'd31:begin l1<=2'b00;l2<=2'b00;l3<=2'b01;l4<=2'b01;c<=1'b0;end        
                6'd32:begin l1<=2'b00;l2<=2'b00;l3<=2'b00;l4<=2'b11;c<=1'b0;end             
                6'd33:begin l1<=2'b01;l2<=2'b00;l3<=2'b00;l4<=2'b01;c<=1'b1;end                 
                default:begin l1<=2'b00;l2<=2'b00;l3<=2'b00;l4<=2'b00;c<=1'b0;end 
              endcase            
              if(i==6'd33)
                //i<=7*n_fast;
               i<=6'b000001;
              else
               i<=i+6'b000001; 
             end
           else
              begin
                 l1<=2'b00;
                 l2<=2'b00;
                 l3<=2'b00;
                 l4<=2'b00;
                 i<=6'b000000;
                 c<=1'b0;
              end           
        end
endmodule