FSP
REM ************************************************************************
Public Sub MultiBurstPower()
result$ = Space$(200)
'--------- Grundeinstellung FSP ---------------------------------------
CALL SetupStatusReg
CALL IBWRT(analyzer%,"*RST")
CALL IBWRT(analyzer%,"INIT:CONT OFF")
CALL IBWRT(analyzer%,"SYST:DISP:UPD OFF")
'--------- Messung durchführen und Ergebnisse abfragen ---------------------
cmd$ = "MPOW? "
cmd$ = cmd$ + "935.2 MHZ,"
cmd$ = cmd$ + "1MHZ,"
cmd$ = cmd$ + "434US,"
cmd$ = cmd$ + "VID,"
cmd$ = cmd$ + "50PCT,"
cmd$ = cmd$ + "1US,"
cmd$ = cmd$ + "PEAK,"
cmd$ = cmd$ + "8"
CALL IBWRT(analyzer%, cmd$)
CALL IBRD(analyzer%, result$)
Print result$
END SUB
REM ************************************************************************
1093.4820.11
Komplexere Programmbeispiele
'Statusregister konfigurieren
'Gerät zurücksetzen
'Single Sweep Betrieb
'OFF: Bildschirmdarstellung aus
'Center Frequency
'Resolution Bandwidth
'Meas Time
'Trigger Source
'Trigger Level
'Trigger Offset, muss > 125 ns sein
'Detector Peak
'# of Bursts
'Ergebnisse einlesen
7.33
D-1