Campbell Scientific CR1000 Measurement and Control System - Manual (Page 229)

Section 7. Installation
229
Figure 78: Bool8 data from bit-shift example (PC data file)
CRBasic Example 47. Programming with Bool8 and a bit‐shift operator
Public Alarm(32)
Public Flags As Long
Public FlagsBool8(4) As Long
DataTable (Bool8Data,True,-1)
DataInterval (0,1,Sec,10)
'store bits 1 through 16 in columns 1 through 16 of data file
Sample (2,FlagsBool8(1),Bool8)
'store bits 17 through 32 in columns 17 through 32 of data file
Sample (2,FlagsBool8(3),Bool8)
EndTable
BeginProg
Scan (1,Sec,3,0)
'Reset all bits each pass before setting bits selectively
Flags = &h0
'Set bits selectively. Hex is used to save space.
'Logical OR bitwise comparison