PureBasic

Bonjour,

J'aurais besoin de lire tous les bits d'un octet.

Donc, pour lire mon octet, je fais

octet.b = ReadByte(FileID)

Mais comment faire pour lire les bits de mon octet ?

a.b=%10110010

For c=0 To 7
  Debug a & 1
  a>>1
Next c

@ peluche

et pour reprendre l'exemple de LNA,

une macro ReadBit(byte, offset) :

Macro ReadBit(byte, offset)
  ( ( (byte) >> (offset) ) & 1 )
EndMacro

For offset = 0 To 7
  Debug ReadBit(%10110010, offset)
Next

Nickel ! Merci les gens

[RESOLU] ReadBit... Bit & Octets