Campbell-scientific CR3000 Micrologger Manual de usuario Pagina 253

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 590
  • Tabla de contenidos
  • SOLUCIÓN DE PROBLEMAS
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 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
Vista de pagina 252
1 2 ... 248 249 250 251 252 253 254 255 256 257 258 ... 589 590

Comentarios a estos manuales

Sin comentarios