资源描述：
《实验8：动态扫描实验》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、实验8：动态扫描实验：用4个按键分别代表加、减、暂停、复位，四位数码管代表四位十进制数，从0000开始到9999循环，自动计数，数据显示时间不大于1秒。moduledongtaisaomiao(sys_sclk,kadd,kcut,kstop,krest,sels,seg);inputsys_sclk,kadd,kcut,kstop,krest;outputreg[2:0]sels;outputreg[6:0]seg;reg[1:0]sels0;reg[15:0]data;regclk1hz;regclk;reg[3:0]disdata;reg[30:
2、0]count;reg[30:0]count1;regkey1,key2,key3,key4;always@(posedgesys_sclk)beginif(count==25000000)begincount<=0;clk1hz<=~clk1hz;endelsecount<=count+1;endalways@(posedgesys_sclk)beginif(count1==100000)begincount1<=0;clk<=~clk;endelsecount1<=count1+1;endalways@(posedgeclk)beginsels0<
3、=sels0+1;sels<=sels0;endalways@(kadd,kcut,kstop,krest)beginif(!krest)beginkey1<=1;key2<=0;key3<=0;key4<=0;endif(!kadd)beginkey1<=0;key2<=1;key3<=0;key4<=0;endif(!kcut)beginkey1<=0;key2<=0;key3<=1;key4<=0;endif(!kstop)beginkey1<=0;key2<=0;key3<=0;key4<=1;endendalways@(posedgeclk1
4、hz)beginif(key1==1)data[15:0]<=0;if(key2==1)beginif(data[3:0]==9)begindata[3:0]<=0;if(data[7:4]==9)begindata[7:4]<=0;if(data[11:8]==9)begindata[11:8]<=0;if(data[15:12]==9)begindata[15:12]<=0;endelsedata[15:12]<=data[15:12]+1;endelsedata[11:8]<=data[11:8]+1;endelsedata[7:4]<=data
5、[7:4]+1;endelsedata[3:0]<=data[3:0]+1;endif(key3==1)beginif(data[3:0]==0)begindata[3:0]<=9;if(data[7:4]==0)begindata[7:4]<=9;if(data[11:8]==0)begindata[11:8]<=9;if(data[15:12]==0)begindata[15:12]<=9;endelsedata[15:12]<=data[15:12]-1;endelsedata[11:8]<=data[11:8]-1;endelsedata[7:
6、4]<=data[7:4]-1;endelsedata[3:0]<=data[3:0]-1;endif(key4==1)data[15:0]<=data[15:0];endalways@(selsordata)begincase(sels)2'b00:disdata<=data[15:12];2'b01:disdata<=data[11:8];2'b10:disdata<=data[7:4];2'b11:disdata<=data[3:0];endcaseendalways@(disdata)begincase(disdata)4'b0000:seg=
7、7'b1111110;4'b0001:seg=7'b0110000;4'b0010:seg=7'b1101101;4'b0011:seg=7'b1111001;4'b0100:seg=7'b0110011;4'b0101:seg=7'b1011011;4'b0110:seg=7'b1011111;4'b0111:seg=7'b1110000;4'b1000:seg=7'b1111111;4'b1001:seg=7'b1111011;default:seg=7'b1111110;endcaseendendmodule显示学号：moduledongtais
8、aomiao(sys_sclk,kadd,kcut,kstop,krest,sels,seg)
