elsif rising_edge(BCLK) then
                PDL_BUF <= PDL1;
                PDR_BUF <= PDR1;
                READY   <= '1';
                VALID   <= '1';

                bitcounter := bitcounter + 1;

                if bitcounter = 1 then
                    WSP <= '1';
                else
                    WSP <= '0';

                end if;

                if bitcounter >= 0 and bitcounter <= 23 then
                    WS <= '0';
                elsif bitcounter > 24 then -- and bitcounter <= 48
                    WS <= '1';
                    WSP <= '0';

                end if;

                if WS = '0' then
                    SD <= PDL_BUF(23);
                    PDL_BUF <= PDL_BUF(22 downto 0) & '0';
                else --if WS = '1' then
                    SD <= PDR_BUF(23);
                    PDR_BUF <= PDR_BUF(22 downto 0) & '0';

                end if;

                if bitcounter = 48 then
                    bitcounter := 0;

                end if;
        end if;
    end process;