beautypg.com

Campbell Scientific CNR1 Net Radiometer User Manual

Page 18

background image

CNR1 Net Radiometer

'Main Program

BeginProg

Scan(2,Sec,1,0)

'Default Datalogger Battery Voltage measurement Batt_Volt:

Battery(Batt_Volt)

'CNR1 Net Radiometer measurements CM3Up, CM3Dn, CG3Up, CG3Dn, CNR1TC, CNR1TK,

'NetRs, NetRl, Albedo, UpTot, DnTot, NetTot, CG3UpCo, and CG3DnCo:

* VoltDiff(CM3Up,1,mV25,1,True,0,_60Hz,100.0,0)

* VoltDiff(CM3Dn,1,mV25,2,True,0,_60Hz,100.0,0)

* VoltDiff(CG3Up,1,mV7_5,3,True,0,_60Hz,100.0,0)

* VoltDiff(CG3Dn,1,mV7_5,4,True,0,_60Hz,100.0,0)

** BrHalf4W (CNR1TC,1,mV25,mV25,5,Vx1,1,2100,True ,True ,0,250,1.0,0)

PRT(CNR1TC,1,CNR1TC,1,0)

CNR1TK=CNR1TC+273.15

NetRs=CM3Up-CM3Dn

NetRl=CG3Up-CG3Dn

Albedo=CM3Dn/CM3Up

UpTot=CM3Up+CG3Up

DnTot=CM3Dn+CG3Dn

NetTot=UpTot-DnTot

CG3UpCo=CG3Up+5.67*10^-8*CNR1TK^4

CG3DnCo=CG3Dn+5.67*10^-8*CNR1TK^4

'Call Data Tables and Store Data

CallTable(Table1)

NextScan
EndProg

* mV20 range for the CR5000
** mV50 range (both) with 4200 mV excitation for CR5000

6.2.2 Example 2, CR5000 Using Differential Channels (no 4WPB100)

Program Example 2 requires five differential channels and one current
excitation channel to measure the four radiation outputs and the Pt-100
temperature sensor. The program measures the sensors every second and
calculates and stores the following data to final storage every 60 minutes:

Year
Julian

Day

Hour/Minute

Avg CM3 Up (shortwave radiation)

Avg CM3 Down (shortwave radiation)

Avg CG3 Up (longwave radiation)

Avg CG3 Down (longwave radiation)

Avg CNR1 temperature (degrees C)

Avg CNR1 temperature (degrees K)

Avg Net shortwave radiation

Avg Net longwave radiation

Avg

Albedo

Avg Total Net radiation

Avg temperature corrected CG3 Up

Avg temperature corrected CG3 Down

14