Specifications

Section 8. Processing and Math Instructions
8-34
StrainCalc Example
This example uses StrainCalc to find the microstrain value of a bridge output.
' Program name: STRAIN.DLD
Public Count, ZStrain, StMeas, Strain, Flag(8) ' Declare all variables as
public
'Data Table STRAINS samples every measurement when user Sets Flag(1)
High
DataTable(STRAINS,Flag(1),-1)
DataInterval(0,0,0,100) 'Interval = Scan, 100 lapses
Sample (1,Strain,Ieee4)
EndTable
'DataTable ZERO_1 stores the "zero" measurements
DataTable(ZERO_1,Count>99,100) 'Trigger on Count 100
Average(1,ZStrain,IEEE4,0)
EndTable
'Subroutine to measure Zero, Called on first pass or when user sets Flag(2)low
Sub Zero
Count = 0 'Reset Count
Scan(10,mSec,0,100) 'Scan 100 times
BrFull(ZStrain,1,mV50,5,1,6,7,1,5000,1,0,0,100,1,0)
Count = Count + 1 'Increment Counter used By
DataTable
CallTable ZERO_1 'Zero_1 outputs on last scan
(Count=100)
Next Scan
ZStrain = ZERO_1.ZStrain_Avg(1,1) 'Set ZStrain = averaged
value
Flag(2) = True
End Sub
BeginProg
Scan(10,mSec,0,0) 'Scan 10(mSecs)
If Not Flag(2) Then Zero
BrFull(StMeas,1,mV50,5,1,6,7,1,5000,1,0,0,100,1,0)
StrainCalc(Strain,1,StMeas,ZStrain,-1,2,0)
CallTable STRAINS 'Strains outputs only when
Flag(1)=True
Next Scan
EndProg