Table des Matières
Publicité
Pluviomètre à balance de série T-200B
'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 de ecart-type
If TimeIntoInterval(0,60,min) Then
Mesure_Geonor = false
GetRecord (Geonor_Traitement_5min,Geonor_traitement,1)
EndIf
'Appel les tableaux de sorties de donnees
CallTable Horaire
CallTable Quotidien
NextScan
EndProg
7.3.2 T-200B 3 capteurs – Programme exemplaire pour la mesure de
moyen de période
'Programme exemplaire pour le Geonor T-200B - version de 3 capteurs
'Mesure de moyen de periode (period average)
'Ce programme mesure un pluviometre a pese Geonor T-200B pour les derniers cinq
'minutes de chaque heure.
'Le moyen et l'ecart-type des valeur de profondeurs sont calcules et enregistres
'aux tableaux de sorties de donnees horaire et quotidien.
'ENTREZ LES NUMEROS DE SERIE DES CAPTEURS
'T-200B-1 (T1) - SN XXXXX
'T-200B-2 (T2) - SN XXXXX
'T-200B-3 (T3) - SN XXXXX
'ENTREZ LES CONSTANTES DE CALIBRATIONS SPECIFIQUES AUX CAPTEURS
Const T1_f0 = 1050
Const T1_A = 1.7E-2
Const T1_B = 9.2E-6
Const T2_f0 = 1050
Const T2_A = 1.7E-2
Const T2_B = 9.2E-6
Const T3_f0 = 1050
Const T3_A = 1.7E-2
Const T3_B = 9.2E-6
'Declarez les variables publiques et leurs unites
'Temperature du panneau du datalogger
Public PTemp
Units PTemp = degC
'Voltage du systeme d'alimentation
Public Batt_Volt
Units Batt_Volt = V
'Frequences brutes des capteurs individuels
Public T1_Freq, T2_Freq, T3_Freq
Units T1_Freq = Hz
Units T2_Freq = Hz
Units T3_Freq = Hz
'Profondeurs brutes des capteurs individuels
Public T1_Profondeur_Brute, T2_Profondeur_Brute, T3_Profondeur_Brute
22
Publicité
Table des Matières
