Agilent Technologies InfiniiVision 3000 X-Series - Page 304

304 Agilent InfiniiVision 3000 X-Series Oscilloscopes Programmer's Guide
13 :DISPlay Commands
:DISPlay:DATA
(see page 1138)
Query Syntax
:DISPlay:DATA? [<format>][,][<palette>]
<format> ::= {BMP | BMP8bit | PNG}
<palette> ::= {COLor | GRAYscale}
The :DISPlay:DATA? query reads screen image data. You can choose 24- bit
BMP, 8- bit BMP8bit, or 24- bit PNG formats in color or grayscale.
If no format or palette option is specified, the screen image is returned in
BMP, COLor format.
Screen image data is returned in the IEEE- 488.2 # binary block data
format.
Return Format
<display data><NL>
<display data> ::= binary block data in IEEE-488.2 # format.
See Also • "Introduction to :DISPlay Commands" on page 298
• ":HARDcopy:INKSaver" on page 363
• ":PRINt" on page 215
• "*RCL (Recall)" on page 175
• "*SAV (Save)" on page 179
• ":VIEW" on page 225
Example Code
' IMAGE_TRANSFER - In this example, we will query for the image data
' with ":DISPlay:DATA?", read the data, and then save it to a file.
Dim byteData() As Byte
myScope.IO.Timeout = 15000
myScope.WriteString ":DISPlay:DATA? BMP, COLOR"
byteData = myScope.ReadIEEEBlock(BinaryType_UI1)
' Output display data to a file:
strPath = "c:\scope\data\screen.bmp"
' Remove file if it exists.
If Len(Dir(strPath)) Then
Kill strPath
End If
Close #1 ' If #1 is open, close it.
Open strPath For Binary Access Write Lock Write As #1 ' Open file f
or output.
Put #1, , byteData ' Write data.
Close #1 ' Close file.
myScope.IO.Timeout = 5000
See complete example programs at: Chapter 40, “Programming Examples,”
starting on page 1147