16-55
IM 765501-01E
Communication
Commands
3
2
1
6
5
4
9
8
7
12
11
10
15
14
13
18
17
16
16
Index
App
16.4.4 Sample 2 (Example of generating a trigger from the PC and reading the
measured results)
Attribute VB_Name = “Sample2”
‘================================================================
‘
‘ Sample 2 (Example of generating a trigger from the PC and reading the measured
results)
‘
‘ CALL SampleSequence2().
‘
‘===============================================================
‘————————————————————————————————
‘
‘ Setup 2
‘
‘ <Source setting>
‘ Source function:
Voltage
‘ Source range setting: 20 V
‘ Limiter:
±
50 mA
‘ Source level:
–17.5 V
‘
‘ <Measurement Setup>
‘ Measurement:
ON
‘ Measurement function: Current
‘ Integration time:
Minimum (= 250 us)
‘ Auto zero:
OFF
‘
‘ <Trigger setting>
‘ Trigger source:
External trigger
‘ Source delay:
Minimum (= 1 us)
‘ Measurement delay:
1 ms
‘
‘ Output:
ON
‘
‘————————————————————————————————
Function Setup2(dev As Integer)
Call CommSend(dev, “*RST”)
‘ Reset to factory default
settings
Call CommSend(dev, “:SOUR:FUNC VOLT”)
‘ Source function Voltage
Call CommSend(dev, “:SOUR:VOLT:RANG 20V”)
‘ Source range setting 20 V
Call CommSend(dev, “:SOUR:CURR:PROT:LINK ON”) ‘ Limiter tracking ON
Call CommSend(dev, “:SOUR:CURR:PROT:ULIM 50mA”)‘ Limiter 50 mA
Call CommSend(dev, “:SOUR:CURR:PROT:STAT ON”) ‘ Limiter ON
Call CommSend(dev, “:SOUR:VOLT:LEV -17.5V”)
‘ Source level –17.5 V
Call CommSend(dev, “:SENS:STAT ON”)
‘ Measurement ON
Call CommSend(dev, “:SENS:FUNC CURR”)
‘ Measurement function Current
Call CommSend(dev, “:SENS:ITIM MIN”)
‘ Integration time Minimum
Call CommSend(dev, “:SENS:AZER:STAT OFF”)
‘ Auto zero OFF
Call CommSend(dev, “:TRIG:SOUR EXT”)
‘ Trigger source External trigger
Call CommSend(dev, “:SOUR:DEL MIN”)
‘ Source delay Minimum
Call CommSend(dev, “:SENS:DEL 1ms”)
‘ Measure delay 1 ms
Call CommSend(dev, “:OUTP:STAT ON”)
‘ Output ON
End Function
16.4 Sample Programs