:WAVeform Commands
33
Agilent InfiniiVision 4000 X-Series Oscilloscopes Programmer's Guide
1043
' WAVEFORM settings.
It is returned in the form <preamble_block><NL>
' where <preamble_block> is:
'
FORMAT
: int16 - 0 = BYTE, 1 = WORD, 4 = ASCII.
'
TYPE
: int16 - 0 = NORMAL, 1 = PEAK DETECT, 2 = AVERAGE
'
POINTS
: int32 - number of data points transferred.
'
COUNT
: int32 - 1 and is always 1.
'
XINCREMENT
: float64 - time difference between data points.
'
XORIGIN
: float64 - always the first data point in memory.
'
XREFERENCE
: int32 - specifies the data point associated with
'
x-origin.
'
YINCREMENT
: float32 - voltage diff between data points.
'
YORIGIN
: float32 - value is the voltage at center screen.
'
YREFERENCE
: int32 - specifies the data point where y-origin
'
occurs.
Dim Preamble()
Dim intFormat As Integer
Dim intType As Integer
Dim lngPoints As Long
Dim lngCount As Long
Dim dblXIncrement As Double
Dim dblXOrigin As Double
Dim lngXReference As Long
Dim sngYIncrement As Single
Dim sngYOrigin As Single
Dim lngYReference As Long
Dim strOutput As String
myScope.WriteString ":WAVEFORM:PREAMBLE?"
' Query for the preamble.
Preamble() = myScope.ReadList
' Read preamble information.
intFormat = Preamble(0)
intType = Preamble(1)
lngPoints = Preamble(2)
lngCount = Preamble(3)
dblXIncrement = Preamble(4)
dblXOrigin = Preamble(5)
lngXReference = Preamble(6)
sngYIncrement = Preamble(7)
sngYOrigin = Preamble(8)
lngYReference = Preamble(9)
strOutput = ""
'strOutput = str "Format = " + CStr(intFormat) + vbCrLf
'strOutput = str "Type = " + CStr(intType) + vbCrLf
'strOutput = str "Points = " + CStr(lngPoints) + vbCrLf
'strOutput = str "Count = " + CStr(lngCount) + vbCrLf
'strOutput = str "X increment = " + _
'
FormatNumber(dblXIncrement * 1000000) + " us" + vbCrLf
'strOutput = str "X origin = " + _
'
FormatNumber(dblXOrigin * 1000000) + " us" + vbCrLf
'strOutput = str "X reference = " + _
'
CStr(lngXReference) + vbCrLf
'strOutput = str "Y increment = " + _
'
FormatNumber(sngYIncrement * 1000) + " mV" + vbCrLf
'strOutput = str "Y origin = " + _
'
FormatNumber(sngYOrigin) + " V" + vbCrLf
'strOutput = str "Y reference = " + _
'
CStr(lngYReference) + vbCrLf
strOutput = str "Volts/Div = " + _
Содержание InfiniiVision 4000 X-Series
Страница 1: ...s1 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide ...
Страница 32: ...32 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide ...
Страница 52: ...52 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 2 Setting Up ...
Страница 66: ...66 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 3 Getting Started ...
Страница 242: ...242 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 7 ACQuire Commands ...
Страница 252: ...252 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 8 BUS n Commands ...
Страница 300: ...300 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 12 DEMO Commands ...
Страница 308: ...308 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 13 DIGital d Commands ...
Страница 330: ...330 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 15 DVM Commands ...
Страница 336: ...336 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 16 EXTernal Trigger Commands ...
Страница 368: ...368 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 17 FUNCtion m Commands ...
Страница 386: ...386 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 18 HARDcopy Commands ...
Страница 484: ...484 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 21 MEASure Commands ...
Страница 506: ...506 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 22 MEASure Power Commands ...
Страница 542: ...542 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 24 POD Commands POD1 DISP 0 THR 1 40E 00 ...
Страница 1098: ...1098 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 34 WGEN w Commands ...
Страница 1174: ...1174 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 37 Error Messages ...
Страница 1206: ...1206 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 39 Synchronizing Acquisitions ...
Страница 1336: ...1336 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide 41 Programming Examples ...
Страница 1352: ...1352 Agilent InfiniiVision 4000 X Series Oscilloscopes Programmer s Guide Index ...