Lecroy WaveSurfer 3024 4-channel oscilloscope, Digital Storage oscilloscope, WaveSurfer 3024 Benutzerhandbuch
Produktcode
WaveSurfer 3024
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 ________________________________________
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 ________________________________________
§ § §