LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
ENTITY swCtrl IS
PORT(CLK: IN STD_LOGIC;
X: IN STD_LOGIC;
CLR: IN STD_LOGIC;
a : OUT STD_LOGIC;
b : OUT STD_LOGIC);
END swCtrl;
ARCHITECTURE fu2 OF swCtrl IS
SIGNAL M : INTEGER RANGE 0 TO 400;
SIGNAL N : INTEGER RANGE 0 TO 700;
PROCESS(X)
BEGIN
IF(X'EVENT AND X ='1')THEN
M <= 0;
N <= N + 1;
END IF;
END PROCESS;
PROCESS(CLK,CLR)
BEGIN
IF(CLK'EVENT AND CLK ='1')THEN
IF CLR = '0' THEN
M <= 0;
N <= 0;
ELSE
M <= M + 1;
END IF;
END IF;
END PROCESS;
PROCESS(M)
BEGIN
IF(M > 30) AND (M < 80)THEN
a <= '1';
b <= '0';
ELSIF (M > 100) AND (M < 130)THEN
a <= '0';
b <= '1';
ELSE
a <= '0';
b <= '0';
END IF;
END PROCESS;
END fu2;