EEPW论坛

/******************************************************************************
*Engineer: superdian   
*Create Date:  2014/9/7 
*Design Name:  
*Module Name:  i2c_test 
*Project Name:  
*Target Devices: EP3CE5E144C8
*Tool versions: 
*Description: 
*
*Dependencies: 
*
*Revision:
*Revision 0.01 - File Created
*Additional Comments: 开发板晶振为20MHZ,工程中通过倍频50MHZ。
******************************************************************************/
module i2c_test(input clk,
                output scl,
					 inout wire sda,
					 output [7:0]data_read_wire,
					 input [7:0]sda_data_addr,
					 input [7:0]sda_data_word,
					 output reg finish_bit,
					 output reg allfinish_bit,
					 
					 input    LCDfinish_bit
					 );

reg sda_io_flag;      //sda输入输出状态寄存器
reg read_flag;        //主机读写状态
reg sda_r;            //数据寄存器
reg scl_r;            //时钟脉冲寄存器
reg [7:0] scl_ctr;    //scl分频参数寄存器
reg [7:0] scl_sts;
reg [7:0] i2c_sts;
reg [7:0] sda_data_a;
reg [3:0] data_bit;
reg [7:0] data_read;
reg [24:0] timer;
reg [3:0] conter;

assign scl=scl_r;
assign sda=sda_io_flag?sda_r:1'bz; //sda输入输出状态选择

assign data_read_wire=data_read;

`define scl_pos  (scl_sts==3'd0)
`define scl_high (scl_sts==3'd1)
`define scl_neg  (scl_sts==3'd2)
`define scl_low  (scl_sts==3'd3)

parameter          idle     =4'd0;
parameter          start    =4'd1;
parameter			 send_a   =4'd2;
parameter			 slv_ack1 =4'd3;
parameter			 send_d   =4'd4;
parameter			 slv_ack2 =4'd5;
parameter			 send_dd  =4'd6;
parameter			 slv_ack3 =4'd7;
parameter			 read_byte =4'd8;
parameter			 master_ack =4'd9;
parameter			 stop    =4'd10;
//SCL分频250KHZ
always@(posedge clk)
 begin 
    if(scl_ctr ==8'd199)
	    scl_ctr<=8'd0;
	 else 
       scl_ctr<=scl_ctr+1'b1;	 

 end

always@(posedge clk)
  begin
     case(scl_ctr)
	     8'd49:  scl_sts<=3'd1;//处于高电平中间用于数据采样
		  8'd99:  scl_sts<=3'd2;//下降沿
		  8'd149: scl_sts<=3'd3;//处于低电平中间用于数据变化
		  8'd199: scl_sts<=3'd0;//上升沿
		 default: scl_sts<=3'd5; 
		endcase  
  end
 
always@(posedge clk)
  begin 
     if(scl_sts==3'd0)
	    scl_r<=1'b1;
	  if(scl_sts==3'd2)
	    scl_r<=1'b0;  
  end
  
always@(posedge clk)
begin 
   if(timer==0)
      begin 
		   i2c_sts<=idle;
			data_bit<=4'd0;
			sda_io_flag<=1'b1;
			sda_r<=1'b1;
			read_flag<=1'b0;
	   end
   case(i2c_sts)
     idle:
	      begin 
			    i2c_sts<=start;

				 if(read_flag==1'b1)//判断主机读写状态
				 
				    sda_data_a<=sda_data_addr+1'b1;//地址+1，即为读状态(A3)
				 else 
				    sda_data_a<=sda_data_addr;//地址不加一，即为写状态(A2)
			end 	 
	  start:
	       begin 
			     if(`scl_high)//启动I2C
				    begin
					    sda_io_flag<=1'b1;
						 sda_r<=1'b0;
						 i2c_sts<=send_a;//发送地址状态
					 end
				  else
				     begin  
					    i2c_sts<=start;
					  end
					
			 end
		send_a://发送地址状态
          begin 
		       if(`scl_low)
			        begin 
					      case(data_bit)//8位串行地址数据
							4'd0: sda_r<= sda_data_a[7];
							4'd1: sda_r<= sda_data_a[6];
							4'd2: sda_r<= sda_data_a[5];
							4'd3: sda_r<= sda_data_a[4];
							4'd4: sda_r<= sda_data_a[3];
							4'd5: sda_r<= sda_data_a[2];
							4'd6: sda_r<= sda_data_a[1];
							4'd7: sda_r<= sda_data_a[0];
							endcase 
							data_bit<=data_bit+1'b1;
							if(data_bit==4'd8)//发送地址完毕
							   begin
								    sda_io_flag<=1'b0;//SDA做输入口
									 i2c_sts<=slv_ack1;//读从机应答信号
									 data_bit<=4'd0;
								end 
					  end 
				 else 
		          i2c_sts<=send_a;
			  end 
		slv_ack1://从机应答
           begin
			     if(`scl_high)
				     begin 
					    sda_io_flag<=1'b0;
						 if(sda==0)
						     begin 
							    if(read_flag==1'b1)
								   begin 
									  i2c_sts<=read_byte;
									  sda_io_flag<=1'b0;
								   end 
							     else 
							       begin 
							         i2c_sts<=send_d;
							         sda_io_flag<=1'b1;
							         sda_r<=1'b0;
							         sda_data_a<=sda_data_word;
							       end 
						     end 
			         end 
	            else 
                  begin 
						   i2c_sts<=slv_ack1;
	                        
						 
						 end
	         end 
       send_d://发送数据
            begin   
	            if(`scl_low)
		            begin 
			            case(data_bit)
				            4'd0: sda_r<=sda_data_a[7];
					         4'd1: sda_r<=sda_data_a[6];
					         4'd2: sda_r<=sda_data_a[5];
					         4'd3: sda_r<=sda_data_a[4];
					         4'd4: sda_r<=sda_data_a[3];
					         4'd5: sda_r<=sda_data_a[2];
					         4'd6: sda_r<=sda_data_a[1]; 
                        4'd7: sda_r<=sda_data_a[0];
                      endcase
							 data_bit<=data_bit+1'b1;
							 if(data_bit==4'd8)
							   begin 
							     sda_io_flag<=1'b0;
								  i2c_sts<=slv_ack2;//发送数据完毕，进入应答状态
								  data_bit<=4'd0;
								end
								
						end
                     else
	                    i2c_sts<=send_d;
			     end 
        slv_ack2://应答状态
             begin
	              if(`scl_high)
					     begin 
						    sda_io_flag<=1'b0;
							 if(sda==0)
							    begin 
								     i2c_sts<=stop;
									  sda_io_flag<=1'b1;
									  sda_r<=1'b0;
							     end 
						   end 
			         else 
		               begin 
			               i2c_sts<=slv_ack2;
				         end 
			     end 
		  read_byte://读出数据
			    begin
				    if(`scl_high)
					    begin 
						    sda_io_flag<=1'b0;
							 data_read<=(data_read<<1)|sda;
							 data_bit<=data_bit+1'b1;
							 if(data_bit==4'd7)
							     begin
								    i2c_sts<=master_ack;
									 data_bit<=4'd0; 
								  end
						 end 
			     end 
		  master_ack://主机应答
		       begin
				    if(`scl_low)
					    begin 
						    sda_io_flag<=1'b1;
							 sda_r<=1'b0;
							 data_bit<=data_bit+1'b1;
							 if(data_bit==4'd1)
							    begin 
								   i2c_sts<=stop;
									data_bit<=4'd0;
							    end 
						 end 
				  end 
		  stop://停止I2C
             begin
			       if(`scl_high)
					     begin 
						     sda_r<=1'b1;
							  read_flag<=1'b1;
							  if(read_flag==1'b0)
							     i2c_sts<=idle;
							  else 
							     i2c_sts<=stop;
								
						  end 
			 
            end 
	   endcase	
  		
end  

always@(posedge clk)
begin 
    if(timer<=25'd50000)//原来为12500000
	    begin 
		      timer<=timer+1'b1;
			   if(timer==25'd49999)//原来为12499999
			   finish_bit<=1'b1;
		 end 
    else 
       begin 
           timer<=25'd0;
           finish_bit<=1'b0;
       end 
end 

always@(negedge finish_bit)
begin
   if(conter==3'd7)
	 begin 
       conter = 3'd0;
	 end  
	else 
	 begin 
     if(LCDfinish_bit==0)
		begin 
		  conter = conter+1'b1;
        allfinish_bit<=1'b0;
		end 
	  else 
		begin 
		  allfinish_bit<=1'b1;
	   end 
	
	  end 
end 








endmodule 		  
 			
			
			
					 
              			
			           		  
								  
								  
                      							 
					  	 
									 
							
					      		
		
	        

  
 
 















 					 
					 

/******************************************************************************
*Engineer: superdian   
*Create Date:  2014/11/7 
*Design Name:  
*Module Name:  		lcd1602
*Project Name:  
*Target Devices: EP3CE5E144C8
*Tool versions: 
*Description: 
*
*Dependencies: 
*
*Revision:
*Revision 0.01 - File Created
*Additional Comments: 开发板晶振为20MHZ，工程中通过倍频50MH。
******************************************************************************/
module lcd1602(sys_clk ,
			   sys_rstn   ,
			   lcd_rs     ,
			   lcd_rw     ,
			   lcd_en     ,
			   lcd_data   ,
			   seg_sec    ,
				seg_mnt    ,
				seg_hur    ,
				seg_week   ,
				seg_day    ,
				seg_month  ,
				seg_year   ,
			   LCDfinish_bit,
			
				);
				
//输入输出信号定义
input [7:0] seg_sec;
input [7:0] seg_mnt;
input [7:0] seg_hur;
input [7:0]	seg_week;
input [7:0]	seg_day;
input [7:0]	seg_month;
input [7:0]	seg_year;  


input          sys_clk    ;//系统时钟输入
input          sys_rstn   ;//系统复位信号，低电平有效

output     reg     LCDfinish_bit;



output         lcd_rs     ;//lcd的寄存器选择输出信号
output         lcd_rw     ;//lcd的读、写操作选择输出信号
output         lcd_en     ;//lcd使能信号
output  [7:0]  lcd_data   ;//lcd的数据总线（不进行读操作，故为输出）
//寄存器定义
reg            lcd_rs     ;
reg            clk_div    ;
reg     [17:0] delay_cnt  ;
reg     [7:0]  lcd_data   ;
reg     [5:0]  char_cnt   ;		
reg     [7:0]  data_disp  ;
reg     [9:0]  state      ; 
/********************************
*********************************/
reg      [3:0] disp_dat;
reg      [25:0] g=0; 
reg      [3:0] shi1;
reg      [1:0] shi2;
reg      [3:0] fen1;
reg      [2:0] fen2;
reg      [3:0] miao1;
reg      [2:0] miao2;

reg      [2:0] week1;
reg      [3:0] day1;
reg      [2:0] day2;
reg      [3:0] month1;
reg      [3:0] month2; 
reg      [3:0] year1;
reg      [3:0] year2;

reg      [7:0] centry1;
reg      [7:0] centry2;
reg      centry;

parameter	idle 		= 10'b000000000,	      //初始状态，下一个状态为CLEAR
			   clear		= 10'b000000001, 	      //清屏
			   set_function	= 10'b000000010, 	//功能设置：8位数据接口/2行显示/5*8点阵字符
			   switch_mode	= 10'b000000100, 	   //显示开关控制：开显示，光标和闪烁关闭
			   set_mode     = 10'b000001000, 	//输入方式设置：数据读写操作后，地址自动加一/画面不动
			   shift  		= 10'b000010000, 	   //光标、画面位移设置：光标向左平移一个字符位（光标显示是关闭的，所以实际上设置是看不出效果的）
			   set_ddram1   = 10'b000100000, 	//设置DDRAM的地址：第一行起始为0x00（注意输出时DB7一定要为1）
			   set_ddram2   = 10'b001000000, 	//设置DDRAM的地址：第二行为0x40（注意输出时DB7一定要为1）
			   write_ram1   = 10'b010000000, 	//数据写入DDRAM相应的地址
			   write_ram2   = 10'b100000000; 	//数据写入DDRAM相应的地址

assign lcd_rw = 1'b0;						//没有读操作，R/W信号始终为低电平
assign lcd_en = clk_div;	            //E信号出现高电平以及下降沿的时刻与LCD时钟相同
//时钟分频
always@(posedge sys_clk or negedge sys_rstn)
begin 
	if(!sys_rstn)
		begin
			delay_cnt<=18'd0;
			clk_div<=1'b0;
		end
	else if(delay_cnt==18'd249999)//原来50MHZ249999 
		begin
			delay_cnt<=18'd0;
			clk_div<=~clk_div;
		end
	else
		begin
			delay_cnt<=delay_cnt+1'b1;
			clk_div<=clk_div;
		end
end
always@(posedge clk_div or negedge sys_rstn)	//State Machine 
begin
	if(!sys_rstn)
		begin
			state 	 <= idle;
			lcd_data <= 8'bzzzzzzzz;
			char_cnt <= 5'd0;	
	      LCDfinish_bit <= 1'b1;		
		end
	else
		begin
		case(state)
		idle:	begin						//初始状态
					state <= clear;
					lcd_data <= 8'bzzzzzzzz;
				end
		clear:	begin						//清屏
					state <= set_function;
					lcd_rs<=1'b0;
					lcd_data <= 8'b00000001;			
				end		
		set_function:						//功能设置(38H)：8位数据接口/2行显示/5*8点阵字符
				begin
					state <= switch_mode;
					lcd_rs<=1'b0;
					lcd_data <= 8'b00111000;				
				end
		switch_mode:							//显示开关控制(0CH)：开显示，光标和闪烁关闭
				begin
					state <= set_mode;
					lcd_rs<=1'b0;
					lcd_data <= 8'b00001100;
				end	
		set_mode:begin						//输入方式设置(06H)：数据读写操作后，地址自动加一/画面不动
					state <= shift;	
					lcd_rs<=1'b0;
					lcd_data <= 8'b00000110;
				end
		shift:	begin						//光标、画面位移设置(10H)：光标向左平移一个字符位（光标显示是关闭的，所以实际上设置是看不出效果的）
					state <= set_ddram1;
					lcd_rs<=1'b0;
					lcd_data <= 8'b0001_0000;			
				end		
		set_ddram1:						    //设置DDRAM的地址：第一行起始为00H（注意输出时DB7一定要为1）	
				begin
					state <= write_ram1; 
					lcd_rs<=1'b0;
					lcd_data <= 8'b1000_0000;//Line1
				end
		set_ddram2:							//设置DDRAM的地址：第二行为40H（注意输出时DB7一定要为1）
				begin
					state <= write_ram2;
					lcd_rs<=1'b0;
					lcd_data <= 8'b1100_0000;//Line2		
				end
		write_ram1:				
				begin									
					if(char_cnt <=5'd15)
						begin
						
						  
							char_cnt <= char_cnt + 1'b1; 
							lcd_rs<=1'b1;
							lcd_data <= data_disp;
							state <= write_ram1;
							LCDfinish_bit <= 1'b1;
					
							
						end
					else
						begin
							state <= set_ddram2;	
						   LCDfinish_bit <= 1'b1;
						end				
				end
		write_ram2:				
				begin									
					if(char_cnt <=5'd31)
						begin
				       
							char_cnt <= char_cnt + 1'b1; 
							lcd_rs<=1'b1;
							lcd_data <= data_disp;
							state <= write_ram2;
							LCDfinish_bit <= 1'b1;
						
						
						end
					else
						begin
						   LCDfinish_bit <= 1'b0;
							char_cnt <=5'd0;
							state <= shift;	
						end				
				end
		default: 	state <= idle;
		endcase
		end
end




 
 
 

always @(char_cnt)			//输出的字符
begin
	case (char_cnt)
	6'd0: data_disp  = "-";	
	6'd1: data_disp  = "-";	
	6'd2: data_disp  = "-";	
	6'd3: data_disp  = "-";	
	6'd4: data_disp  = centry2;	
	6'd5: data_disp  = centry1;	
	6'd6: data_disp  = (year2+8'b0011_0000);	
	6'd7: data_disp  = (year1+8'b0011_0000);	
	6'd8: data_disp  = "/";	
	6'd9: data_disp  = (month2+8'b0011_0000);	
	6'd10: data_disp = (month1+8'b0011_0000);	
	6'd11: data_disp = "/";	
	6'd12: data_disp = (day2+8'b0011_0000);	
	6'd13: data_disp = (day1+8'b0011_0000);	
	6'd14: data_disp = "/";	
	6'd15: data_disp = (week1+8'b0011_0000);	
	6'd16: data_disp = "E";	
	6'd17: data_disp = "E";	
	6'd18: data_disp = "P";	
	6'd19: data_disp = "W";	
	6'd20: data_disp = "-";	
	6'd21: data_disp = "-";	
	6'd22: data_disp = "-";	
	6'd23: data_disp = "-";	
	6'd24: data_disp = (shi2+8'b0011_0000);
	6'd25: data_disp = (shi1+8'b0011_0000);
	6'd26: data_disp = "/";
   6'd27: data_disp = (fen2+8'b0011_0000);	
	6'd28: data_disp = (fen1+8'b0011_0000);	
	6'd29: data_disp = "/";	
	6'd30: data_disp = (miao2+8'b0011_0000);	
	6'd31: data_disp = (miao1+8'b0011_0000);	



    default :   data_disp ="-";	
	endcase
end


/***************************************************
将从pcf8563读出的数据写入相应时，分，秒，年，月，日寄存器
*****************************************************/
always@(posedge sys_clk)
 begin 
    if(g==26'd2499999)//原来为2499999
	     g<=26'd0;
	 else 
        g<=g+1'b1;
 end 
always@(posedge sys_clk)
    begin 
	   if(g==26'd2499999)//原来为2499999
	
	       disp_dat<=disp_dat+1'b1;
	
        else 

          disp_dat<=disp_dat;
	  end

	 

always@(disp_dat)
begin 
    case(disp_dat)
	 4'd0:
	        miao1=seg_sec[3:0];
	 4'd1:
	        miao2=seg_sec[6:4];
	 4'd2:
           fen1=seg_mnt[3:0];
	 4'd3:
	        fen2=seg_mnt[6:4];
	 4'd4:
           shi1=seg_hur[3:0];
	 4'd5:
           shi2=seg_hur[5:4];
	 4'd6:
           week1=seg_week[2:0];
	 4'd7:
           day1=seg_day[3:0];
	 4'd8:	
           day2=seg_day[5:4];	
	 4'd9:  
           month1=seg_month[3:0];
	 4'd10:
           month2=seg_month[5];
	 4'd11:
	        year1=seg_year[3:0];
	 4'd12:
	        year2=seg_year[7:4];	
	 4'd13:
           centry=seg_month[7];
	 

           

           
	endcase 
end

always@(posedge sys_clk)
begin
  if(centry == 1'b0)
    begin
      centry1 <= "0";
	   centry2 <= "2";
    end
  else 
    begin
      centry1 <= "9";
	   centry2 <= "1";
    end  
end 


endmodule 

借了同学的相机，效果比我那摔坏的手机镜头好多了。