Gambas: Die serielle Schnittstelle

zurück zu Gambas

Codebeispiel für die RS 232 Schnittstelle

PUBLIC sub Write_Serial (a AS String)

IF Sport.status = Net.Inactive THEN
   Message ("open port first")
ELSE
   chkrts.Value = TRUE
   WAIT 0.01
   WRITE #Sport,a,Len(a)
   WAIT 0.5
   chkrts.Value = FALSE
ENDIF

Das Serielle Gerät benutzt hier RTS UP um Daten zu akzeptieren. Wenn RTS aus ist, werden diese Daten übertragen.

This article is issued from Wikibooks. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.