Agilent Technologies 5000 Series manual 584

9Programming Examples

'using the ":WAVEFORM:DATA?" query. myScope.WriteString ":WAVEFORM:POINTS 1000"

'WAVE_FORMAT - Sets the data transmission mode for the waveform

'data output. This command controls whether data is formatted in

'a word or byte format when sent from the oscilloscope.

Dim lngVSteps As Long

Dim intBytesPerData As Integer

'Data in range 0 to 65535. myScope.WriteString ":WAVEFORM:FORMAT WORD" lngVSteps = 65536

intBytesPerData = 2

'Data in range 0 to 255. 'myScope.WriteString ":WAVEFORM:FORMAT BYTE" 'lngVSteps = 256

'intBytesPerData = 1

'GET_PREAMBLE - The preamble block contains all of the current

'WAVEFORM settings. It is returned in the form <preamble_block><NL>

'where <preamble_block> is:

'	FORMAT	: int16 - 0 = BYTE, 1 = WORD, 2 = 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 difference 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)

584 Agilent InfiniiVision 5000 Series Oscilloscopes Programmer's Reference