Table des Matières
Publicité
Pluviomètre à balance de série T-200B
Sample(1,T3_Freq,IEEE4)
EndTable
'Programme principal
BeginProg
Scan (5,Sec,0,0)
PanelTemp (PTemp,_60Hz)
Battery (Batt_Volt)
'Allume la variable booleene a cinq minutes avant l'heure pour alimenter
'et mesurer le Geonor pour cinq minutes
If TimeIntoInterval(55,60,min) Then
Mesure_Geonor = true
EndIf
If Mesure_Geonor = true Then
'Allume le capteur
SW12(1)
'Commence le temps d'echauffement de 15 secondes
Geonor_echauffement = Timer (1,Sec,0)
'Commence les mesures apres le temps d'echauffement
If Geonor_echauffement >= 15 Then
'Mesure le capteur T1 avec l'instruction Period Average (moyen de periode)
PeriodAvg (T1_Freq,1,mV250,1,0,1,1000,1000,1,0)
'Convertis a profondeur en utilisant l'equation de calibration [mm]
T1_Profondeur_Brute = (T1_A * (T1_Freq - T1_f0) + T1_B * (T1_Freq - T1_f0) ^2 ) * 10
'Mesure le capteur T2 avec l'instruction Period Average (moyen de periode)
PeriodAvg (T2_Freq,1,mV250,2,0,1,1000,1000,1,0)
'Convertis a profondeur en utilisant l'equation de calibration [mm]
T2_Profondeur_Brute = (T2_A * (T2_Freq - T2_f0) + T2_B * (T2_Freq - T2_f0) ^2 ) * 10
'Mesure le capteur T3 avec l'instruction Period Average (moyen de periode)
PeriodAvg (T3_Freq,1,mV250,3,0,1,1000,1000,1,0)
'Convertis a profondeur en utilisant l'equation de calibration [mm]
T3_Profondeur_Brute = (T3_A * (T3_Freq - T3_f0) + T3_B * (T3_Freq - T3_f0) ^2 ) * 10
'Appel le tableau de traitement Geonor
CallTable Geonor_traitement
EndIf
Else
'Eteint le capteur
SW12(0)
'Reset le temps d'echauffement
Geonor_echauffement = Timer(1,Sec,3)
EndIf
'A chaque heure, fais le suivant:
'Eteint la variable booleene pour desalimenter et arreter de mesurer le Geonor;
'et extrait les valeurs de moyen et d'ecart-type
If TimeIntoInterval(0,60,min) Then
Mesure_Geonor = false
GetRecord (Geonor_Traitement_5min,Geonor_traitement,1)
EndIf
'Calcule le moyen
'Calculate the overall average and standard deviation for the Geonor gauge
Geonor_Profondeur_Moyen = (T1_Profondeur_Moyen + T2_Profondeur_Moyen +
T3_Profondeur_Moyen) / 3
Geonor_Profondeur_EcartType = SQR( (T1_Profondeur_EcartType^2 +
T2_Profondeur_EcartType^2 + T3_Profondeur_EcartType^2) / 3 )
'Appel les tableaux de sorties de donnees
CallTable Horaire
CallTable Quotidien
24
Publicité
Table des Matières
