Campbell-scientific SDM-CD8S 8 Channel Solid State DC Control Module Uživatelský manuál Strana 29

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 32
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 28
SDM-CD8S 8 Channel Solid State DC Control Module
'Load Sequence Timing Array
For I = 1 To 10
'Load the Valve and Timing Array with the valve Settings:
ValveTime(I,1) = SiteValve(SiteSequence(I))
'Load the Valve and Timing Array with the number of scans at each setting:
ValveTime(I,2) = 30
Next I
'Initialize Variables
One=1
SeqIndex=1
Count = 1
SeqActiveFlag = True
Site = SiteSequence(SeqIndex)
SiteOutput = Site
Scan (1,Sec,10,0)
'Instructions to Measure Sensors Inserted Here.
'Set valves:
SDMCD16AC (ValveTime(1,1),1,1)
'Call Data Tables:
CallTable RawData
CallTable SiteAvg
Count = Count + 1
SiteOutput=Site
If SiteAvg.Output(1,1) Then Count = 1 'Reset Count when the
'Site average is output
If SeqActiveFlag Then
Site = SiteSequence(SeqIndex) 'Show the site number set by
'the Timed Control
If SeqProgrammedFlag = False Then 'Reset the first valve to
'the automatic value
ValveTime(1,1) = SiteValve(1)
ValveTime(1,2) = 30
TimedControl(10,2,Min,1,SeqIndex,ValveTime,2)
TimedControl(10,2,Min,1,SeqIndex,ValveTime,2)
SeqProgrammedFlag = True
EndIf
Else 'Set the first valve setting to that for the current Site
'The Site number may be changed by user to switch sites.
ValveTime(1,1) = SiteValve(Site)
ValveTime(1,2) = 0
If SeqProgrammedFlag = True Then 'Set the timed control to only
'use The first value
TimedControl(1,0,Min,SiteValve(Site),SeqIndex,ValveTime,1)
SeqProgrammedFlag = False
EndIf
EndIf
SiteValveCD16 = SiteValve(Site)
EndOmit = Count > OmitCounts(Site)
AvgDisable = NOT (EndOmit AND SeqActiveFlag)
NextScan
EndProg
23
Zobrazit stránku 28
1 2 ... 24 25 26 27 28 29 30 31 32

Komentáře k této Příručce

Žádné komentáře