Campbell-scientific CR3000 Micrologger Bedienungsanleitung Seite 253

  • Herunterladen
  • Zu meinen Handbüchern hinzufügen
  • Drucken
  • Seite
    / 590
  • Inhaltsverzeichnis
  • FEHLERBEHEBUNG
  • LESEZEICHEN
  • Bewertet. / 5. Basierend auf Kundenbewertungen
Seitenansicht 252
Section 7. Installation
253
'Declare Variables
Public PTemp, Batt_Volt, Level, TimeIntoTest
Public Counter(10)
Public Flag(8) As Boolean
'Define Data Tables
DataTable(LogTable,1,-1)
Minimum(1,Batt_Volt,FP2,0,False)
Sample(1,PTemp,FP2)
Sample(1,Level,FP2)
Sample(1,TimeIntoTest, FP2)
EndTable
'Main Program
BeginProg
Scan(1,Sec,0,0)
If TimeIntoInterval(0,1,Min) Then Flag(1) = True
If Flag(1) = True Then ExitScan
NextScan
'10 Second Data Interval
If Flag(1) = True Then
Scan(10,Sec,0,60)
Counter(2) = Counter(2) + 1
Battery(Batt_volt)
PanelTemp(PTemp,250)
TCDiff(Level,1,mV20,1,TypeT,PTemp,True ,0,250,1.0,0)
If TimeIntoInterval(0,1,Min) Then
TimeIntoTest = TimeIntoTest + 1
EndIf
'Call Output Tables
CallTable LogTable
NextScan
'30 Second Data Interval
Scan(30,Sec,0,40)
counter(3) = counter(3) + 1
Battery(Batt_volt)
PanelTemp(PTemp,250)
TCDiff(Level,1,mV20,1,TypeT,PTemp,True ,0,250,1.0,0)
If TimeIntoInterval(0,1,Min) Then
TimeIntoTest = TimeIntoTest + 1
EndIf
'Call Output Tables
CallTable LogTable
NextScan
Seitenansicht 252
1 2 ... 248 249 250 251 252 253 254 255 256 257 258 ... 589 590

Kommentare zu diesen Handbüchern

Keine Kommentare