User`s guide
GpibClose Method - This method can be used to terminate a connection previously opened using the
GpibOpen method.
Syntax
AppObj.GpibClose(DevID)
AppObj is the required GigaView Application Object.
DevID is the required Numeric variable that was returned on a previous call to the GpibOpen method.
Example
Dim Visi
Set Visi = CreateObject ("Visi.Application")
Visi.New("Histogram")
Dev = Visi.GpibOpen("", 0, 6)
Visi.GpibSend Dev, ":ARM:SOUR IMM;:TRIG:SOUR INT2"
Visi.GpibSend Dev, ":FREQ 150 MHZ"
Visi.GpibSend Dev, ":DIG:PATT:DATA #22073222223232233333232"
Visi.GpibSend Dev, ":DIG:SIGN1:FORM NRZ;:DIG:SIGN2:FORM RZ"
Visi.GpibSend Dev, ":PULS:HOLD2 DCYC;:PULS:DCYC2 50"
Visi.GpibSend Dev, ":DIG:PATT ON"
Visi.GpibSend Dev, ":HOLD VOLT;:VOLT1:HIGH 800 MV;:VOLT1:LOW -800 MV"
Visi.GpibSend Dev, ":HOLD VOLT;:VOLT2:HIGH 800 MV;:VOLT2:LOW -800 MV"
Visi.GpibSend Dev, ":PULS:TRIG1:VOLT ECL"
Visi.GpibSend Dev, ":PULS:TRIG2:VOLT ECL"
Visi.GpibSend Dev, ":OUTP1 ON;:OUTP2:POL INV;:OUTP2 ON;"
Visi.GpibClose(Dev)
GpibOpen Method - This method can be used to open a connection with a GPIB (General Purpose Interface Bus)
device. This provides a convenient means to control common laboratory equipment from within GigaView.
Syntax
AppObj.GpibOpen(DeviceName, BoardNumber, AddressNumber)
AppObj is the required GigaView Application Object.
DeviceName is the required String variable that defines the name of the target device on UNIX systems. This
variable is not
used on Microsoft systems.
BoardNumber is the required Numeric variable that defines the number of the interface card to which the device is
connected. The first board in the system is designated 0; the second board in the system is designated 1; etc.
AddressNumber is the required Numeric variable that defines the address that has been assigned to the target
device. The method by which this address is configured varies from instrument to instrument, check the Users
Manual of the target device for details. You should not have multiple instruments on the same bus with duplicate
addresses. This variable is not
used on UNIX systems.
Returned Value - If the device is successfully opened a positive Numeric value will be returned which is then used
as an ID on subsequent calls to read or write to the device. If the device cannot be opened a negative Numeric
value will be returned.
Example
Dim Visi
Set Visi = CreateObject ("Visi.Application")
Visi.New("Histogram")
Dev = Visi.GpibOpen("", 0, 6) ‘Address 6 on Microsoft platforms
‘ Dev = Visi.GpibOpen("dev6", 0, 6) ‘Address 6 on Sun Solaris platforms
‘ Dev = Visi.GpibOpen("hpib,6", 0, 6) ‘Address 6 on HP-UX platforms
Visi.GpibSend Dev, ":ARM:SOUR IMM;:TRIG:SOUR INT2"
Visi.GpibSend Dev, ":FREQ 150 MHZ"
Visi.GpibSend Dev, ":DIG:PATT:DATA #22073222223232233333232"
Visi.GpibSend Dev, ":DIG:SIGN1:FORM NRZ;:DIG:SIGN2:FORM RZ"
Visi.GpibSend Dev, ":PULS:HOLD2 DCYC;:PULS:DCYC2 50"
Visi.GpibSend Dev, ":DIG:PATT ON"
Appendix A
©
WAVECREST Corporation 2005
272










