Campbell Scientific TB4 and TB4MM Hydrological Services Rain Gage - Manual (Page 10)

TB4 and TB4MM Rain Gage
5.1 Pulse Channel Example Programs
The following example programs use a pulse channel to read the output from
the rain gage.
5.1.1 CR1000 Pulse Channel Example
Although this example is for the CR1000, Campbell Scientific’s CR800,
CR850, CR3000, and CR5000 are programmed similarly.
'CR1000
'CR1000 Program for TB4
'Declare Variables and Units
Public Rain_mm
Units Rain_mm=mm
'Define Data Tables
DataTable(TB4_mm,True,-1)
DataInterval(0,60,Min,0)
Totalize(1,Rain_mm,IEEE4,0)
EndTable
'Main Program
BeginProg
Scan(1,Sec,1,0)
'TB4 Rain Gauge measurement Rain_mm:
PulseCount(Rain_mm,1,1,2,0,0.254,0)
'Call Data Tables and Store Data
CallTable(TB4_mm)
NextScan
EndProg
5.1.2 CR200(X) Series Pulse Channel Example
'CR200 Series
'TB4 program
'Declare Variables and Units
Public Rain_mm
Units Rain_mm=mm
'Define Data Tables
DataTable(TB4_mm,True,-1)
DataInterval(0,60,Min)
Totalize(1,Rain_mm,0)
EndTable
6