Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

Как организовать зеркальную замену битов в байте?   Найти похожие ветки 

 
Aleksandr ©   (2004-05-11 14:58) [0]

Ну, чтобы последний бит обменялся местами с первым, второй с предпоследним и т.д.?


 
Digitman ©   (2004-05-11 15:06) [1]

операции сдвига знакомы ?


 
BillyJeans ©   (2004-05-11 15:10) [2]

сдвига с переносом...


 
Romkin ©   (2004-05-11 15:14) [3]

Вроде так пойдет:

function reverse (x: byte): byte;
begin
 x := (x and $55) shl 1 or (x shr 1) and $55;
 x := (x and $33) shl 2 or (x shr 2) and $33;
 x := (x and $0F) shl 4 or (x shr 4) and $0F;
 Result := x;
end;


 
WebErr ©   (2004-05-11 15:49) [4]

Есть асмовая команда, что-то вроде sor ax, 2 ... не помню точно...


 
Aleksandr ©   (2004-05-11 16:15) [5]

Спасибо, я надеялся на асмовское, но пойдет и сдвигами!


 
Digitman ©   (2004-05-11 16:23) [6]


> Aleksandr ©   (11.05.04 16:15) [5]


здрасть ! можно подумать, что i80х86 не имеет соотв.маш.инструкций ...


 
Anatoly Podgoretsky ©   (2004-05-11 16:41) [7]

BillyJeans ©   (11.05.04 15:10) [2]
Про переносы забыть, если без перехода на ассемблерные команды


 
WebErr ©   (2004-05-11 16:44) [8]


> если без перехода на ассемблерные команды

Чем Вам Асм не угодил? ;)


 
Anatoly Podgoretsky ©   (2004-05-11 16:46) [9]

Мне угодил, но вот проблема будет с переходом на Д8, а для решения данной задачи ассемблерный уровень не требуется!



Страницы: 1 вся ветка

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
1-1083956667
LAnd
2004-05-07 23:04
2004.05.23
Подсветка текста компоненты SynHighLighters (SynEdit, SynMemo)


1-1084037415
AndrewVolkov
2004-05-08 21:30
2004.05.23
Соответствие описания в C и Delphi


14-1083085696
Piter
2004-04-27 21:08
2004.05.23
Передача "Розыгрыш"


1-1084281702
SashaNevid
2004-05-11 17:21
2004.05.23
в caption верхние и нижние индексы?


1-1084261570
Erik
2004-05-11 11:46
2004.05.23
Внутри Try except имеется класс on E: do MyFunc(E)