Битовые операции Опции

[Scorp_Freeman]

Значит есть b:byte;
Как установить n-й бит в значение х ?

Либо какими командами ассемблера это можно сделать ?

asm
???
???
end;

[мисс_граффити]

             asm
              mov AL,f
              or c,AL
            end;

             asm
              mov AL,f
              and c,AL
            end;

смотря чему равен х...

то есть, например, 110 and 011 даст 010 (установили первый бит в 0)
001 or 101 даст 101 (установили первый в 1)

[Scorp_Freeman]

смотря чему равен х...

чему он будет равняться я не знаю, он будет постоянно меняться, а также номер бита который надо будет устанавливать также будет меняться.

Мне нужно будет в байт к примеру ???????? на место второго бита поставить сооветствующий бит
другого байта 000000?0. Если бы у меня второй байт был 111111?1 я бы просто использовал AND (

[hardcase]

чему он будет равняться я не знаю, он будет постоянно меняться, а также номер бита который надо будет устанавливать также будет меняться.

Мне нужно будет в байт к примеру ???????? на место второго бита поставить сооветствующий бит
другого байта 000000?0. Если бы у меня второй байт был 111111?1 я бы просто использовал AND (

b1 := b1 or (b2 and (1 shl n))

добавил: у меня биты нумеруются с нуля.

Сообщение отредактировано: hardcase - 13.04.2007 18:58

[hiv]

у меня биты нумеруются с нуля.

И у меня с нуля

procedure changebit(var x:byte;n:byte;bit:byte);
begin
  if bit=0 then x:=x and (not(1 shl n))
  else x:=x or (1 shl n)
end;

var bb:byte;

begin
   bb:=133;
   changebit(bb,2,0);
   writeln(ord(bb));
end.

x - исходная переменная
n - номер бита
bit - во что устанавливаем 0 / 1