process(Clk,Rst_n)

　　begin

　　if (Rst_n = '0') then --異步復(fù)位

　　key_inr1 <= "111";

　　elsif (Clk'event AND Clk = '1') then --時(shí)鐘上升沿

　　key_inr1 <= key_inr0; --鎖存上一拍鍵值

　　end if;

　　end process;

　　--按鍵邊沿檢測(cè)

　　key_posedge <= (NOT key_inr1) AND key_inr0; --按鍵上升沿標(biāo)志位，高電平有效一個(gè)時(shí)鐘周期

　　key_negedge <= key_inr1 AND (NOT key_inr0); --按鍵下降沿標(biāo)志位，高電平有效一個(gè)時(shí)鐘周期

　　--20ms計(jì)數(shù)

　　process(Clk,Rst_n)

　　begin

　　if (Rst_n = '0') then --異步復(fù)位

　　cnt20ms <= x"00000";

　　elsif (Clk'event AND Clk = '1') then --時(shí)鐘上升沿

　　if ((key_posedge /= "000") OR (key_negedge /= "000")) then --鍵值邊沿標(biāo)志位復(fù)位計(jì)數(shù)器，此處理目的為消除抖動(dòng)

　　cnt20ms <= x"00000";

　　elsif (cnt20ms < 10#1000000#) then --20ms計(jì)數(shù)

　　cnt20ms <= cnt20ms+1;

　　else

　　cnt20ms <= x"00000";

　　end if;

　　end if;

　　end process;

　　--消抖后鍵值鎖存

　　process(Clk,Rst_n)

　　begin

　　if (Rst_n = '0') then --異步復(fù)位

　　key_value <= "111";

　　elsif (Clk'event AND Clk = '1') then --時(shí)鐘上升沿

　　if (cnt20ms = 10#1000000#) then --計(jì)數(shù)值到20ms

　　key_value <= key_inr1; --鎖存鍵值

　　end if;

　　end if;

　　end process;