64
S:\Hp8960\E1960A GSM Mobile Test Application\A.04 Release\Proguide\Chapters\prog_prog_guide_comprehensive_prog_example.fm
Comprehensive Program Example
Example Program With Comments
10 ! Prog Name: com_man_ex.txt Rev: A.0.2 Date Code: 12/18/98
20 !
30 ! Configure the BASIC environment, dimension and initialize variables.
40 ! These actions are unrelated to programming the Agilent 8960.
50 !
60 OPTION BASE 1
70 COM /Address/ Test_set
80 ! Allocate arrays to hold ORFS switching & modulation frequency offsets.
90 DIM Swit_offs$[255],Mod_offs$[255]
100 ! Allocate arrays to hold measurement results.
110 REAL Txpower(4)
120 Test_set=714 ! Test set’s GPIB address.
130 PRINTER IS CRT
140 CLEAR SCREEN
150 !
160 ! Reset test set to start from a known state. Not always necessary to do full
170 ! preset in a manufacturing environment but desireable in programming example.
180 !
190 OUTPUT Test_set;”*RST”
200 !
210 ! Turn on the GPIB debugger. This is optional but very helpful for debugging
220 ! GPIB commands when developing new code.
230 !
240 OUTPUT Test_set;”SYST:COMM:GPIB:DEB:STAT ON”
250 !
260 ! Check error message queue and STOP if any errors present. This ensures that
270 ! the example program starts with no error conditions present in the test set.
280 !
290 CALL Chk_err_msg_que
300 !
310 !*****************************************************************************
320 ! Step 1: Set Test Set’s Operating Mode to Active Cell
330 !*****************************************************************************
340 !
350 OUTPUT Test_set;”CALL:OPER:MODE CELL”
360 !
370 !*****************************************************************************
380 ! Step 2: Configure the Base Station Emulator (BSE)
390 !*****************************************************************************
400 !
410 ! Set RF IN/OUT port’s amplitude offset to compensate for fixture loss of MS.
420 ! After setting offset, cell power settings reflect RF power at the MS antenna
430 ! input.
440 !
450 OUTPUT Test_set;”SYST:CORR:SGA -6” ! MS has a -6 dB fixture loss.
460 !
470 OUTPUT Test_set;”CALL:CELL:BAND PGSM” ! Set active broadcast band to PGSM.
480 OUTPUT Test_set;”CALL:ACT OFF” ! Deactivate cell to set network parms.
490 OUTPUT Test_set;”CALL:CELL:MCC 1;LAC 1;MNC 1;NCC 1;BCC 5” ! Set network parms.
500 OUTPUT Test_set;”CALL:ACT ON” ! Reactivate the cell.
510 OUTPUT Test_set;”CALL:BCH 20” ! Set broadcast channel to 20.