В одном посте было написано


(SHL – логический сдвиг влево, операции применяется только к группе битов, одного из целочисленных типов Паскаля, например к байту, слову и т.д.

Сдвиг байта влево на один разряд.

Разряды B7 B6 B5 B4 B3 B2 B1 B0
До 1 0 0 1 1 1 0 1
После 0 0 1 1 1 0 1 0

Сдвиг байта влево на два разряда.

Разряды B7 B6 B5 B4 B3 B2 B1 B0
До 1 0 0 1 1 1 0 1
После 0 1 1 1 0 1 0 0

Байт смещается влево на один или более разрядов, позиции справа замещаются нулями, позиции слева теряются.)


А можно осуществить циклический сдвиг.

Циклический вправо байта влево на один разряд.

Разряды B7 B6 B5 B4 B3 B2 B1 B0

|1|0|0|1|1|1|0|1|
..___________|
.|
|1|1|0|0|1|1|1|0|

Циклический сдвиг вправо на два разряда.

Разряды B7 B6 B5 B4 B3 B2 B1 B0

|1|0|0|1|1|1|0|1|
.._ ________|_|
..| |
|0|1|1|0|0|1|1|1|


Примерно идея такая.

И зачем ты написал это в Help?

Ничего сложного не вижу, но вот только зачем?
code_21420.txt

А я не понял на чем это реализовывать надо -- схемой или кодом

если n это исходное число, m - количество бит, на которое требуется его сдвинуть, а h - разрядность этого числа, то циклический сдвиг вправо делается так:
n shl (h - m) or n shr m

Мне это надо, чтобы определить корреляционную функцию псевдослучайной последовательности



Можно схемой и кодом.

а еще есть команда ROL

В нашем MathParser -- Нет.

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

tomas, например:

Леонид, Читай до конца