changeedge.v

来自「这是一个凌阳单片机控制的红外键盘的控制程序」· Verilog 代码 · 共 29 行

module ChangeEdge(CLK,KeyPulse,Pulse);
input CLK;
input KeyPulse;
output Pulse;

reg Pulse;
reg Sign;

always@(posedge CLK)
	begin		
		if(KeyPulse)
			begin
				Pulse <= 1'd0;
				Sign  <= 1'd0;
			end
		else//出现下跳沿
			begin
				if(Sign)
					begin
						Pulse<=1'd0;
					end
				else
					begin
						Pulse<=1'd1;
						Sign<=1'd1;						
					end				
			end
	end		
endmodule