Agilent Technologies 8960 10 Series Reference Manual page 203

1460 OUTPUT Test_set;"CALL:MS:TXL:SEQ ";Ms_pwr_lvl ! Use :SEQ to force
1470
1480
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 !
1580 ! Step 6b: Determine if a measurement is done:
1590 !
1600 LOOP
1610 OUTPUT Test_set;"INIT:DONE?"
1620 ENTER Test_set;Meas_done$
1630 !
1640 ! Step 6c: Obtain measurement results: Each measurement illustrates a
1650 ! different way of reading in results. There is no one right way. The
1660 ! method used is application dependent. Note that the examples do not
1670 ! show all possible ways.
1680 !
1690 SELECT Meas_done$
1700 !
1710 CASE "TXP"
1720 OUTPUT Test_set;"FETC:TXP:INT?;POW:ALL?"
1730 ENTER Test_set;Integrity,Txpower(*)
1740 IF (Integrity=0) THEN
1750 PRINT "TX Power results: TCH =";Traf_chan;"and TXL =";Ms_pwr_lvl
1760 PRINT USING "5X,""Minimum:"",M2D.2D,"" dBm""";Txpower(1)
1770 PRINT USING "5X,""Maximum:"",M2D.2D,"" dBm""";Txpower(2)
1780 PRINT USING "5X,""Average:"",M2D.2D,"" dBm""";Txpower(3)
1790 PRINT USING "5X,""Std Dev:"",M2D.2D,"" dB""";Txpower(4)
1800 ELSE
1810 GOSUB Bad_measurement
1820 END IF
1830 !
1840 CASE "PFER"
1850 OUTPUT Test_set;"FETC:PFER:ALL?"
1860 ENTER Test_set;Integrity,Rms_phas_err,Peak_phas_err,Worst_freq_err
1870 IF (Integrity=0) THEN
1880 PRINT "PFERror results: TCH =";Traf_chan;"and TXL =";Ms_pwr_lvl
1890 PRINT USING "5X,""RMS Phase Error:"",M2D.2D,"" deg""";Rms_phas_err
1900 PRINT USING "5X,""Peak Phase Error:"",M2D.2D,"" deg""";Peak_phas_err
1910 PRINT USING "5X,""Worst Freq Error:"",M3D.2D,"" Hz""";Worst_freq_err
1920 ELSE
1930 GOSUB Bad_measurement
1940 END IF
1950 !
1960 CASE "ORFS"
1970 !
1980 ! This code illustrates a more 'generic' approach to reading measurement
S:\Hp8960\E1960A GSM Mobile Test Application\A.04 Release\Reference_Manual\Chapters\prog_prog_guide_comprehensive_prog_example.fm
! TX Power measurement done.
! Always check integrity value.
! Phase & Frequency Error measurement done.
! ORFS measurement done.
Comprehensive Program Example
! sequential execution of
! the TXLevel command.
203