BIT.XOR

out = BIT.XOR( BYVAL op1 AS INTEGER

               BYVAL op2 AS INTEGER ) AS INTEGER

Bitwise XOR of op1 and op2.  Returns an integer

Example:

$LIBRARY "MyBASIC2_ExtLib.dll"

FUNCTION Toggle( state AS INTEGER ) AS INTEGER

  Toggle = BXOR( state, 1 )

END FUNCTION

DIM state AS INTEGER

state = 1

a = Toggle( state )

' Print some examples...

PRINT "BIT.AND( 0x00110011 & 0x00100010 ) = 0x";FORMAT( "%08X", BIT.AND( 0x00110011, 0x00100010 ) ),

PRINT "BIT.OR( 0x00110011 & 0x00100010 )  = 0x";FORMAT( "%08X", BIT.OR( 0x00110011, 0x00100010 ) ),

PRINT "BIT.XOR( 0x00110011 & 0x00100010 ) = 0x";FORMAT( "%08X", BIT.XOR( 0x00110011, 0x00100010 ) ),

PRINT "BIT.NOT( 0x00110011 )              = 0x";FORMAT( "%08X", BIT.NOT( 0x0F11F00E ) ),

PRINT "BIT.SHIFT( 0x00000011 ) << 1       = 0x";FORMAT( "%08X", BIT.SHIFT( 0x00000011, -1 ) ),

PRINT "BIT.SHIFT( 0x11000000 ) >> 7       = 0x";FORMAT( "%08X", BIT.SHIFT( 0x11000000, 7 ) ),

PRINT "WORD.HI( BIT.NOT( 0x0F11F00E ) )   = 0x";FORMAT( "%08X", WORD.HI( BIT.NOT( 0x0F11F00E ) ) ),

PRINT "WORD.LO( BIT.NOT( 0x0F11F00E ) )   = 0x";FORMAT( "%08X", WORD.LO( BIT.NOT( 0x0F11F00E ) ) ),

PRINT "LONG.MAKE( 0x12, 0x34 )            = 0x";FORMAT( "%08X", LONG.MAKE( 0x12, 0x34 ) ),

END