LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
USE IEEE.STD_LOGIC_UNSIGNED.ALL;


ENTITY DRIGMORN1_WAGGLE_TEST1 IS
PORT( CLOCK_40MHZ       :  IN    STD_LOGIC;

      PIN3        :   OUT  STD_LOGIC;
      PIN4        :   OUT  STD_LOGIC;
      PIN5        :   OUT  STD_LOGIC;
      PIN6        :   OUT  STD_LOGIC;
      PIN7        :   OUT  STD_LOGIC;
      PIN8        :   OUT  STD_LOGIC;
      PIN9        :   OUT  STD_LOGIC;
      PIN10       :   OUT  STD_LOGIC; 
      PIN11       :   OUT  STD_LOGIC; 
      PIN12       :   OUT  STD_LOGIC; 
      PIN13       :   OUT  STD_LOGIC; 
      PIN14       :   OUT  STD_LOGIC; 
      PIN15       :   OUT  STD_LOGIC; 
      PIN16       :   OUT  STD_LOGIC; 
      PIN17       :   OUT  STD_LOGIC; 
      PIN18       :   OUT  STD_LOGIC; 


      PIN23       :   OUT  STD_LOGIC; 
      PIN24       :   OUT  STD_LOGIC; 
      PIN25       :   OUT  STD_LOGIC; 
      PIN26       :   OUT  STD_LOGIC; 
      PIN27       :   OUT  STD_LOGIC; 
      PIN28       :   OUT  STD_LOGIC; 
      PIN29       :   OUT  STD_LOGIC; 
      PIN30       :   OUT  STD_LOGIC; 
      PIN31       :   OUT  STD_LOGIC; 
      PIN32       :   OUT  STD_LOGIC; 
      PIN33       :   OUT  STD_LOGIC; 
      PIN34       :   OUT  STD_LOGIC; 
      PIN35       :   OUT  STD_LOGIC; 
      PIN36       :   OUT  STD_LOGIC; 
      PIN37       :   OUT  STD_LOGIC; 
      PIN38       :   OUT  STD_LOGIC; 
      
      LED1        :  OUT   STD_LOGIC;
      LED2_N      :  OUT   STD_LOGIC;
      LED3_N      :  OUT   STD_LOGIC

    );
END DRIGMORN1_WAGGLE_TEST1;

ARCHITECTURE A0 OF DRIGMORN1_WAGGLE_TEST1  IS

SIGNAL COUNTER          : STD_LOGIC_VECTOR(31 DOWNTO 0);
   
BEGIN

COUNT : PROCESS(CLOCK_40MHZ)
BEGIN
IF (CLOCK_40MHZ'EVENT  AND CLOCK_40MHZ='1') THEN
   IF (COUNTER = X"00000000") THEN
      COUNTER <= X"03FFFFFF";   
   ELSE
      COUNTER <= COUNTER - 1;
   END IF;   
END IF;
END PROCESS COUNT;
                  
                  
PIN3    <= COUNTER(6);
PIN4    <= COUNTER(7);
PIN5    <= COUNTER(8);
PIN6    <= COUNTER(9);
PIN7    <= COUNTER(10);
PIN8    <= COUNTER(11);
PIN9    <= COUNTER(12);
PIN10   <= COUNTER(13);
PIN11   <= COUNTER(14);
PIN12   <= COUNTER(15);
PIN13   <= COUNTER(16);
PIN14   <= COUNTER(17);
PIN15   <= COUNTER(18);
PIN16   <= COUNTER(19);
PIN17   <= COUNTER(20);
PIN18   <= COUNTER(21);

PIN23   <= COUNTER(6);
PIN24   <= COUNTER(7);
PIN25   <= COUNTER(8);
PIN26   <= COUNTER(9);
PIN27   <= COUNTER(10);
PIN28   <= COUNTER(11);
PIN29   <= COUNTER(12);
PIN30   <= COUNTER(13);
PIN31   <= COUNTER(14);
PIN32   <= COUNTER(15);
PIN33   <= COUNTER(16);
PIN34   <= COUNTER(17);
PIN35   <= COUNTER(18);
PIN36   <= COUNTER(19);
PIN37   <= COUNTER(20);
PIN38   <= COUNTER(21);

LED1     <= COUNTER(25);
LED2_N   <= COUNTER(24);
LED3_N   <= COUNTER(23);
                            
   
END A0 ;