Campbell-scientific AVW200-series Vibrating Wire Interfaces Manual do Utilizador descarregar pdf (Página 97)

Appendix H. Additional Programming Examples

Sample (16,Displacement2(),FP2)

Sample (16,VWfreq2(),FP2)

Sample (16,Temp2(),FP2)

Sample (16,Amp2(),FP2)

Sample (16,Sig2Noise2(),FP2)

Sample (16,FreqOfNoise2(),FP2)

Sample (16,DecayRatio2(),FP2)

EndTable

BeginProg

'Enter the 3 Polynomial Gage Factors for each sensor

'as listed on each Calibration Report

CoefString1(1) = "2.49866e-10, 8.716e-5, -0.20003"

CoefString1(2) = "2.56640e-10, 8.762e-5, -0.20437"

CoefString1(3) = "2.93650e-10, 8.715e-5, -0.19679"

CoefString1(4) = "1.99647e-10, 8.868e-5, -0.19430"

CoefString1(5) = "3.41276e-10, 8.777e-5, -0.19042"

CoefString1(6) = "2.30397e-10, 8.720e-5, -0.19085"

Coefstring1(7) = "2.54131e-10, 8.743e-5, -0.19218"

CoefString1(8) = "2.21677e-10, 8.832e-5, -0.20539"

CoefString1(9) = "2.85034e-10, 8.734e-5, -0.19341"

CoefString1(10) = "2.42310e-10, 8.808e-5, -0.19576"

CoefString1(11) = "2.52871e-10, 8.804e-5, -0.19232"

CoefString1(12) = "2.27416e-10, 8.797e-5, -0.19552"

CoefString1(13) = "2.27264e-10, 8.798e-5, -0.19522"

CoefString1(14) = "2.87777e-10, 8.682e-5, -0.20353"

CoefString1(15) = "2.81051e-10, 8.767e-5, -0.19691"

CoefString1(16) = "2.41462e-10, 8.747e-5, -0.19481"

CoefString2(1) = "2.73949e-10, 8.726e-5, -0.20799"

CoefString2(2) = "2.91941e-10, 8.722e-5, -0.20443"

CoefString2(3) = "2.32081e-10, 8.789e-5, -0.20064"

CoefString2(4) = "3.17163e-10, 8.741e-5, -0.19108"

CoefString2(5) = "2.66284e-10, 8.810e-5, -0.19411"

CoefString2(6) = "2.7768e-10, 8.756e-5, -0.19630"

CoefString2(7) = "2.06552e-10, 8.866e-5, -0.20578"

CoefString2(8) = "2.22761e-10, 8.848e-5, -0.20013"

CoefString2(9) = "2.31843e-10, 8.880e-5, -0.19643"

CoefString2(10) = "2.42310e-10, 8.808e-5, -0.19576"

CoefString2(11) = "1.99647e-10, 8.868e-5, -0.19430"

CoefString2(12) = "2.56640e-10, 8.762e-5, -0.20437"

CoefString2(13) = "2.81051e-10, 8.767e-5, -0.19691"

CoefString2(14) = "2.81051e-10, 8.767e-5, -0.19691"

CoefString2(15) = "2.49866e-10, 8.716e-5, -0.20003"

CoefString2(16) = "2.27264e-10, 8.798e-5, -0.19522"

'Assign coefficients listed in CoefString1 to individual variables

For i = 1 To 16

SplitStr (PolyCoef1(3*i-2),CoefString1(i),",",3,5)

Next i

'Assign coefficients listed in CoefString2 to individual variables

For i = 1 To 16

SplitStr (PolyCoef2(3*i-2),CoefString2(i),",",3,5)

Next i

H-5

1 2 ... 92 93 94 95 96 97 98 99 100 101 102 ... 111 112

Comentários a estes Manuais

Sem comentários

Campbell-scientific AVW200-series Vibrating Wire Interfaces Manual do Utilizador Página 97

Comentários a estes Manuais

Manuais e produtos relacionados com Instrumentos de medida Campbell-scientific AVW200-series Vibrating Wire Interfaces