18.12.2012 Views

R&S FSQ Signal Analyzer - Rohde & Schwarz

R&S FSQ Signal Analyzer - Rohde & Schwarz

R&S FSQ Signal Analyzer - Rohde & Schwarz

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

R&S <strong>FSQ</strong> Remote Control – Programming Examples<br />

More Complex Programming Examples<br />

'--------- Read out result ----------------------------------<br />

Print "Result (CP, ACP low, ACP up, Alt low, Alt up): "<br />

Print result$<br />

'--------- Example 2: Configure CP/ACP manually for GSM ---result$<br />

= Space$(100)<br />

status = viWrite(analyzer, "FREQ:CENT 935.2MHz", 18, retCnt)<br />

'Set frequency<br />

status = viWrite(analyzer, "CALC:MARK:FUNC:POW:SEL ACP", 26, retCnt)<br />

'ACP measurement on<br />

status = viWrite(analyzer, "SENS:POW:ACH:ACP 1", 18, retCnt)<br />

'1 adjacent channel<br />

status = viWrite(analyzer, "SENS:POW:ACH:BAND 200KHZ", 24, retCnt)<br />

'Channel bandw. 200 kHz<br />

status = viWrite(analyzer, "SENS:POW:ACH:BAND:ACH 200KHZ", 28, retCnt)<br />

'Adjacent channel bandwidth 200 kHz<br />

status = viWrite(analyzer, "SENS:POW:ACH:SPAC 200KHZ", 24, retCnt)<br />

'Channel spacing 200 kHz<br />

status = viWrite(analyzer, "SENS:POW:ACH:PRES ACP", 21, retCnt)<br />

'Optimize settings<br />

status = viWrite(analyzer, "SENS:POW:ACH:PRES:RLEV;*WAI", 27, retCnt)<br />

'Optimize reference level<br />

status = viWrite(analyzer, "SENS:POW:ACH:MODE ABS", 21, retCnt)<br />

'Absolute measurement<br />

'--------- Start measurement and query result ---------------status<br />

= viWrite(analyzer, "INIT;*WAI", 9, retCnt)<br />

'Perform sweep with sync<br />

status = viWrite(analyzer, "CALC:MARK:FUNC:POW:RES? ACP", 27, retCnt)<br />

'Query result<br />

status = viRead(analyzer, result$, 100, retCnt)<br />

'--------- Read out result ----------------------------------<br />

Print "Result (CP, ACP low, ACP up): "<br />

Print result$<br />

'--------- Active limit check ------------------------------result$<br />

= Space$(100)<br />

status = viWrite(analyzer, "CALC:LIM:ACP:ACH 30DB, 30DB", 27, retCnt)<br />

'Set relative limit<br />

status = viWrite(analyzer, "CALC:LIM:ACP:ACH:ABS -35DBM,-35DBM", 34, retCnt)<br />

'Set absolute limit<br />

status = viWrite(analyzer, "CALC:LIM:ACP:ACH:STAT ON", 24, retCnt)<br />

'Rel. limit check on<br />

status = viWrite(analyzer, "CALC:LIM:ACP:ACH:ABS:STAT ON", 28, retCnt)<br />

'Abs. limit check on<br />

status = viWrite(analyzer, "CALC:LIM:ACP ON", 15, retCnt)<br />

'Limit check on<br />

'--------- Start measurement and query result --------------status<br />

= viWrite(analyzer, "INIT;*WAI", 9, retCnt)<br />

'Perform sweep with sync<br />

Operating Manual 1313.9681.12 - 01 7.15

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!