Before Writing The Program - YOKOGAWA TA520 User Manual

Chapter 5 Sample Program

5.1 Before Writing the Program

Environment
Instrument Settings
5.2 Setup Example
'*********************************************************************
'*
'* TA520 Sample Program1 for GP-IB interface
'*
'*
'*********************************************************************
'*
'* Set the TA520 as follows:
'*
'*
'*
'*
'*********************************************************************
'
REM $INCLUDE: 'qbdecl4.bas'
'
DEVICE$ = "DEV1": CALL IBFIND(DEVICE$, TA%)
CALL IBSIC(TA%)
BORD$ = "GPIB0": CALL IBFIND(BORD$, BD%)
CALL IBSIC(BD%)
V% = 1: CALL IBSRE(BD%, V%)
CALL IBCLR(TA%)
'
CMD$ = "MEASURE:MODE HHISTOGRAM"
CALL IBWRT(TA%, CMD$)
CMD$ = "MEASURE:FUNCTION PERIOD,A"
CALL IBWRT(TA%, CMD$)
CMD$ = "SAMPLE:GATE:MODE EVENT"
CALL IBWRT(TA%, CMD$)
CMD$ = "SAMPLE:GATE:EVENTSIZE 1000"
CALL IBWRT(TA%, CMD$)
'
V% = 0: CALL IBSRE(BD%, V%)
'
END
IM 704310-12E
PC : IBM PC/AT compatible (using the AT-GPIB/TNT IEEE-488.2 board by
National Instruments)
Language : Quick-BASIC
Address 1
All sample programs in this chapter use address 1 for the instrument. Therefore, set the
GP-IB address of the instrument to 1 according to the procedures described on page 1-
4.
Microsoft QuickBASIC 4.0/4.5 Version
Measurement mode : hardware histogram mode
Measurement function: CHA, period measuremen
Sampling size : 1000
5.1 Before Writing the Program/5.2 Setup Example
'Hardware histogram mode
'CHA, period measurement
'Event gate
'Sampling size to 1000 points
*
*
*
*
*
*
*
*
*
*
5-1
5