Agilent Technologies E5071C Manual page 1047

E5071C
Call viVPrintf(vi, ":CALC1:TRAN:TIME:STIM " & Stim_Type & vbLf, 0)
Call viVPrintf(vi, ":CALC1:TRAN:TIME:KBES " & Win_Beta & vbLf, 0)
the window.
Call viVPrintf(vi, ":CALC1:TRAN:TIME:STAR " & Star_Time & vbLf, 0)
the display range.
Call viVPrintf(vi, ":CALC1:TRAN:TIME:STOP " & Stop_Time & vbLf, 0)
the display range.
Call viVPrintf(vi, ":CALC1:TRAN:TIME:STAT ON" & vbLf, 0)
function.
Call ErrorCheck(vi)
Call viVPrintf(vi, ":CALC1:PAR1:SEL" & vbLf, 0)
Call viVPrintf(vi, ":CALC1:FORM REAL" & vbLf, 0)
Call viVPrintf(vi, ":DISP:WIND1:TRAC1:Y:AUTO" & vbLf, 0)
Call ErrorCheck(vi)
Call viClose(vi)
Call viClose(defrm)
the VISA system.
End
End Sub
Sample Program in HT Basic
10 DIM Para$[9],Tran_type$[9],Stim_type$[9],Buff$[9],Inp_ch ar$[9]
20 REAL Stop_freq,Win_beta,Star_time,Stop_time
30 INTEGER Nop
40 !
50 ASSIGN @Agte507x TO 717
60 !
70 Stop_freq=3.E+9 ! Stop Frequency : 3 GHz
80 Nop=201 ! Nop : 201
90 Para$="S11" ! Meas. Parameter : S11
100 !
110 Tran_type$="LPAS" ! Transform Type : Lowpass
120 Stim_type$="IMP" ! Stimulus Type : Impulse
130 Win_beta=13 ! Window Beta : 13 (Maximum Type)
140 Star_time=0 ! Start time : 0 s
150 Stop_time=1.E-8 ! Stop time : 10 ns
160 !
1274
'Turns on the time domain
'Checking the error.
'Sets the active trace.
'Sets the real data format.
'Execute auto scale.
'Checking the error.
'Closes the resource manager session.
'Breaks the communication and terminates
'End
'Sets the stimulus type.
'Sets the beta value of
'Sets the start value of
'Sets the end value of