16-57
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.5 Sample 3 (Example of Updating the Source Level from a PC)
Attribute VB_Name = “Sample3”
‘================================================================
‘
‘ Sample 3 (Example of Updating the Source Level from a PC)
‘
‘ CALL SampleSequence3().
‘
‘===============================================================
‘————————————————————————————————
‘
‘ Setup 3
‘
‘ <Source setting>
‘ Source function: Voltage
‘ Source range setting: 30 V
‘ Limiter: ±0.5 A
‘ Source level: 0 V
‘
‘ <Measurement Setup>
‘ Measurement: OFF
‘
‘ <Trigger setting>
‘ Trigger source: Internal trigger 500 us period
‘ Source delay: Minimum (= 1 us)
‘
‘ Output: ON
‘
‘————————————————————————————————
Function Setup3(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 30V”) ‘ Source range setting 30 V
Call CommSend(dev, “:SOUR:CURR:PROT:LINK ON”) ‘ Limiter tracking ON
Call CommSend(dev, “:SOUR:CURR:PROT:ULIM 0.5A”)‘ Limiter 0.5 A
Call CommSend(dev, “:SOUR:CURR:PROT:STAT ON”) ‘ Limiter ON
Call CommSend(dev, “:SOUR:VOLT:LEV 0V”) ‘ Source level 0 V
Call CommSend(dev, “:SENS:STAT OFF”) ‘ Measurement OFF
Call CommSend(dev, “:TRIG:SOUR TIM”) ‘ Trigger source Internal timer
Call CommSend(dev, “:TRIG:TIM 500E-6”) ‘ Internal timer period 500 us
Call CommSend(dev, “:SOUR:DEL MIN”) ‘ Source delay Minimum
Call CommSend(dev, “:OUTP:STAT ON”) ‘ Output ON
End Function
‘—————————————————————————————————
‘
‘ Sample Sequence 3
‘
‘ Set the GS610 to Setup 3, change the source level from 15 V to 30 V in 1 V steps,
and turn the output OFF.
‘
‘—————————————————————————————————
16.4 Sample Programs