'CR800 Series Datalogger
'Pumping sampler test program
'Attempts to activate either Sampler 1 or Sampler 2 every 3 min.
'Set Flag 1 to activate ISCO 1, deactivate Flag 1 to turn off
'Set Flag 2 to activate ISCO 2, deactivate Flag 2 to turn off
'Connect sampler 1 to Port 2 (C2), via flow connector
'Connect sampler 2 to Port 3 (C3), via flow connector
'Sampler must be set to Flow mode, 1 pulse per sample
'Date: 4/27/2007
'Program author: R. Eads, RiverMetrics LLC

'\\\\\\\\\\\\\\\\\\\\\\\\\ DECLARATIONS /////////////////////////

PreserveVariables
Public Flag(2) as BOOLEAN

'\\\\\\\\\\\\\\\\\\\\\\\\\\\ MAIN PROGRAM ////////////////////////////

BeginProg
   SequentialMode
   Scan(3,Min, 3, 0)
      If Flag(1) = True Then
         'Pulse Port 2 to trigger pump sampler on C2
         PortSet(2,1)
         Delay(0,100,mSec)
         PortSet(2,0)
      Else If Flag(2) = True Then
         'Pulse Port 3 to trigger second pump sampler on C3
         PortSet(3,1)
         Delay(0,100,mSec)
         PortSet(3,0)
      EndIf
   NextScan
EndProg

'\\\\\\\\\\\\\\\\\\\\\\\\\\\ END MAIN PROGRAM ////////////////////////////