R3131 Spectrum Analyzer Operation Manual
4.1 GPIB Remote Programming
4-42 Aug 28/98
4.1.13 Using the Status Byte
(1) Sample Programs for PC9801 series (GPIB address = 8)
Example PC-15: Execute single sweeping and wait the end of the sweeping (when not using SRQ
signal).
Example PC-16: Execute ACP measurement and begin reading the result after the measurement is
ended (when not using SRQ signal).
10 ISET IFC:ISET REN ’ Send IFC signal and set REN signal in one.
20 SPA=8 ’ Set GPIB address (8) in a variable.
30 PRINT @SPA;”SI” ’ Set in the single sweeping mode.
40 PRINT @SPA;”OPR8” ’ Make Sweep-end bit of operation
50 ’ status register enable.
60 PRINT @SPA;”CLS” ’ Clear the status byte.
70 PRINT @SPA;”SR” ’ Begin the sweeping.
80 *LOOP
90 PRINT @SPA;”STB?”:INPUT @SPA;S ’ Read the status byte.
100
110
IF (S AND 128)=0 THEN GOTO *LOOP ’
’
Wait until the operation status bit (end of
sweeping) is set in one.
120 STOP
10 ISET IFC:ISET REN ’ Send IFC signal and set REN signal in one.
20 SPA=8 ’ Set GPIB address (8) in a variable.
30 PRINT @SPA;”CF1500MZ” ’ Set the center frequency to 1500 MHz.
40 PRINT @SPA;”SP250KZ” ’ Set the frequency span to 250kHz.
50 PRINT @SPA;”RB1KZ;VB10KZ” ’ Set RBW to 1kHz and VBW to 10kHz.
60 PRINT @SPA;”ST20SC” ’ Set the sweep time at 20 seconds.
70 PRINT @SPA;”DTP” ’ Set the detector mode to positive.
80 PRINT @SPA;”ADCH50KZ” ’ Set the channel space to 50kHz.
90 PRINT @SPA;”ADBS21KZ” ’ Set the bandwidth to 21kHz.
100 PRINT @SPA;”OPR8” ’ Make the sweep-end bit of the
110 ’ operation status register enable.
120 PRINT @SPA;”*CLS” ’ Clear the status byte.
130 PRINT @SPA;”ACP” ’ Begin ACP measurement.
140 *LOOP ’
150 PRINT @SPA;”*STB?”: INPUT
@SPA;S
’ Read the status byte.
160 IF(S AND 128)=0 THEN GOTO
*LOOP
’ Wait the end of ACP measurement.
170 PRINT @SPA;”ACP?” ’ Request the output of the ACP measurement
result.
180 INPUT @SPA;LO,UP ’ Read the ACP measurement result.
190 PRINT”-50K:”;LO;”,+50K:”;UP ’ Display the measurement result.
200 STOP
To Next Page
Loading...
Need help?
General
