+
+ if (gpio7='1' and ce0_old = '0') then --nastupna hrana slave select
+ ce0_old <= '1';
+ elsif (gpio7='0' and ce0_old = '1') then --sestupna hrana SS, pripravime data pro prenos
+ dat_reg(63 downto 32) <= position(31 downto 0); --pozice
+ dat_reg(31 downto 0) <= (others => '0'); --zbytek zatim nuly
+ ce0_old <= '0';
+ end if;