Inhaltsverzeichnis
Werbung
CAN-Erweiterung
RS485
40
In diesem Beispiel wird eine RS485-Schnittstelle als passiver Teilnehmer ver-
wendet, der alle Daten liest, die an seinem Eingang anliegen. Wenn ein
bestimmter Wert (55) empfangen wird, wird die Schnittstelle aktiv und sendet
dann ihrerseits fortlaufend den Wert 44.
REM Schnittstelle 2 liest so lange alle Daten vom Bus, bis
REM sie den Wert 55 empfängt. Danach wird die Schnittstelle
REM aktiv und sendet den Wert 44.
#Include
ADwinGoldII.inc
dim
ret_val,
val
as Long
init:
rs_reset()
REM Initialisierung der Schnittstellen:
REM 38400 Baud, Kein Paritätsbit, 8 Datenbits,
REM 1 Stoppbit, RS485 Software-Handshake
rs_init(1,38400,0,8,0,3)
rs_init(2,38400,0,8,0,3)
rs485_send(1,1)
rs485_send(2,0)
event:
val
= read_fifo(2)
if
(val
= 55)
then
rs485_send(2,1)
ret_val
= write_fifo(2,44)
endif
ADwin
'Schnittstelle 1 senden
'Schnittstelle 2 empfangen
'Daten aus Schnittstelle 2 lesen
'Schnittstelle 2 senden
'Daten schreiben
ADwin-Gold II , Handbuch Version 1.52, März 2010
Werbung
Inhaltsverzeichnis
