Chapter 7
7-61
Programming Examples
Measurement Data Transfer Examples
170 ! Trace values are two elements per point, display format dependent
180 DIM Dat(1:11,1:2)
! Trace data array
190 !
200 OUTPUT @Nwa;"POIN 11;"
! Set trace length to 11 points
210 OUTPUT @Nwa;"OPC?;SING;"
! Single sweep mode and wait
220 ENTER @Nwa;Reply
! Read reply
230 !
240 OUTPUT @Nwa;"FORM4;"
! Set form 4 ASCII format
250 OUTPUT @Nwa;"OUTPFORM;"
! Send formatted trace to controller
260 ENTER @Nwa;Dat(*)
! Read in data array from analyzer
270 !
280 ! Now to calculate the frequency increments between points
290 OUTPUT @Nwa;"POIN?;"
! Read number of points in the trace
300 ENTER @Nwa;Num_points
310 OUTPUT @Nwa;"STAR?;"
! Read the start frequency
320 ENTER @Nwa;Startf
330 OUTPUT @Nwa;"SPAN?;"
! Read the span
340 ENTER @Nwa;Span
350 !
360 F_inc=Span/(Num_points-1)
! Calculate fixed frequency increment
370 !
380 PRINT "Point","Freq (MHz)","
Value 1","
Value 2"
390 IMAGE 3D,7X,5D.3D,3X,3D.4D,3X,3D.4D
! Formatting for controller display
400 !
410 FOR I=1 TO Num_points
! Loop through data points
420
Freq=(I-1)*F_inc
! Calculate frequency of data point
430
PRINT USING 390;I,Freq/1.E+6,Dat(I,1),Dat(I,2)! Print analyzer data
440 NEXT I
450 !
460 OUTPUT @Nwa;"MARKDISC;"
! Discrete marker mode
470 OUTPUT @Nwa;"MARK1 3E+4;"
! Position marker at 30 KHz
480 !
490 OUTPUT @Nwa;"OPC?;WAIT;"
! Wait for the analyzer to finish
500 ENTER @Nwa;Reply
! Read the 1 when complete
510 LOCAL 7
! Release HP-IB control
520 !
530 PRINT
540 PRINT "Position the marker with the knob and compare the values"
550 !
560 END
Summary of Contents for 8719ES
Page 15: ...1 1 1 Alphabetical Command Reference ...
Page 293: ...2 1 2 Introduction to Instrument Control ...
Page 310: ...3 1 3 GPIB Programming ...
Page 334: ...4 1 4 Reading Analyzer Data ...
Page 343: ...5 1 5 Data Processing Chain ...
Page 350: ...6 1 6 Error Reporting ...
Page 364: ...7 1 7 Programming Examples ...
Page 502: ...A 1 A Preset Conditions ...
Page 517: ...B 1 B Command Listings ...