Appendix B. Example Programs
B.2 Control Port Example
The following example program uses a control port to read the output from the
precipitation gage. The CR1000 example will also work with the CR800,
CR850, and CR3000.
'CR1000
'RM_Young Tipping Blk > C4
'
Wht > 5v
'Cabling for heater goes to 24VAC power supply
'Declare Variables and Units
Public BattV
Public RM_Young
Units BattV = Volts
Units RM_Young =inch
DataTable(OneMin,True,-1)
DataInterval(0,1,Min,10)
Totalize (1,RM_Young,FP2,False)
EndTable
'Define Data Tables
DataTable(OneDay,True,-1)
DataInterval(0,1440,Min,10)
Minimum(1,BattV,FP2,False,False)
Totalize (1,RM_Young,FP2,False) 'RM Young tipping bucket
EndTable
'Main Program
BeginProg
Scan(5,Sec,1,0)
'Default Datalogger Battery Voltage measurement BattV
PanelTemp (PTemp,_60Hz)
Battery(BattV)
'RM Young Heated Rain Gage measurement Rain_in
PulseCount(RM_Young,1,14,2,0,0.0039,0)
'Call Data Tables and Store Data
CallTable(OneMin)
CallTable(OneDay)
NextScan
EndProg
B-4
