JÄGER ADwin-Pro II Systembeschreibung Seite 24

Pro II: Allgemeine Befehle
P2_Sync_Mode
20
Beispiel
#Include ADwinPro_All.Inc
#Define count 10000
#Define module 1
Dim i As Long
Dim Data_1[count], Data_2[count], Data_3[count]
Dim Data_4[count], Data_5[count], Data_6[count]
Dim Data_7[count], Data_8[count], Data_9[count]
Dim Data_10[count], Data_11[count], Data_12[count]
Init:
P2_Sync_Mode(module,1)
P2_Sync_Mode(module+1,2)
P2_Sync_Mode(module+2,2)
Rem initialize and start burst measurement for 4 channels
P2_Burst_Init(module,15,0,count,1,100b)
P2_Burst_Init(module+1,15,0,count,1,100b)
P2_Burst_Init(module+2,15,0,count,1,100b)
P2_Burst_Start(111b)
Processdelay=800
Event:
Par_1=P2_Burst_Status(module)'number of remaining measurements
If (Par_1=0) Then End
Finish:
Rem copy the last converted data of all 4 channels
P2_Burst_Read_Unpacked4(module,count,0,
Data_1,Data_2,Data_3,Data_4,1,3)
P2_Burst_Read_Unpacked4(module+1,count,0,
Data_5,Data_6,Data_7,Data_8,1,3)
P2_Burst_Read_Unpacked4(module+2,count,0,
Data_10,Data_10,Data_11,Data_12,1,3)
'master module
'slave module 1
'slave module 2
'start burst measurement on module 1-3
'get trigger point with 50 kHz
'burst sequence finished, go to FINISH
ADwin-Pro II Software, Handbuch Version 1.6, Januar 2010
ADwin
As Long
As Long
As Long
As Long