Value = BClr ( Number , Bit )
Возвращает Number с его Bitth очищенным битом.
PRINT BClr(15, 1)13
PRINT BClr(13, 1)13
AND, BChg, BSet, BTst, NOT, OR, Shl, Shr, XOR