Function:   UTISBIT( <expC1>, <expN1> ) --> logical

Synopsis:   Test bitstatus of bits in a BYTE (character)

            <expC1> BYTE or character to examine

            <expN1> Bitposition to examine (0 - 7, right to left )
                    i.e. 0 is equal to rightmost bit,
                         7 is equal to leftmost bit.

            Checks the identified Bit position in a given Byte for
            the status of the identified Bit.

Examples:   lBitflag := UTISBIT(CHR(65), 7)

            ? lBitflag                  // result: .T.

            ? UTISBIT('A', 5)           // result: .F.

Returns:    .T. if designated bit is set,
            .F. if bit is not set,
            otherwise NIL