
R&S ESU
Remote Control – Programming Examples
More Complex Programming Examples
7.14
Operating Manual 1302.6163.12 - 03
'--------- Definition of data points and threshold ----------
xlimit$ = "CALC:LIM5:CONT 120MHZ,126MHZ,127MHZ,128MHZ,129MHZ,130MHz,136MHz"
status = viWrite(analyzer, xlimit$, 63, retCnt)
'Set values for x-axis
status = viWrite(analyzer, "CALC:LIM5:UPP -70,-40,-40,-20,-40,-40,-70", 41,
retCnt)
'Set values for y-axis
status = viWrite(analyzer, "CALC:LIM5:UPP:THR -75DBM", 24, retCnt)
'Set y threshold (only possible for relative y-axis)
'A margin or an x /y offset can be defined here.
'--------- Activate and evaluate the limit line in screen A --
status = viWrite(analyzer, "CALC1:LIM5:UPP:STAT ON", 22, retCnt)
'Activate line 5 in screen A
status = viWrite(analyzer, "CALC1:LIM5:STAT ON", 18, retCnt)
'Activate limit check in screen A
status = viWrite(analyzer, "INIT;*WAI", 9, retCnt)
'Perform sweep with sync
status = viWrite(analyzer, "CALC1:LIM5:FAIL?", 16, retCnt)
'Query result of limit check
status = viRead(analyzer, result$, 100, retCnt)
'Result: 1 (= FAIL)
'--------- Read out result ---------------------------------
Print "Limit Result Line 5: "; result$
'- Evaluate limit line in screen A by means of status register -
status = viWrite(analyzer, "*CLS", 4, retCnt)
'Reset status register
'--------- Measure ------------------------------------------
status = viWrite(analyzer, "INIT;*OPC?", 4, retCnt)
'Perform sweep with sync
status = viRead(analyzer, result$, 100, retCnt)
'Wait for service request
status = Val(result$)
'--------- Read out result ----------------------------------
IF (status% = 1) THEN
status = viWrite(analyzer, "STAT:QUES:LIM1:COND?", 20, retCnt)
'Read out STAT:QUES:LIMit register
status = viRead(analyzer, result$, 100, retCnt)
'Read out result
IF ((Val(result$) And 16) <> 0) THEN
Print "Limit5 failed"
ELSE
Print "Limit5 passed"
END IF
END IF
END SUB
REM ************************************************************************
Содержание 1129.7246.03
Страница 1: ...R S ESU EMI Test Receiver Operating Manual 1302 6163 12 03 Test Measurement Operating Manual ...
Страница 25: ......
Страница 27: ...R S ESU Putting into Operation 1 2 Operating Manual 1302 6163 12 03 ...
Страница 29: ...R S ESU Getting Started 2 2 Operating Manual 1302 6163 12 03 ...
Страница 31: ...R S ESU Manual Operation 3 2 Operating Manual 1302 6163 12 03 ...
Страница 349: ...R S ESU Instrument Functions Basic Settings 4 318 Operating Manual 1302 6163 12 03 ...
Страница 405: ...R S ESU Instrument Functions User Port 4 374 Operating Manual 1302 6163 12 03 ...
Страница 439: ...R S ESU Remote Control Basics Status Reporting System 5 34 Operating Manual 1302 6163 12 03 ...
Страница 821: ...R S ESU Remote Control Programming Examples More Complex Programming Examples 7 32 Operating Manual 1302 6163 12 03 ...
Страница 841: ...R S ESU Error Messages Device Specific Messages 9 10 Operating Manual 1302 6163 12 03 ...
Страница 854: ...Operating Manual 1302 6163 12 03 10 13 R S ESU ...
Страница 855: ...R S ESU 10 14 Operating Manual 1302 6163 12 03 ...