Read individual bits from a byte in VO

[DPEETERS]

Hi All,

I need to read the individual state of a bit , can sombody help me on this subject.

thanks,
dirk

[SHirsch]

Hello Dirk,

a sample

Code: Select all

LOCAL n AS INT
   
n := 3
IF _AND(n,0x01) > 0  //true
   ?"Bit0"
ENDIF
IF _AND(n,0x02) > 0   //true
   ?"Bit1"
ENDIF
IF _AND(n,0x04) > 0  //false
   ?"Bit2"
ENDIF

Stefan

[SHirsch]

Hi Dirk,

if you like shifting bits

Code: Select all

   LOCAL n AS INT
   
   n := 3
   IF _AND(n,1) > 0  //true
      ?"Bit0"
   ENDIF
   IF _AND(n>>1,1) > 0 //true
      ?"Bit1"
   ENDIF
   IF _AND(n>>2,1) > 0  //false
      ?"Bit2"
   ENDIF

Stefan

[DPEETERS]

Hi Stefan,

thanks for the reply i give it a try.

regards,
dirk