User`s guide

2-36
GPIB Tutorial and Examples
Program 2
3610 Errcount=Errcount+1 !settles note an error
3620 Error$(Errcount)=”Mobile’s output power did not settle within
‘Fpthreshold’ limits”
3630 END IF
3640 Fpwrmeas(Arcount,Txcount)=(Fastpower1+Fastpower2)/2 !Average last two
good readings
3650 OUTPUT Uut;”RFAN:AMPL1?” !Read the
Agilent 8922M/S analyzer expected input level
3660 ENTER Uut;Anlevel !and compare with the
measured power to check that
3670 Threedb=ABS(Anlevel-Fpwrmeas(Arcount,Txcount)) !the result is within
the allowed +/-3dB window
3680 Txlevcount=Txlevcount+1
3690 UNTIL Threedb<Leveltol OR Txlevcount>10 OR Txlevchange$=”false”
3700 IF Threedb>3 THEN
3710 Errcount=Errcount+1
3720 Error$(Errcount)=”Fast power meas 3dB input range exceeded”
3730 END IF
3740 Txlevchange$=”false”
3750 NEXT Arcount
3760 NEXT Txcount
3770 !
3780
!==================================================================================
3790 !
3800 !RE-COUPLE Agilent 8922M/S RF ANALYZER TO BASE STATION EMULATOR
3810 !
3820 OUTPUT Uut;”TRIG:DEL 473.4T” !Set approx three
timeslot delay for internal
3830 OUTPUT Uut;”TRIG:SOUR ‘ext demod’” !downlink trigger,
and select downlink trigger
3840 OUTPUT Uut;”HOPC:RFAN:MODE ‘hop’” !Set analyzer back to
hopping mode
3850 OUTPUT Uut;”HOPC:RFAN:AST ‘arm’” !Re-enable hopping
3860 OUTPUT Uut;”TRIG:DDEM:AST ‘arm’” !Re-enable the uplink
demodulator
3870 OUTPUT Uut;”CELL:MS:TADV:MODE ‘auto’” !Return to default
timing advance mode
3880 !
3890
!==================================================================================
3900 !
3910 !PERFORM BIT ERROR MEASUREMENTS
3920 ! !Note: 4 BER measurements
can be made in parallel
3930 OUTPUT Uut;”DISP:SCR BER1” !Display single BER
test screen
3940 OUTPUT Uut;”CELL:TCH1:MODE ‘single’” !Return to non-hop
TCH. Next channel change executes FACCH
3950 FOR Rxcount=1 TO Numberpwr !Outer loop for down-
link power levels
3960 Berpo=Berpwr(Rxcount) !Get downlink power
level from array
3970 OUTPUT Uut;”RFG:AMPL1 “;Berpo !Program Agilent 8922M/
S Generator to downlink power
3980 Count=0 !Establish a loop to
wait for the mobile’s receiver
3990 Instance=0 !AGC to recover from
downlink level change.
4000 REPEAT !The mobile’s reported
RXQual will indicate when
4010 OUTPUT Uut;”MEAS:CELL:SACCH:RESET” !the AGC has recov-
ered. Start by clearing old SACCH
4020 Count=Count+1 !The inner REPEAT loop
is used to check and wait
4030 Rxqualsettle=-1 !for the next SACCH
report from mobile. When the