HP 75000 C Series Service Manual page 45

Example
This program will automatically prompt the user through the steps
required to perform a time accuracy test, and print out the results of
each measurement.
The example is written using:
an HP-IB select code of 7, primary address of 09, and
secondary address of 05 for the HP E1426A
COMPatible programming language
an HP Series 20W300 Computer with HP BASIC
Execute:
OPTION BASE 1
DIM Delay (4)
RESTORE
READ Delay ('1
OUTPUT 70905; " ' C L S "
OUTPUT 70905;"*RST"
PRINT "Connect the signal generator to scope channel 1"
PRINT "Set the signal generator to 500 MHz and 150 mV rms"
PAUSE
OUTPUT 70905;"TIM:RANG 5E-9"
OUTPUT 70905;"TIM:DEL 0"
OUTPUT 70905;"VIEW CHAN1"
OUTPUT 70905; "BLAN CHAN2, CHAN3, CHAN4"
OUTPUT 70905; 'THAN1 :COUP DCF"
OUTPUT 70905;"ACQ:TYP AVER"
OUTPUT 70905; "ACQ:COUN 8"
OUTPUT 70905;"CHANl:RANG .4"
OUTPUT 70905;"MEAS:SOUR CHAN1"
OUTPUT 70905;"DIG CHANlm*
OUTPUT 70905; "MEAS: TVOL? 0, +1"
ENTER 70905;Timel
FOR Measurement=l TO 4
OUTPUT 70905;*gTIM:DEL "&VAL$ (Delay (Measurement)
)
OUTPUT 70905; "MEAS: SOUR CHAN1"
OUTPUT 70905;"DIG CHANln
OUTPUT 70905;"MEAS:TVOL? O,+ln
ENTER 70905;Time2
PRINT "Delta-t for "sVALS(Delay(Measurement))6" was "bVALS(Time2-Timel)
NEXT Measurement
PRINT "Set the signal generator to 1 MHz and 150 mV rms"
PAUSE
OUTPUT 70905;"AUTOSCALE"
OUTPUT 70905;"TIM:RANG 2E-6"
OUTPUT 70905;"TIM:DEL 0"
OUTPUT 70905;"MEAS:SOUR CHAN1"
OUTPUT 70905;"DIG CHAN1"
OUTPUT 70905; "MEAS: TVOL? 0, +lo'
ENTER 70905;Time3
OUTPUT 70905; "T1M:DEL 5E-4"
OUTPUT 70905; "DIG CHAN1"
OUTPUT 70905; "MEAS: TVOL? 0, +1"
ENTER 70905;Time4
OUTPUT 70905; "*RSTV'
PRINT "Delta-t for 500E-9 was '*&VAL$ (Time4-Time31
DATA 8E-g,l28E-9, 4OOE-9,8OOE-9
END
Verification Tests
February 9, 1991