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.

Using the *WAICommand, Example

Program 7

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.

The following example illustrates the use of the *WA1 command to cause the synthesizer to perform a synchronous sweep.

10Source=719

20ABORT 7

30LOCAL 7

40CLEAR Source

50REMOTE Source

60CLS

70OUTPUT Source;"*RST"

80OUTPUT Source;"FREq:STAR 4GHZ; STOP 5GHZ; MODE SWE"

90OUTPUT Source;"SWE:TIME 2"

100OUTPUTSource;"*OPC?"

110ENTER Source;X

120FOR I=1 TO 4

130OUTPUT Source;"INIT"

140OUTPUTSource;"*WAI"

150OUTPUT Source;"POW:STAT ON"

160OUTPUT Source;"INIT"

170OUTPUTSource;"*WAI"

180OUTPUT Source;"POW:STAT OFF"

l-96 Getting Started Programming