Главная страница
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.038 c
8-1076917382
SergeySA
2004-02-16 10:43
2004.05.23
Принадлежит ли точка области (полигону)


14-1083762653
Undert
2004-05-05 17:10
2004.05.23
Блин, задолбало!


9-1074587020
Hex0DesiMaL
2004-01-20 11:23
2004.05.23
"Наползание" объектов


6-1080736606
Игорь
2004-03-31 16:36
2004.05.23
WebBrowser: поиск текста


1-1084287795
Гямук
2004-05-11 19:03
2004.05.23
Как убрать форму, но при этом оставить события...