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
Index
App
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