HP 8360 - Using the *WA1 Command, Example Program 7

100: Setup the source’s sweep time to 1 second.
110: Send the "OPC? command to the source to ensure that the
previous commands are completed and the source is ready to begin
controlled sweeps.
120: Enter the response to the *OPC? into the variable X. The
response should be a ‘1’.
130: Start of the loop.
140 and 150: Prompt the operator for the number of sweeps to
take. The number of sweeps to take is stored in the variable N.
Enter 0 to quit the program.
160: Don’t take any sweeps if N is less than 0.
170: Start a FOR/NEXT loop to take N sweeps.
180: Display the number of this sweep on the computer display.
190: Initiate a single sweep on the source and then wait until
the pending operation is complete. Return a ‘1’ when the sweep
completes.
200: Enter the response to the *OPC? into the variable X. The
program execution will halt on this ENTER statement until the
sweep is finished.
210: Repeat the 1NIT:IMM sequence N times.
220: End of the IF statement to skip sweeps if N is negative.
230: Exit the program if the value of N is 0.
Using the *WAI
The following example illustrates the use of the *WA1 command to
Command, Example
cause the synthesizer to perform a synchronous sweep.
Program 7
10 Source=719
20 ABORT 7
30 LOCAL 7
40 CLEAR Source
50
REMOTE Source
60
CLS
70
OUTPUT Source;"*RST"
80
OUTPUT Source;"FREq:STAR 4GHZ; STOP 5GHZ; MODE SWE"
90 OUTPUT Source;"SWE:TIME 2"
100
OUTPUT Source;"*OPC?"
110
ENTER Source;X
120
FOR I=1 TO 4
130
OUTPUT Source;"INIT"
140
OUTPUT Source;"*WAI"
150
OUTPUT Source;"POW:STAT ON"
160
OUTPUT Source;"INIT"
170
OUTPUT Source;"*WAI"
180
OUTPUT Source;"POW:STAT OFF"
l-96 Getting Started Programming