Вниз
Скачать: CL | DM;

Работа с битами   Найти похожие ветки 

← →
Alek ©   (2004-06-17 13:28) [0]

Добрый день всем!

Есть вопросик.
Вот у меня есть три байта

например "qwe" в них находится 18 бит.
Так вот как мне получить только первый 6 бит??


← →
clickmaker ©   (2004-06-17 13:33) [1]

6Bits := 18Bits and $3F;


← →
Rater   (2004-06-17 13:38) [2]

Ну в зависимости от того с какой стороны он у тебя или в q или e
посмотреть какой там бит Я на вскидку могу предложить сделать ротацию в лево (6 или 2) и сравнить с 10000000b = 128 если больше либо равно то бит 1 иначе 0.
Наверно есть проще метод.


← →
evvcom ©   (2004-06-17 13:44) [3]

В трех байтах вообще-то 24 бита, а не 18. А для строчных "qwe" как раз 6-й бит равен 1 (при нумерации битов в байте справа налево, начиная с 0), так его что, игнорировать? Тогда получишь "QWE".


← →
Alek ©   (2004-06-17 13:56) [4]


> evvcom ©   (17.06.04 13:44) [3]


а ведь ты прав :) в одном байте 8 бит :).

Вообщем идея такова, есть строка ее нужно разбить на блоки по 6 бит, и каждые 6 бит обозначиьт каким нить знаком. Как это лучше сделать?? А то я очень плохо работаю с битами.


← →
Alek ©   (2004-06-17 15:06) [5]

Хорошо тогда вот такой вопрос.

Как мне узнать биты например вот этого символа "я"??
в таком виде

00100000


← →
Anatoly Podgoretsky ©   (2004-06-17 15:17) [6]

Это называется Base64


← →
Alek ©   (2004-06-17 15:45) [7]

Огромное спасибо Анатолий за подсказку :)


← →
TUser ©   (2004-06-17 15:57) [8]


> Вообщем идея такова, есть строка ее нужно разбить на блоки
> по 6 бит, и каждые 6 бит обозначиьт каким нить знаком. Как
> это лучше сделать??

Лучше возьми класс TBits. Хотя, если для самообразования, - то наверное, лучше ручками. Для получения в виду 100010... надо записать число в 2-ричной системе. Примерно так
result:=""; i:=ord(c); // c:char
while i>0 do begin
  result:=chr(i mod 2) + result;
  i:=i shr 1;
  end;
Еще, кстати, у Анатолия на сайте есть описание приемов работы с битами.

ЗЫ. Архиватор будет или что?



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
3-1086685052
serg128
2004-06-08 12:57
2004.07.04
Как динамически добавить поле типа Lookup в TClientDataSet?


14-1087398509
DSKalugin
2004-06-16 19:08
2004.07.04
Серийный номер тома


14-1087281894
gn
2004-06-15 10:44
2004.07.04
КРУПНЕЙШАЯ МАТЕМАТИЧЕСКАЯ ПРОБЛЕМА РЕШЕНА В ИНТЕРНЕТЕ


1-1087801439
Lion
2004-06-21 11:03
2004.07.04
Прерывания


1-1087453402
MVA
2004-06-17 10:23
2004.07.04
Версия программы




   Наверх