可编程硬件描述语言VHDL Quartus 循环LED流水灯源代码.docxVIP

VHDL Quartus 循环LED流水灯源代码 前言 流水灯是每个学电子的入门“游戏” ，示意图如图1，其原理极其简单，但是可玩性却极强，可以就8个LED写出不同花样的程序。 源代码 --wangding --north university of china --2015 11 20 --LED_shumaguanDTSMXS LIBRARY IEEE; --库文件 USE IEEE.STD_LOGIC_1164.ALL; ENTITY DTSMXS IS --文件名必须与实体名相同 PORT(CLK:IN STD_LOGIC; --定义时钟输入端口 B14,B13,B12,B11,B10,B9,B8,B7,B6,B5,B4,B3,B2,B1:IN STD_LOGIC_VECTOR(3 DOWNTO 0);--定义14数码管中每个数码管的显示内容 X:OUT STD_LOGIC_VECTOR(6 DOWNTO 0); --定义数码管的显示内容，使用的是7段数码管 LED_SELECT: OUT STD_LOGIC_VECTOR(13 DOWNTO 0)); --定义数码管的选择端 END DTSMXS; --DTSMXS can be ellipsis ARCHITECTURE BEHAVE OF DTSMXS IS SIGNAL BCD_IN: STD_LOGIC_VECTOR (3 DOWNTO 0); --定义一个信号，BCD码的输入 SIGNAL CNT2: INTEGER RANGE 0 TO 13; --定义计数输入，范围为0~13 --------------------------------------------------------------------------------------- BEGIN --此处必须有一个begin P1:PROCESS(CLK) --进程1，判断是否有上升沿脉冲输入 BEGIN --此处必须有一个begin IF CLKEVENT AND CLK=1 THEN --上升沿触发 IF CNT2=13 THEN CNT2=0; --如果脉冲数量大于13（0~13，一共14个），就将CNT清零 ELSE CNT2=CNT2+1; --否则，启动计数模式，自加1计数 END IF; END IF; END PROCESS; ----------------------------------------------------------------------------------------- P2:PROCESS(CNT2,B14,B13,B12,B11,B10,B9,B8,B7,B6,B5,B4,B3,B2,B1) --进程2，通过判断CNT的值送入位码信号和段码信号， BEGIN CASE CNT2 IS WHEN 0=LED_SELECT=11111111111110;BCD_IN=B1; WHEN 1=LED_SELECT=11111111111101;BCD_IN=B2; WHEN 2=LED_SELECT=11111111111011;BCD_IN=B3; WHEN 3=LED_SELECT=11111111110111;BCD_IN=B4; WHEN 4=LED_SELECT=11111111101111;BCD_IN=B5; WHEN 5=LED_SELECT=11111111011111;BCD_IN=B6; WHEN 6=LED_SELECT=11111110111111;BCD_IN=B7; WHEN 7=LED_SELECT=11111101111111;BCD_IN=B8; WHEN 8=LED_SELECT=11111011111111;BCD_IN=B9; WHEN 9=LED_SELECT=11110111111111;BCD_IN=B10; WHEN 10=LED_SELECT=11101111111111;BCD_IN=B11; WHEN 11=LED_SELECT=11011111111111;BCD_I