Werbung
Grundlegende Schritte der IEC-Bus-Programmierung
Befehlssynchronisation
Die im folgenden Beispiel realisierten Möglichkeiten zur Synchronisation sind im Kapitel 5, Abschnitt
"Befehlsreihenfolge und Befehlssynchronisation" beschrieben.
REM -------- Beispiele zur Befehlssynchronisation ---------
PUBLIC SUB SweepSync()
REM Der Befehl INITiate[:IMMediate] startet einen Single-Sweep, wenn zuvor
REM der Befehl INIT:CONT OFF gesendet wurde. Es soll sichergestellt werden,
REM daß der nächste Befehl erst ausgeführt wird, wenn ein kompletter
REM Sweep abgeschlossen ist.
CALL IBWRT(analyzer%, "INIT:CONT OFF")
REM -------- Erste Möglichkeit: Verwendung von *WAI --------
CALL IBWRT(analyzer%, "ABOR;INIT:IMM; *WAI")
REM -------- Zweite Möglichkeit: Verwendung von *OPC? --------
OpcOk$ = SPACE$(2)
CALL IBWRT(analyzer%, "ABOR;INIT:IMM; *OPC?")
REM ------ hier kann der Controller andere Geräte bedienen ------
CALL IBRD(analyzer%, OpcOk$)
REM -------- Dritte Möglichkeit: Verwendung von *OPC --------
REM Um die Service-Request-Funktion in Verbindung mit einem GPIB-Treiber von
REM National Instruments verwenden zu können, muß die Einstellung "Disable
REM Auto Serial Poll" mittels IBCONF auf "yes" geändert werden!
CALL IBWRT(analyzer%, "*SRE 32")
CALL IBWRT(analyzer%, "*ESE 1")
CALL IBWRT(analyzer%, "ABOR;INIT:IMM; *OPC") 'Sweep starten mit
CALL WaitSRQ(boardID%,result%)
REM Hier das Hauptprogramm fortführen.
END SUB
REM ***********************************************************************
1093.4820.11
'Platz für *OPC?-Antwort bereitstellen
'Warten auf die "1" von *OPC?
'Service Request ermöglichen für ESR
'Event-Enable Bit setzen für
'Operation-Complete-Bit
'Synchronisierung auf OPC
'Warten auf Service Request
7.6
FSP
D-1
Werbung
Kapitel
