JÄGER ADwin-Pro II Systembeschreibung Seite 101

ADwin
Beispiel
#Include ADwinPro_All.Inc
Dim Data_10[8] As Long
Dim i As Long
Init:
P2_ADCF_Reset_Min_Max(1,1111b)'reset all 4 F-ADC
Event:
Rem read high and low values of F-ADC 1...4
P2_ADCF_Read_Min_Max4(1,Data_10,1)
For i = 1 To 8 Step
If (Data_10[i] < 2500)
Rem minimum is below limit
Rem ...
P2_ADCF_Reset_Min_Max(1,1111b)'reset all 4 F-ADC
EndIf
If (Data_10[i+1] > 50000)
Rem value is above limit
Rem ...
EndIf
Next i
ADwin-Pro II Software, Handbuch Version 1.6, Januar 2010
2
Then
Then
Pro II: Eingangsmodule
P2_ADCF_Read_Min_Max4
97