Appendix A. Example Programs
A-2
PT100 Temperature Sensor Connections to 4WPB100 and Datalogger
Color
Function
4WPB100 CR1000
Black
Wire
EX1
H
5H
Red PT100 Exci
L
5L
Blue PT100 Excitation –
G
⏚
White
PT100
6H
Green
PT100 Signal –
6L
'CR1000
'Declare Variables and Units
Public Batt_Volt
Public SR01Up
Public SR01Dn
Public IR01Up
Public IR01Dn
Public NR01TC
Public NR01TK
Public NetRs
Public NetRl
Public Albedo
Public UpTot
Public DnTot
Public NetTot
Public IR01UpCo
Public IR01DnCo
Units Batt_Volt=Volts
Units SR01Up=W/m2
Units SR01Dn=W/m2
Units IR01Up=W/m2
Units IR01Dn=W/m2
Units NR01TC=Deg C
Units NR01TK=K
Units NetRs=W/m2
Units NetRl=W/m2
Units Albedo=W/m2
Units UpTot=W/m2
Units DnTot=W/m2
Units NetTot=W/m2
Units IR01UpCo=W/m2
Units IR01DnCo=W/m2
'Typical data on the calibration sheet might be
'
Sensitivity µV/W/m^2
'Pyranometer UP SR01
15.35
'Pyranometer DOWN SR01
13.30
'Pyrgeometer UP IR01
8.5
'Pyrgeometer DOWN IR01
8.2
'So load the four calibration coefficients specific to this sensor
(1000/Sensitivity)
Const SR01Upcal = 65.146
Const SR01Downcal = 75.18
Const IR01Upcal = 117.65
Const IR01Downcal = 121.95
