16-53
IM 765501-01E
Communication Commands
3
2
1
6
5
4
9
8
7
12
11
10
15
14
13
18
17
16
16.4.3 Sample 1 (Example of Reading the Measured Results during Free Run
Using Internal Trigger)
Attribute VB_Name = “Sample1”
‘================================================================
‘
‘ Sample 1 (Example of Reading the Measured Results during Free Run Using Internal
Trigger)
‘
‘ CALL SampleSequence1().
‘
‘================================================================
‘————————————————————————————————
‘
‘ Setup 1
‘
‘ <Source setting>
‘ Source function: Current
‘ Source range setting: 1 A
‘ Limiter: ±250 mV
‘ Source level: 0.33333 A
‘
‘ <Measurement setting>
‘ Measurement: ON
‘ Measurement function: Voltage
‘ Integration time: 1PLC
‘ Auto zero: ON
‘
‘ <Trigger setting>
‘ Trigger source: Internal trigger 100 ms period
‘ Source delay: Minimum (= 1 us)
‘ Measurement delay: Minimum (= 1 us)
‘
‘ Output: ON
‘
‘————————————————————————————————
Function Setup1(dev As Integer)
Call CommSend(dev, “*RST”) ‘ Reset to factory default
settings
Call CommSend(dev, “:SOUR:FUNC CURR”) ‘ Source function Current
Call CommSend(dev, “:SOUR:CURR:RANG 1A”) ‘ Source range setting 1 A
Call CommSend(dev, “:SOUR:VOLT:PROT:LINK ON”) ‘ Limiter tracking ON
Call CommSend(dev, “:SOUR:VOLT:PROT:ULIM 250mV”)‘ Limiter 250 mV
Call CommSend(dev, “:SOUR:VOLT:PROT:STAT ON”) ‘ Limiter ON
Call CommSend(dev, “:SOUR:CURR:LEV 0.33333A”) ‘ Source level 0.33333 A
Call CommSend(dev, “:SENS:STAT ON”) ‘ Measurement ON
Call CommSend(dev, “:SENS:FUNC VOLT”) ‘ Measurement function Voltage
Call CommSend(dev, “:SENS:ITIM PLC”) ‘ Integration time 1PLC
Call CommSend(dev, “:SENS:AZER:STAT ON”) ‘ Auto zero ON
Call CommSend(dev, “:TRIG:SOUR TIM”) ‘ Trigger source Internal timer
Call CommSend(dev, “:TRIG:TIM 100ms”) ‘ Internal timer period 100 ms
Call CommSend(dev, “:SOUR:DEL MIN”) ‘ Source delay Minimum
Call CommSend(dev, “:SENS:DEL MIN”) ‘ Measurement delay Minimum
Call CommSend(dev, “:OUTP:STAT ON”) ‘ Output ON
End Function
16.4 Sample Programs