А... а я думал асм... Ну можно в инлайн-скрипте асм вставить - вращение битов одной командой
Хотя там нет асма... Ну тогда дельфи инлайн, а в него вставить асм по всем правилам дельфи...
---upd
перечитал внимательно - тут у вас байты, а не биты крутятся... Сбили меня картинки из 1 и 0