TSTBIT - test a bit in a word.
Usage:
call tstbit(bit, word, value)
Where:
- bit
- is the bit within "word" to test.
- word
- is an single word integer or real variable with the bit
to test.
- value
- is an integer variable that will be set to the value of
the bit being tested.
Description:
TSTBIT tests a bit in a word. The most significant (left most)
bit is numbered 0, the least significant 35.
This routine is obsolete, use the intrinsic functions FLD or
AND instead.
Copyright © 1996, Thinkage Ltd.