Click above to get retro games delivered to your door ever month!

 maskbit()           Logical bitwise comparison
------------------------------------------------------------------------------
 Declaration
   bit.hdr

 Syntax
   func logical maskbit extern
   param value uint uNumber, ;
         value uint uBitMask

 Arguments
   uNumber is a numeric expression.
   uBitMask is a numeric whose bits are used in testing.

 Return
   A logical indicating if the operation resulted in a number different
   from zero.

 Description
   This function tests each single bit in uNumber against uBitMask. The
   effect of the function is equivalent to encoding

   and( uNumber, uBitMask ) == uBitMask

 Example
   #define EXAMPLE_MATH
   #include example.hdr

   proc Test_maskbit
   ? maskbit( 7,  5 )         // prints .t.
   ? and(     7,  5 ) ==  5   // prints .t.
   ? maskbit( 7, 16 )         // prints .f.
   ? and(     7, 16 ) == 16   // prints .f.
   endproc

   proc main
   Test_maskbit()
   endproc