Programming a Waveform Quality/Code Domain Measurement

Programming Example

 
10    RE-SAVE "c:\roadhog\programs\wqu.txt"
20    !This program measures waveform quality
30    !Refer to "Waveform Quality and Frequency Accuracy" in EIA/TIA-IS-98D for standards and
specifications
40    CLEAR SCREEN
50    A=714
60    !***Specify call parameters***
70    Systype$="DIGITAL2000" !Cell System Type
80    Band$="USCELLULAR" !Cell band
90    Channel=384 !RF Channel
100   Sid=1 !System Identification
110   Nid=1 !Network Identification
120   Radio_config$="F3R3" !Radio Configuration
130   Service_opt$="SO2"   !Loopback service option
140   !
150   !***Specify test parameters***
160   Loss_frequency$="851 MHZ,896 MHZ" !Reverse channel, forward channel frequencies for
amplitude offset (path loss)
170   Expected_loss$="-2,-2" !Path loss at reverse channel, forward channel frequencies
180   Ior=-50!Cell power
190   Pilot=-7 !Pilot channel power level
200   Traffic=-7.4 !Traffic channel power level
210   !
220   ON TIMEOUT 7,20 CALL Timeout ! Calls "Timeout" routine
230   OUTPUT A;"SETUP:WQU:TIMEOUT:STIME 10 S" !Sets waveform quality measurement timeout to 10
seconds
240   OUTPUT A;"SYST:COMM:GPIB:DEB:STAT ON"!Turns debug state on
250   !
260   !***Set up call parameters***
270   OUTPUT A;"CALL:OPER:MODE CALL" !Sets Operating Mode to Active Cell
280   OUTPUT A;"CALL:SYSTEM ";Systype$ !Sets System Type
290   OUTPUT A;"CALL:BAND ";Band$ !Sets Cell Band for selected System Type
300   OUTPUT A;"CALL:CHAN ";Channel !Sets RF Channel for selected System Type and Cell Band
310   OUTPUT A;"CALL:POW -35" !Sets and turns on Cell Power
320   OUTPUT A;"CALL:SID ";Sid! Sets System Identification
330   OUTPUT A;"CALL:NID ";Nid! Sets Network Identification
340   OUTPUT A;"CALL:RCON ";Radio_config$!Sets Radio configuration
350   OUTPUT A;"CALL:SOPTION ";Service_opt$ !Sets service option for selected System Type and
Radio Configuration
360   OUTPUT A;"CALL:PROT PREV6" !Sets Protocol Revision for the selected System Type
370   OUTPUT A;"CALL:PAG:DRAT FULL" !Sets Paging data rate to full rate
380   OUTPUT A;"CALL:PIL -7"    !Sets pilot to default
390   OUTPUT A;"CALL:SYNC -16"  !Sets sync to default
400   OUTPUT A;"CALL:PAG -12"   !Sets paging to default
410   OUTPUT A;"CALL:FCH -15.6" !Sets traffic to default
420   !
430   PRINT "Turn on mobile station...press continue when it has found service and registered"
440   PAUSE
450   CLEAR SCREEN
460   OUTPUT A;"CALL:REGISTER:TIMER:STATE OFF" !Turns off timer-based registrations
470   WAIT 2 ! Waits for any timer-based registrations to clear out
480   !
490   !***Page the mobile station***
500   DISP "Paging mobile station..."
510   OUTPUT A;"CALL:ORIG" !Pages the mobile station520   OUTPUT A;"CALL:CONNECTED:STATE?" !Queries for connected/idle state...hangs until state change detector is disarmed
530   ENTER A;Call_connected
540   IF NOT Call_connected THEN
550     DISP "Call attempt failed"
560     STOP
570   ELSE
580     DISP "Call connected"
590   END IF
600   !
610   !***Set up measurement parameters***
620   OUTPUT A;"SETUP:WQUALITY:CONTINUOUS OFF" !Sets trigger arm state to single
630   OUTPUT A;"CALL:POW ";Ior !Sets Cell Power for the selected System Type
640   OUTPUT A;"CALL:CLPCONTROL:REVERSE:MODE ALT" !Alternating up/down power control bits
650   OUTPUT A;"CALL:PIL ";Pilot !Sets Pilot channel level
660   OUTPUT A;"CALL:FCH ";Traffic !Sets Fundamental (Traffic) channel level
661   OUTPUT A;"SETUP:WQUALITY:CDPOWER:IQINactive:LIMIT -23"
670   !
680   !***Obtain and display waveform quality measurement results***
690   WAIT 1
700   OUTPUT A;"INITIATE:WQUALITY" !Initiates a Waveform Quality measurement
760   OUTPUT A;"FETCh:WQUALITY?" !Queries the test set for waveform quality measurement
results
770   ENTER A;Integrity,Rho,Freq_error,Time_error,Carr_feed,Phase_err,Mag_err,Evm
780   PRINT "Integrity indicator = ";Integrity
790   PRINT "Rho = ";Rho,"Frequency error = ";Freq_error,"Time error = ";Time_error,"Carrier
feedthrough = ";Carr_feed
800   PRINT "Phase error = ";Phase_err,"Magnitude error = ";Mag_err,"Error vector magnitude =
";Evm
801   !
802   !***Obtain and display code domain power pass/fail measurement results***
803   OUTPUT A;"FETCh:WQUality:CDPower:IQINactive?"
804   ENTER A;Iq_passfail
805   SELECT Iq_passfail
806   CASE 0
807     PRINT "Code domain power passed"
808   CASE 1
809     PRINT "Code domain power failed"
811   END SELECT
813   !***Obtain and display code domain power measurement results (I-channel)***
814   DIM Ichannel$[1000]
815   OUTPUT A;"FETCh:WQUALITY:CDPower:ICH?"
816   ENTER A;Ichannel$
830   INTEGER I,Comma,Nextcomma !I represents the 16 bins, Comma is the current substring position
840   Comma=1 !Initialize Comma to the first character of the Ichannel$ ascii character string
860   PRINT "I-Channel active/inactive = ";Ichannel$[Comma;16]
870   Comma=Comma+17
890   PRINT "I-channel bin 0 walsh channel number = ";Ichannel$[Comma;16]
891   Comma=Comma+17
900   PRINT "I-channel bin 0 spread factor = ";Ichannel$[Comma;16]
905   Comma=Comma+17
910   PRINT "I-channel bin 0 power level = ";Ichannel$[Comma;16]
920   DISP "Test complete"
930   !
940   !***Return to default call processing settings***
950   OUTPUT A;"CALL:CLPCONTROL:REVERSE:MODE ACTIVE" !Return to active power control bits
960   OUTPUT A;"CALL:POW:DIG2000 -50" ! Returns cell power to -50 dBm/1.23 MHz
970   OUTPUT A;"CALL:END"
980   END
990 Timeout: SUB Timeout     ! Global timeout handler (from Step 1)
1000    PRINT "Program timed out"
1010    CLEAR 7
1020    CLEAR 714
1030  SUBEND

Related Topics

Waveform Quality/Code Domain Measurement Description

Measuring Waveform Quality/Code Domain Power

Waveform Quality Measurement Troubleshooting

Control Program Example

SETup:WQUality

FETCh:WQUality

INITiate

READ

ABORt