【正文】 and clk=39。039。139。qn=7qy。數(shù)碼管的數(shù)據(jù)顯示 signal data:integer range 0 to 。ARCHITECTURE one OF test55 IS贊成票的二進(jìn)制計(jì)數(shù)器 signal q:STD_LOGIC_VECTOR(3 DOWNTO 0)。 led1,led2:OUT STD_LOGIC。編號(hào)（004）項(xiàng)目名稱7人表決器項(xiàng)目組成員賈彬 李丹 路清云項(xiàng)目?jī)?nèi)容LIBRARY IEEE。when others=null。when 12=seg=10011100。when 8=seg=11111110。when 4=seg=01100110。process(data)begincase data iswhen 0=seg=11111100。data=1。data=4。data=7。data=13。END PROCESS。event and clk=39。END cpld。USE 。項(xiàng)目組成員分工賈彬編程，調(diào)試?yán)畹ぃ非逶茩z查程序賈彬在功能板上實(shí)現(xiàn)程序項(xiàng)目實(shí)施過(guò)程中遇到的困難Led燈的顯示頻率太快解決問(wèn)題的過(guò)程及方法講頻率的范圍值改變。end if。 t=t+1。 else q1(7 DOWNTO 4)=q1(6 DOWNTO 4)amp。039。 t=t+1。 else q1(7 DOWNTO 4)=q1(4)amp。039。 t=t+1。 q1=10000001。 end if。 else q1=q1(0)amp。039。event and clk=39。q1=(others=39。 signal t:STD_LOGIC_VECTOR(3 DOWNTO 0)。END cpld。USE 。項(xiàng)目組成員分工賈彬編程賈彬調(diào)試賈彬在功能板上實(shí)現(xiàn)程序項(xiàng)目實(shí)施過(guò)程中遇到的困難第一次接觸eda功能板不了解內(nèi)部原理，功能板和編譯好的程序沒(méi)有辦法匹配。end if。 t=t+1。 else q1(7 DOWNTO 4)=q1(6 DOWNTO 4)amp。039。 t=t+1。 else q1(7 DOWNTO 4)=q1(4)amp。039。 t=t+1。 q1=10000001。 end if。 else q1=q1(0)amp。039。event and clk=39。q1=(others=39。 signal t:STD_LOGIC_VECTOR(3 DOWNTO 0)。END test53。USE 。USE 。ARCHITECTURE one OF test53 IS定義4種模式 type states is (s0,s1,s2,s3)。BEGINPROCESS(clk,rst)BEGIN系統(tǒng)復(fù)位if rst=39。039。139。)。q1(7 DOWNTO 1)。s1模式：從右到左逐個(gè)點(diǎn)亮LED when s1= if t=0111 then t=(others=39。 present=s2。 present=s1。)。q1(7 DOWNTO 5)。 present=s2。)。q1(7)。 present=s3。END PROCESS。解決問(wèn)題的過(guò)程及方法通過(guò)老師的講解了解。USE 。ARCHITECTURE cpld OF cpld IS定義4種模式 type states is (s0,s1,s2,s3)。BEGINPROCESS(clk,rst)BEGIN系統(tǒng)復(fù)位if rst=39。039。139。)。q1(7 DOWNTO 1)。s1模式：從右到左逐個(gè)點(diǎn)亮LED when s1= if t=0111 then t=(others=39。 present=s2。 present=s1。)。q1(7 DOWNTO 5)。 present=s2。)。q1(7)。 present=s3。END PROCESS?？偨Y(jié)與反思燈的顯示快慢與頻率息息相關(guān)。ENTITY cpld IS PORT(clk: IN std_logic。ARCHITECTURE one OF cpld IS掃描數(shù)碼管地址的計(jì)數(shù)器 signal t8:integer range 0 to 7。139。PROCESS(t8)BEGINcase t8 iswhen 0=scan=000。when 2=scan=010。when 4=scan=100。when 6=scan=110。 when others=null。when 1=seg=01100000。when 5=seg=10110110。when 9=seg=11110110。when 13=seg=01111010。end case。USE 。 seg: OUT STD_LOGIC_VECTOR(7 DOWNTO 0)。贊成票的十進(jìn)制計(jì)數(shù)器 signal qy:integer range 0 to 7。BEGIN計(jì)票進(jìn)程process(qy,qn,q)beginq=(000amp。if qy8 then led1=39。else led1=39。end if。139。數(shù)碼管地址掃描PROCESS(t8)BEGINcase t8 iswhen 0=scan=000。when 2=scan=010。when 4=scan=100。when 6=scan=110。when others=null。when 1=seg=01100000。when 5=seg=10110110。when 9=seg=11110110。when 13=seg=01111010。end case?？偨Y(jié)與反思這個(gè)實(shí)驗(yàn)很有意思，通過(guò)數(shù)碼管和開(kāi)關(guān)實(shí)現(xiàn)表決。ENTITY test55 IS PORT(clk,k1,k2,k3,k4,k5,k6,k7,k8,k9,k10,k11,k12,k13,k14: IN std_logic。END test55。掃描數(shù)碼管地址的計(jì)數(shù)器 signal t8:integer range 0 to 7。qy=conv_integer(q)。led2=39。led2=39。掃描數(shù)碼管地址的計(jì)數(shù)進(jìn)程PROCESS(clk)BEGINif clk39。end if。when 1=scan=001。when 3=scan=011。when 5=scan=101。when 7=scan=111。END PROCESS。when 3=seg=11110010。when 7=seg=11100000。when 11=seg=00111110。when 15=seg=10001110?？偨Y(jié)與反思1. 這個(gè)實(shí)驗(yàn)很有意思，通過(guò)數(shù)碼管和開(kāi)關(guān)實(shí)現(xiàn)表決。use 。數(shù)碼管顯示信號(hào)(abcdefgh) seg7:out std_logic_vector(7 downto 0)。 signal state:std_logic_vector(1 downto 0)。begin只使用一個(gè)數(shù)碼管顯示 scan=000。 then count=count+1。event and clk=39。 when 01=kbcol=0010。 when 11=kbcol=1000。end if。 then seg7_1=00000000。 then case state is when 00= case kbrow is when 0001= seg7_1=10001110。E when 0100= seg7_1=01111010。C when others=seg7_1=00000000。 dat=01011。 dat=01001。dat=11111。7 when 0010= seg7_1=10111110。5 when 1000= seg7_1=01100110。 end case。 dat=00010。 dat=00000。 when others=seg7_1=00000000。fn=not(dat(0)and dat(1)and dat(2)and dat(3)and dat(4))。 then seg7=seg7_1。李丹編寫程序路清云運(yùn)行程序賈彬改寫程序并在功能板上實(shí)現(xiàn)程序項(xiàng)目實(shí)施過(guò)程中遇到的困難，程序出錯(cuò)。，然后連接好了，正常運(yùn)行。編號(hào)（007）項(xiàng)目名稱簡(jiǎn)單時(shí)鐘項(xiàng)目組成員賈彬 李丹 路清云項(xiàng)目?jī)?nèi)容library ieee。時(shí)鐘輸入 1024hz clr:in std_logic。數(shù)碼管掃描信號(hào)end。 signal clk1hz:std_logic。beginif clk39。count:=0。end process。min=min。 then hour=0。event and clk1hz=39。 if hour=23 then hour=0。end if。end process。 when 3|13|23|33|43|53 =qsl=0011。 when 7|17|27|37|47|57 =qsl=0111。end case。 when 30|31|32|33|34|35|36|37|38|39 =qsh=0011。end case。 when 2|12|22|32|42|52 =qml=0010。 when 6|16|26|36|46|56 =qml=0110。 when others=null。 when 20|21|22|23|24|25|26|27|28|29 =qmh=0010。 when others=null。 when 1|11|21 =qhl=0001。 when 5|15 =qhl=0101。 when 9|19 =qhl=1001。 when 10|11|12|13|14|15|16|17|18|19 =qhh=0001。end process。 then if t=5 then t=0。end process。scan=001。scan=011。scan=101。 七段譯碼process(data)begincase data is when0000=seg=11111100。 when0100=seg=01100110。 when1000=seg=11111110。end process?？偨Y(jié)與反思，先不要盲目的去看，要認(rèn)真對(duì)待，才能順利地完成實(shí)驗(yàn)。use 。7段顯示控制信號(hào)(abcdefg) scan:out std_logic_vector(2 downto 0))。signal tp1,tp2,tp3,tp4,tp5,tp6,tp7,tp8:std_logic_vector(3 downto 0)。event and sysclk=39。039。 end if。139。 if tp2=1001 then tp2=0000。 if tp6=1001 then tp6=0000。end if。end if。end if。end if。 tq2=tp2。 tq6=tp6。 tp2=0000。 tp6=0000。 end if。dat=tq1。dat=tq3。dat=tq5。dat=tq7。end case。 when0010=seg7=11011010。 when0110=seg7=10111110。 when others=null。項(xiàng)目組成員分工李丹，賈彬編寫程序路清云檢查程序賈彬運(yùn)行程序并實(shí)現(xiàn)項(xiàng)目實(shí)施過(guò)程中遇到的困難當(dāng)一切都準(zhǔn)備好的時(shí)候，數(shù)碼顯示管卻不亮，在對(duì)程序的檢查中也沒(méi)有發(fā)現(xiàn)錯(cuò)誤。use 。系統(tǒng)復(fù)位 af,aj:in std_logic。數(shù)碼管地址選擇信號(hào) seg7:out std_logic_vector(7 downto 0))。 signal t:integer range 0 to 3。beginif clk1khz39。count:=0。en