Campbell TE525 Instrukcja Obsługi Pobierz pdf (Strona 24)

Appendix B. Example Programs

B.2 CR200(X) Series Example Program

'Program records precipitation from one TE525 or TE525WS Rain Gage once a

'second and stores the total every 60 minutes

'Wiring Diagram

'==============

'TE525 or TE525WS

' Wire

' Color Function CR1000

' ----- -------- ------

' Black Pulse Output P1

' White Ground AG*

' Clear Shield AG*

'*AG = Analog Ground (represented by ground symbol on CR200(X) wiring panel

'Declare the variables and units for the rain measurement

Public Rain_mm

Units Rain_mm=mm

'Define Data Tables

DataTable(Rain,True,-1)

DataInterval(0,60,Min)

Totalize(1,Rain_mm,0)

EndTable

'Main Program

BeginProg

Scan(1,Sec)

'TE525/TE525WS Rain Gage measurement Rain_mm:

PulseCount(Rain_mm,P_SW,2,0,0.254,0)

'For TE525MM Rain Gage, use multiplier of 0.1 in PulseCount instruction

'Call Data Tables and Store Data

CallTable(Rain)

NextScan

EndProg

B-2

1 2 ... 19 20 21 22 23 24 25 26 27 28 29 30

Brak uwag

Campbell TE525 Instrukcja Obsługi Strona 24