

10 '   ******************************************************************
20 '   * Example program EXAM1.BAS                                      *
30 '   * Example for readout of measured values                         *
40 '   * 2-channel meas. of rms, input peak, frequency and phase        *
50 '   * Setup for this example: EXAM1.SAC (Actual Setup Mode)          *
60 '   ******************************************************************
70 '
80 UPL OUT "MMEM:LOAD:STAT 0,'C:\UPL\B10_EXAM\EXAM1.SAC'": 'load setup
90 '
100 UPL OUT "init;*wai": '      trigger and wait for termination
110 '
120 '     ! Attention: you can read out only those values !
130 '     ! which are set active in the analyzer !
140 '
150 UPL OUT "sens:data?": '    ask for function value channel 1
160 UPL IN Func1$: '           read out of function value channel 1
170 UPL OUT "sens2:data?": '   ask for inp peak value channel 1
180 UPL IN Peak1$: '           read out of input peak value channel 1
190 UPL OUT "sens3:data?": '   ask for frequency value channel 1
200 UPL IN Freq1$: '           read out of frequency value channel 1
210 UPL OUT "sens4:data?": '   ask for phase value
220 UPL IN Phase$: '           read out of phase value
230 UPL OUT "sens:data2?": '   ask for function value channel 2
240 UPL IN Func2$: '           read out of function value channel 2
250 UPL OUT "sens2:data2?": '  ask for inp peak value channel 2
260 UPL IN Peak2$: '           readout of input peak value channel 2
270 '
280 '    Example for printout of results
290 PRINT TAB(10);"Function";TAB(30);"Input Peak";TAB(50);"Frequency"
300 PRINT "CH1";TAB(10);Func1$;TAB(30);Peak1$;TAB(50);Freq1$
310 PRINT "CH2";TAB(10);Func2$;TAB(30);Peak2$;TAB(50);Phase$
