Campbell Scientific IRTS-P Precision Infrared Temperature Sensor - Manual (Page 15)

IRTS-P Precision Infrared Temperature Sensor
11
CR5000 Example Program
Public RefT, TargetCorrT, TC(2), SensorCorr, Psb, Hsb, Ksb
Alias TC(1) = TargetApparentT
Alias TC(2) = SensorBodyT
DataTable (AllDat,1,-1)
DataInterval
(0,60,Min,10)
Average (1,RefT,FP2,0)
Average (2,TC(),IEEE4,0)
Average (1,TargetCorrT,IEEE4,0)
EndTable
BeginProg
Scan
(1,Sec,3,0)
PanelTemp (RefT,250)
TCDiff (TC(),2,mV20C ,1,TypeK,RefT,True ,0,_60Hz,1.0,0)
Psb = 49.9092 + 0.59237 * SensorBodyT - 0.00558 * SensorBodyT^2
Hsb = 4.2828 + 0.4248 * SensorBodyT - 0.00077 * SensorBodyT^2
Ksb = 52.0705 - 5.3816 * SensorBodyT + 0.387 * SensorBodyT^2
SensorCorr = (0.25/Psb) * ((TargetApparentT - Hsb)^2 - Ksb)
TargetCorrT = TargetApparentT - SensorCorr
CallTable Alldat
NextScan
EndProg
6. Maintenance
As with any optical sensor, it is important to keep the lens and view clean.
Otherwise the sensor will be measuring the temperature of the obstruction
instead of the surface of interest.
Clean the lens gently with a moistened cotton swab. Distilled water or alcohol
works well for most dust/dirt. Salt deposits dissolve better in a weak acid
solution (~0.1 molar).