'CR1000X Series
'Created by Short Cut (4.4)

'Declare Variables and Units
Public BattV
Public PTemp_C
Public SoilVUE_5cm(4)
Public SoilVUE_10cm(4)
Public SoilVUE_20cm(4)
Public SoilVUE_30cm(4)
Public SoilVUE_40cm(4)
Public SoilVUE_50cm(4)
Public SoilVUE_60cm(4)
Public SoilVUE_75cm(4)
Public SoilVUE_100cm(4)

Alias SoilVUE_5cm(1)=IMNAV_RIDGE_SV_VolWatCnt_5cm
Alias SoilVUE_5cm(2)=IMNAV_RIDGE_SV_Permis_5cm
Alias SoilVUE_5cm(3)=IMNAV_RIDGE_SV_Tmp_5cm
Alias SoilVUE_5cm(4)=IMNAV_RIDGE_SV_BlkEleCon_5cm
Alias SoilVUE_10cm(1)=IMNAV_RIDGE_SV_VolWatCnt_10cm
Alias SoilVUE_10cm(2)=IMNAV_RIDGE_SV_Permis_10cm
Alias SoilVUE_10cm(3)=IMNAV_RIDGE_SV_Tmp_10cm
Alias SoilVUE_10cm(4)=IMNAV_RIDGE_SV_BlkEleCon_10cm
Alias SoilVUE_20cm(1)=IMNAV_RIDGE_SV_VolWatCnt_20cm
Alias SoilVUE_20cm(2)=IMNAV_RIDGE_SV_Permis_20cm
Alias SoilVUE_20cm(3)=IMNAV_RIDGE_SV_Tmp_20cm
Alias SoilVUE_20cm(4)=IMNAV_RIDGE_SV_BlkEleCon_20cm
Alias SoilVUE_30cm(1)=IMNAV_RIDGE_SV_VolWatCnt_30cm
Alias SoilVUE_30cm(2)=IMNAV_RIDGE_SV_Permis_30cm
Alias SoilVUE_30cm(3)=IMNAV_RIDGE_SV_Tmp_30cm
Alias SoilVUE_30cm(4)=IMNAV_RIDGE_SV_BlkEleCon_30cm
Alias SoilVUE_40cm(1)=IMNAV_RIDGE_SV_VolWatCnt_40cm
Alias SoilVUE_40cm(2)=IMNAV_RIDGE_SV_Permis_40cm
Alias SoilVUE_40cm(3)=IMNAV_RIDGE_SV_Tmp_40cm
Alias SoilVUE_40cm(4)=IMNAV_RIDGE_SV_BlkEleCon_40cm
Alias SoilVUE_50cm(1)=IMNAV_RIDGE_SV_VolWatCnt_50cm
Alias SoilVUE_50cm(2)=IMNAV_RIDGE_SV_Permis_50cm
Alias SoilVUE_50cm(3)=IMNAV_RIDGE_SV_Tmp_50cm
Alias SoilVUE_50cm(4)=IMNAV_RIDGE_SV_BulkEleCon_50cm
Alias SoilVUE_60cm(1)=IMNAV_RIDGE_SV_VolWatCnt_60cm
Alias SoilVUE_60cm(2)=IMNAV_RIDGE_SV_Permis_60cm
Alias SoilVUE_60cm(3)=IMNAV_RIDGE_SV_Tmp_60cm
Alias SoilVUE_60cm(4)=IMNAV_RIDGE_SV_BlkEleCon_60cm
Alias SoilVUE_75cm(1)=IMNAV_RIDGE_SV_VolWatCnt_75cm
Alias SoilVUE_75cm(2)=IMNAV_RIDGE_SV_Permis_75cm
Alias SoilVUE_75cm(3)=IMNAV_RIDGE_SV_Tmp_75cm
Alias SoilVUE_75cm(4)=IMNAV_RIDGE_SV_BlkEleCon_75cm
Alias SoilVUE_100cm(1)=IMNAV_RIDGE_SV_VolWatCnt_100cm
Alias SoilVUE_100cm(2)=IMNAV_RIDGE_SV_Permis_100cm
Alias SoilVUE_100cm(3)=IMNAV_RIDGE_SV_Tmp_100cm
Alias SoilVUE_100cm(4)=IMNAV_RIDGE_SV_BlkEleCon_100cm

Units BattV=Volts
Units PTemp_C=Deg C
Units IMNAV_RIDGE_SV_VolWatCnt_5cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_5cm=unitless
Units IMNAV_RIDGE_SV_Tmp_5cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_5cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_10cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_10cm=unitless
Units IMNAV_RIDGE_SV_Tmp_10cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_10cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_20cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_20cm=unitless
Units IMNAV_RIDGE_SV_Tmp_20cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_20cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_30cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_30cm=unitless
Units IMNAV_RIDGE_SV_Tmp_30cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_30cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_40cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_40cm=unitless
Units IMNAV_RIDGE_SV_Tmp_40cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_40cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_50cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_50cm=unitless
Units IMNAV_RIDGE_SV_Tmp_50cm=Deg C
Units IMNAV_RIDGE_SV_BulkEleCon_50cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_60cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_60cm=unitless
Units IMNAV_RIDGE_SV_Tmp_60cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_60cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_75cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_75cm=unitless
Units IMNAV_RIDGE_SV_Tmp_75cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_75cm=dS/m
Units IMNAV_RIDGE_SV_VolWatCnt_100cm=m^3/m^3
Units IMNAV_RIDGE_SV_Permis_100cm=unitless
Units IMNAV_RIDGE_SV_Tmp_100cm=Deg C
Units IMNAV_RIDGE_SV_BlkEleCon_100cm=dS/m

'Define Data Tables
DataTable(IMNAV_RIDGE_DATA,True,-1)
	DataInterval(0,60,Min,10)
	Sample(1,BattV,FP2)
	Sample(1,PTemp_C,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_5cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_5cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_5cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_5cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_10cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_10cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_10cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_10cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_20cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_20cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_20cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_20cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_30cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_30cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_30cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_30cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_40cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_40cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_40cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_40cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_50cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_50cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_50cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BulkEleCon_50cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_60cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_60cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_60cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_60cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_75cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_75cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_75cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_75cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_VolWatCnt_100cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Permis_100cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_Tmp_100cm,FP2)
	Sample(1,IMNAV_RIDGE_SV_BlkEleCon_100cm,FP2)
EndTable

'Main Program
BeginProg
	'Main Scan
	Scan(60,Min,1,0)
	  'radio control sequence, radio on for 1 cycle at noon of every 24hrs
    If TimeIntoInterval (720,1440,min) = True Then
      SW12 (SW12_2,1,1)
    EndIf
    If TimeIntoInterval (720,1440,min) = False Then
      SW12 (SW12_2,0,1)
    EndIf
		'Default CR1000X Datalogger Battery Voltage measurement 'BattV'
		Battery(BattV)
		'Default CR1000X Datalogger Wiring Panel Temperature measurement 'PTemp_C'
		PanelTemp(PTemp_C,60)
		'Measure the SoilVUE10 Complete Soil Profiler every hour
		If TimeIntoInterval(0,1,Hr) Then
			'Turn the SoilVUE10 Complete Soil Profiler on
			SW12(SW12_1,1,0)
			'Let the SoilVUE10 Complete Soil Profiler warm-up before taking measurements
			Delay(0,2,Sec)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_5cm', 'Ka_5cm', 'T_5cm', and 'BulkEC_5cm'
			SDI12Recorder(SoilVUE_5cm(),C1,0,"M1!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_10cm', 'Ka_10cm', 'T_10cm', and 'BulkEC_10cm'
			SDI12Recorder(SoilVUE_10cm(),C1,0,"M2!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_20cm', 'Ka_20cm', 'T_20cm', and 'BulkEC_20cm'
			SDI12Recorder(SoilVUE_20cm(),C1,0,"M3!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_30cm', 'Ka_30cm', 'T_30cm', and 'BulkEC_30cm'
			SDI12Recorder(SoilVUE_30cm(),C1,0,"M4!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_40cm', 'Ka_40cm', 'T_40cm', and 'BulkEC_40cm'
			SDI12Recorder(SoilVUE_40cm(),C1,0,"M5!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_50cm', 'Ka_50cm', 'T_50cm', and 'BulkEC_50cm'
			SDI12Recorder(SoilVUE_50cm(),C1,0,"M6!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_60cm', 'Ka_60cm', 'T_60cm', and 'BulkEC_60cm'
			SDI12Recorder(SoilVUE_60cm(),C1,0,"M7!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_75cm', 'Ka_75cm', 'T_75cm', and 'BulkEC_75cm'
			SDI12Recorder(SoilVUE_75cm(),C1,0,"M8!",1,0,-1)
			'SoilVUE10 Complete Soil Profiler measurements 'VWC_100cm', 'Ka_100cm', 'T_100cm', and 'BulkEC_100cm'
			SDI12Recorder(SoilVUE_100cm(),C1,0,"M9!",1,0,-1)
			'Turn the SoilVUE10 Complete Soil Profiler off
			SW12(SW12_1,0,0)
		EndIf
		'Call Data Tables and Store Data
		CallTable IMNAV_RIDGE_DATA
	NextScan
EndProg