66
S:\Hp8960\E1960A GSM Mobile Test Application\A.04 Release\Proguide\Chapters\prog_prog_guide_comprehensive_prog_example.fm
Comprehensive Program Example
1050 ! ‘GSM call disconnected; No response to page (Timer T3113 expiry)’
1060 !
1070 Tries=1
1080 LOOP
1090 OUTPUT Test_set;”CALL:ORIG” ! Originate a call.
1100 OUTPUT Test_set;”CALL:CONN:STAT?” ! CALL:CONNected hanging GPIB query.
1110 ENTER Test_set;Call_connected ! Program will hang here until origination
1120 ! process completes. If successful and
1130 ! the call is connected the query will
1140 ! return a 1. If unsuccessful and the call
1150 ! is not connected the query returns 0.
1160 EXIT IF Call_connected
1170 OUTPUT Test_set;”CALL:END”
1180 IF Tries=50 THEN
1190 BEEP
1200 DISP ““
1210 PRINT “Call did not connect after”;Tries;”. Program terminated.”
1220 STOP
1230 END IF
1240 DISP “Call has not connected after”;Tries;”attempts. Trying again.”
1250 Tries=Tries+1
1260 END LOOP
1270 DISP ““
1280 !
1290 !*****************************************************************************
1300 ! Step 5: Set the Mobile Station’s Operating Conditions
1310 !*****************************************************************************
1320 !
1330 OUTPUT Test_set;”CALL:MS:DTX OFF” ! Turn DTX off for all MS tests.
1340 !
1350 FOR Traf_chan=120 TO 124 STEP 2 ! Test channels 120, 122 & 124.
1360 OUTPUT Test_set;”CALL:TCH:SEQ “;Traf_chan ! Use :SEQ to force sequential
1370 ! execution of the TCH command.
1380 OUTPUT Test_set;”CALL:STAT:STAT?” ! Verify that the call is still in
1390 ENTER Test_set;Call_status$ ! the connected state after handover.
1400 IF Call_status$<>”CONN” THEN
1410 PRINT “Call handover failed. New channel assignment =”;Traf_chan
1420 PRINT “Program terminated.”
1430 STOP
1440 END IF
1450 FOR Ms_pwr_lvl=5 TO 15 STEP 5 ! Test power levels 5, 10 & 15.
1460 OUTPUT Test_set;”CALL:MS:TXL:SEQ “;Ms_pwr_lvl ! Use :SEQ to force
1470 ! sequential execution of
1480 ! the TXLevel command.
1490 !
1500 !*****************************************************************************
1510 ! Step 6: Make Measurements
1520 !*****************************************************************************
1530 !
1540 ! Step 6a: Start a set of concurrent measurements:
1550 !
1560 OUTPUT Test_set;”INIT:TXP;PFER;ORFS”
1570 !
To Next Page
Loading...
Need help?
General
