Appendix B. Example Programs
B-2
'Call Data Tables and Store Data
CallTable
(Table1)
CallTable
(Table2)
NextScan
EndProg
B.2 Example CR6 Program
CRBasic Example B-2. CR6 Program
'CR6 Series
'Declare Variables and Units
Public
BattV
Public
PTemp_C
Public
SlrW
Public
SlrMJ
Units
BattV=Volts
Units
PTemp_C=Deg C
Units
SlrW=W/m^2
Units
SlrMJ=MJ/m^2
'Define Data Tables
DataTable
(Table1,True,-1)
DataInterval
(0,60,Min,10)
Average
(1,SlrW,FP2,False)
EndTable
DataTable
(Table2,True,-1)
DataInterval
(0,1440,Min,10)
Minimum
(1,BattV,FP2,False,False)
Totalize
(1,SlrMJ,IEEE4,False)
EndTable
'Main Program
BeginProg
'Main Scan
Scan
(10,Sec,1,0)
'Default Datalogger Battery Voltage measurement 'BattV'
Battery
(BattV)
'Default Wiring Panel Temperature measurement 'PTemp_C'
PanelTemp
(PTemp_C,60)
'LI200RX Pyranometer measurements 'SlrMJ' and 'SlrW'
'Measurement returns SlrW in millivolts.
VoltDiff
(SlrW,1,mV200,U1,True,0,60,1,0)
'Set negative value to zero.
If SlrW<0 Then SlrW=0
'Convert millivolts to Megajoules/m².
SlrMJ=SlrW*0.002
'Convert millivolts to Watts/m²
SlrW=SlrW*200
'Call Data Tables and Store Data
CallTable
Table1
CallTable
Table2
NextScan
EndProg
Summary of Contents for LI200RX
Page 2: ......
Page 6: ......
Page 22: ...LI200RX Pyranometer 14 ...
Page 24: ......
Page 27: ......