3-22 Remote Operation Model 6517A Getting Started Manual
Continuous triggering #2
The following example program sets up the Model 6517A to take readings continuously
after an external trigger is received. The trigger rate is set to one reading every 50ms.
'Example program to demonstrate continuous triggering
'at a specified rate
'For QuickBASIC 4.5 and KPC-488.2/CEC interface card
'Edit the following line to where the QuickBASIC
'libraries are on your computer
'$INCLUDE: 'c:\qb45\ieeeqb.bi'
'Initialize the interface as address 21
CALL initialize(21, 0)
'Reset controls in INIT, ARM;LAY1, ARM:LAY2, and TRIG subsystems
'and put trigger model in IDLE state
CALL SEND(27, "*rst", status%)
'*RST sets TRIG:SOUR to IMM
CALL SEND(27, "arm:lay2:sour ext", status%)
CALL SEND(27, "trig:coun inf;sour tim;tim .05", status%)
'start everything
CALL SEND(27, "init", status%)
After the Model 6517A receives the INITiate command, it stops in ARM:LAYer2 of
the trigger model, waiting for a pulse on the external trigger jack. After the external trigger
signal occurs, the Model 6517A moves to the TRIGger layer. Since TRIGger:SOURce
is set to TIMer, a reading is triggered immediately, with a subsequent reading every 50ms.
Because TRIGger:COUNt has been set to infinity, the trigger model never exits from the
TRIGger layer.