Keithley 6430 Instruction Manual page 199

Sweep branching program example
The code fragment below is a Visual Basic sweep branching subroutine. This example sets
up source memory locations 1-3 as indicated in code comments. Location 100 is used as a
dummy location. Failure at any one of locations 1-3 causes a branch to location 100 to stop the
sweep as soon as possible in the event of failure. For all three source memory locations, operat-
ing modes are set as follows:
•
•
•
Test limits for the three memory locations are:
•
•
•
Attribute VB_Name = "Headers"
Option Explicit
Public Sub RunSourceMemory()
Dim intGPIB As Integer
Dim strAnswer As String
intGPIB = 24
Call OutputCmd(intGPIB, ":TRAC:CLE")
'Setup Source Memory Location 1
'------------------------------
Call OutputCmd(intGPIB, "*RST")
Call OutputCmd(intGPIB, ":SOUR:FUNC VOLT")
Call OutputCmd(intGPIB, ":SENS:FUNC 'CURR:DC'")
Call OutputCmd(intGPIB, ":SENS:CURR:PROT .105")
Call OutputCmd(intGPIB, ":SENS:CURR:RANGE .1")
Call OutputCmd(intGPIB, ":SOUR:DEL 1")
Call OutputCmd(intGPIB, ":SOUR:VOLT 10")
Call OutputCmd(intGPIB, ":CALC2:FEED CURR")
Call OutputCmd(intGPIB, ":CALC2:LIM1:STAT ON")
Call OutputCmd(intGPIB, ":CALC2:LIM1:COMP:FAIL IN")
Call OutputCmd(intGPIB, ":CALC2:LIM1:COMP:SOUR2 8")
Call OutputCmd(intGPIB, ":CALC2:LIM2:STAT ON")
Call OutputCmd(intGPIB, ":CALC2:LIM2:UPP 2E-2")
Call OutputCmd(intGPIB, ":CALC2:LIM2:LOW 1E-3")
Call OutputCmd(intGPIB, ":CALC2:LIM2:UPP:SOUR2 2")
Failure
Call OutputCmd(intGPIB, ":CALC2:LIM2:LOW:SOUR2 3")
Failure
Call OutputCmd(intGPIB, ":CALC2:CLIM:PASS:SOUR2 13") 'Set Digital Output Pattern for Limit #2 Passing
Call OutputCmd(intGPIB, ":CALC2:CLIM:MODE GRAD")
Call OutputCmd(intGPIB, ":CALC2:CLIM:BCON END")
Call OutputCmd(intGPIB, ":CALC2:CLIM:PASS:SML NEXT") 'Set SML Pass Location
Call OutputCmd(intGPIB, ":CALC2:CLIM:FAIL:SML 100")
Call OutputCmd(intGPIB, ":SOUR:MEM:SAVE 1")
Source function: volts, 10V output voltage
Measurement function: current, 100mA range, 105mA compliance
Delay: 1s
Location 1: 10mA to 20mA
Location 2: 20mA to 30mA
Location 3: 30mA to 40mA
' Primary address = 24.
'Clear Readings from Buffer
'Restore GPIB default conditions.
'Current Source Function.
'Current Sense Function.
'Set 105mA Compliance
'Set 100mA Current Measure Range
'Set Source Delay to 1
'10V Source Voltage.
'Send Current(A) Readings to Buffer
'Set Limit1 on
'Set Fail Mode to In Compliance
'Set Digital Output Pattern for Compliance Failure
'Set Limit2 on
'Set Upper Limit to 20mA
'Set Lower Limit to 10mA
'Set Digital Output Pattern for Upper Limit #2
'Set Digital Output Pattern for Lower Limit #2
'Set Limit Results to Grading
'Set Binning Control to End
'Set SML Fail Location
'Save in Source Memory Location 1.
Sweep Operation 9-23