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

[("")(Э_Є)("")]

Как можно установит конкретный бит числа без потерь информации? То есть, что бы соседей этого бита не утратить.

[Serge_Bliznykov]

mov ax, ЧИСЛО
or ax, МАСКА

маска - это число, где единица (или единицы) стоят на нужных местах. Например, чтобы установить 2-й бит числа (напоминаю, что биты нумеруются справа налево, начиная с нуля) маска должна быть 04h

[airyashov]

bts база,смещение

[("")(Э_Є)("")]

Спасибо, попробую приладить.

[MalCer]

можно как здесь, а можно так:

procedure SetBit(var N: Longint; nBit: Byte);
{N - число
 nBit - номер бита}
begin
  N := ((1 shl (nBit - 1)) or N);
end;