beautypg.com

Teledyne LeCroy X-STREAM OSCILLOSCOPES Remote Control User Manual

Page 305

background image

Waveform Template

WM-RCM-E Rev D

ISSUED: February 2005

299

For I = 2 To
FByte = ByteOrd7 + I * ByteOrd
FDigit = Desc(DescPoint + FByte)
FFraction = FFraction + CDbl(FDigit) * DMult3
DMult3 = DMult3 / 256
Next I ' Fraction completed
' ______________________________________________________________

FVariable = 2 ^ FExponent

GetDoubleFloat = FVariable * FSign * (1 + FFraction)

End

' End of GetDoubleFloat ________________________________________

§ § §