Chapter 3 Programming Your Universal Counter for Remote Operation
Elements of SCPI Commands
Programming Guide 3-87
To Optimize Throughput (QuickBASIC) (Continued)
'The following lines will provide the fastest throughput, regardless of
'the state of the counter before these lines are executed.
CALL sendhp(":FREQ:ARM:STAR:SOUR IMM") 'These 3 lines enable using
CALL sendhp(":FREQ:ARM:STOP:SOUR IMM") 'time arming with a 0.1 second
CALL sendhp(":EVENT1:LEVEL 0") 'Set trigger level on channel 1
'This also disables auto trigger
CALL sendhp(":CALC:MATH:STATE OFF") 'Make sure all post-processing
CALL sendhp(":CALC2:LIM:STATE OFF") 'is turned off.
CALL sendhp(":CALC3:AVER:STATE OFF")
CALL sendhp(":HCOPY:CONT OFF") 'Do not update printing operations
CALL sendhp(":ROSC:SOUR INT")
CALL sendhp(":ROSC:EXT:CHECK OFF")
CALL sendhp(":DIAG:CAL:INT:AUTO OFF") 'Disable automatic interpolator
'calibration. The most recent
'calibration factors will be
'used in the calculation for
'frequency
CALL sendhp("*DDT #15FETC?") 'Define trigger as fetc?
CALL sendhp(":DISP:ENABLE OFF") 'Turn off the display
CALL sendhp("READ:FREQUENCY?") 'Read the expected frequency
CALL IOENTERS(source&, freqstring(1), maxelem%, actual%)
CALL sendhp(":FREQ:EXP1 " + freqstring(1)) 'Send the expected frequency
CALL sendhp(":INIT:CONT ON") 'Start making measurements
PRINT "Making measurements"
FOR i = 1 TO samples
CALL IOTRIGGER(source) 'Query the counter for data
CALL IOENTERS(source&, freqstring(i), 22, actual%) 'Read the ASCII characters
NEXT i
PRINT "Measurements complete"
END
SUB sendhp (code$)
CALL iooutputs(source, code$, LEN(code$))
END SUB
To Next Page
Loading...
