Programming instructions

Programming Examples
RS-232 Programming Examples
Chapter 2 97
Queries Using Agilent BASIC
This example program demonstrates signal generator query commands over RS-232. Query
commands are of the type *IDN? and are identified by the question mark that follows the
mnemonic.
Start Agilent BASIC, type in the following commands, and then RUN the program:
The following program example is available on the PSG Family Documentation CD-ROM as
rs232ex2.txt.
10 !********************************************************************************
20 !
30 ! PROGRAM NAME: rs232ex2.txt
40 !
50 ! PROGRAM DESCRIPTION: In this example, query commands are used to read
60 ! data from the signal generator.
70 !
80 ! Start Agilent BASIC, type in the following code and then RUN the program.
90 !
100 !********************************************************************************
110 !
120 INTEGER Num
130 DIM Str$[200],Str1$[20]
140 CONTROL 9,0;1 ! Resets the RS-232 interface
150 CONTROL 9,3;9600 ! Sets the baud rate to match signal generator rate
160 STATUS 9,4;Stat ! Reads the value of register 4
170 Num=BINAND(Stat,7) ! Gets the AND value
180 CONTROL 9,4;Num ! Sets the parity to NONE
190 OUTPUT 9;"*IDN?" ! Querys the sig gen ID
200 ENTER 9;Str$ ! Reads the ID
210 WAIT 2 ! Waits 2 seconds
220 PRINT "ID =",Str$ ! Prints ID to the screen
230 OUTPUT 9;"POW:AMPL -5 dbm" ! Sets the the power level to -5 dbm
240 OUTPUT 9;"POW?" ! Querys the power level of the sig gen
250 ENTER 9;Str1$ ! Reads the queried value
260 PRINT "Power = ",Str1$ ! Prints the power level to the screen
270 END ! End the program