Keysight E4980A User Manual page 303

Sample Program
Read Measurement Results
TimeOutTime)
0)
vbLf, 0)
0)
0)
1E3,2E3,5E3,1E4,2E4,5E4,1E5" + vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
+ vbLf, 0)
0)
Keysight E4980A/AL Precision LCR Meter
Call selectLCR(defrm, AgtE4980A/AL)
ErrorCheck viSetAttribute(AgtE4980A/AL, VI_ATTR_TMO_VALUE,
'===================================
' Setup Start
'===================================
ErrorCheck viVPrintf(AgtE4980A/AL, "*RST;*CLS" + vbLf, 0)
ErrorCheck viVPrintf(AgtE4980A/AL, "TRIG:SOUR BUS" + vbLf,
ErrorCheck viVPrintf(AgtE4980A/AL, "DISP:PAGE LIST" +
ErrorCheck viVPrintf(AgtE4980A/AL, "FORM REAL,64" + vbLf,
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:MODE SEQ" + vbLf,
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:FREQ
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND1 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND2 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND3 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND4 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND5 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND6 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "LIST:BAND7 A,100,200"
ErrorCheck viVPrintf(AgtE4980A/AL, "INIT:CONT ON" + vbLf,
'
ErrorCheck viVPrintf(AgtE4980A/AL, ":TRIG:IMM" + vbLf, 0)
'===================================
303