电子技术综合设计教程 教学课件 作者袁小平 键盘防抖动.docVIP

subdesign keyscan (inclk，inscan[3..0]:input; outscan[3..0]，outrsult[3..0]，oe:output; ) variable ma[15..0]，fp，delay[3..0]:dff; outrsult[3..0]，st[2..0]，outscan[3..0]:dff; mda[3..0]，mdb[3..0]:node; begin (ma[]，fp).clk=inclk; if ma[]== 1999 then ma[]=0;fp=!fp; else ma[]=ma[]+1;fp=fp; end if; (st[]，delay[]，outscan[]，outrsult[]).clk=fp; case st[] is when 0= outscan[]=7;outrsult[]=outrsult[]; st[]=1; when 1= for i in 1 to 3 generate --扫描线循环移位 outscan[i]=outscan[i-1];outscan0=outscan3; end generate; st[]=2;outrsult[]=outrsult[]; when 2=outscan[]=outscan[];outrsult[]=outrsult[]; if inscan[]!=15 then st[]=3; --判断是否有键按下，若有跳到3，无跳回1 else st[]=1; end if; when 3=outscan[]=outscan[];outrsult[]=outrsult[]; if delay[]==12 then delay[]=0; st[]=4; else if inscan[]==15 then --键按下延时去抖 delay[]=0; else delay[]=delay[]+1; end if; st[]=3; end if; when 4=outscan[]=outscan[];outrsult[]=outrsult[]; if(!inscan[]==1)or(!inscan[]==2)or(!inscan[]==4)or(!inscan[]==8)then st[]=5; --多键按下，丢弃 else st[]=1; end if; when 5= outscan[]=outscan[]; outrsult[]=mda[]+mdb[]; --取结果 st[]=6; when 6 =outrsult[]=outrsult[]; if delay[]==12 then delay[]=0;st[]=1; --按键释放去抖 else if inscan[]!=15 then delay[]=0; else delay[]=delay[]+1; end if; end if; oe=vcc;st[]=6; --输出指示(oe=vcc) end case; table !(outscan[])= mda[]; 1 = 0; 2 = 1; 4 = 2; 8 = 3; end table; table !(inscan[])= mdb[]; 1 = 0; 2 = 4; 4 = 8; 8 = 12; end table; end ;