Werbung
R&S FSQ
'--------- Definition von Stützwerten und Schwellwert --------
xlimit$ = "CALC:LIM5:CONT 120MHZ,126MHZ,127MHZ,128MHZ,129MHZ,130MHz,136MHz"
status = viWrite(analyzer, xlimit$, 63, retCnt)
'x-Achsen-Werte festlegen
status = viWrite(analyzer, "CALC:LIM5:UPP -70,-40,-40,-20,-40,-40,-70", 41,
retCnt)
'y-Achsen-Werte festlegen
status = viWrite(analyzer, "CALC:LIM5:UPP:THR -75DBM", 24, retCnt)
'Festlegung des y-Schwellwerts (nur bei relativer y-Achse
'möglich)
'Die Festlegung des Sicherheitsabstands sowie die Verschiebung
'in x- und/oder y-Richtung kann ab hier erfolgen.
'----- Einschalten und Auswerten der Linie in Screen A -------
status = viWrite(analyzer, "CALC1:LIM5:UPP:STAT ON", 22, retCnt)
'Einschalten der Linie in Screen A
status = viWrite(analyzer, "CALC1:LIM5:STAT ON", 18, retCnt)
'Einschalten der Grenzwertprüfung in Screen A
status = viWrite(analyzer, "INIT;*WAI", 9, retCnt)
'Sweep durchführen mit Sync
status = viWrite(analyzer, "CALC1:LIM5:FAIL?", 16, retCnt)
'Abfrage des Ergebnisses der Grenzwertprüfung
status = viRead(analyzer, result$, 100, retCnt)
'Ergebnis: 1 (= FAIL)
'--------- Ergebnis ausgeben ---------------------------------
Print "Limit Result Line 5: "; result$
'----------- Auswerten der Linie in Screen A via Statusregister
status = viWrite(analyzer, "*CLS", 4, retCnt)
'Status-Register zurücksetzen
'--------- Messung durchführen -------------------------------
status = viWrite(analyzer, "INIT;*OPC?", 4, retCnt)
'Sweep durchführen mit Sync
status = viRead(analyzer, result$, 100, retCnt)
'Warten auf Service Request
status = Val(result$)
'--------- Ergebnis ausgeben ---------------------------------
IF (status% = 1) THEN
status = viWrite(analyzer, "STAT:QUES:LIM1:COND?", 20, retCnt)
'Limit Statusregister auslesen
status = viRead(analyzer, result$, 100, retCnt)
'Ergebnis auslesen
IF ((Val(result$) And 16) <> 0) THEN
Print "Limit5 failed"
ELSE
Print "Limit5 passed"
END IF
END IF
END SUB
REM ******************************************************************
7.14
Fernsteuerung – Programmbeispiele
Komplexere Programmbeispiele
Operating Manual 1313.9681.11 - 02
Werbung
Kapitel
