BASCOM und SERIN

Gast #857187
Lesenswert?

Hallo,

du kannst in Bascom unterschiedliche Pins als Seriell Eingang 
deklarieren (software-uart):

dim empfangen as byte
dim eingangsstring as string*5
const ESC = 27

open "comb.1:19200,8,n,1" for input as #1  => pinb.1 als RxD Eingang
open "comb.0:19200,8,n,1" for output as #2 => pinb.0 als TxD Ausgang


do
i = inkey(#1)

if i<> 0 then print then
Eingangsstring = Eingangstring + chr(i)

if i = ESC then exit do

loop

close #1
close #2

Gruß Daniel

end
OP #857203
Lesenswert?

danst wrote:

> du kannst in Bascom unterschiedliche Pins als Seriell Eingang
> deklarieren (software-uart):


Danke Daniel,

ich kann die Kanäle nur sporadisch auslesen.
Und da wär es eben sinnvoll wenn die eingegangenen Zeichen nicht 
verloren gingen.

In etwas so:  "sind >30 Zeichen vorhanden dann hole sie ab"
Und das für jeden Kanal extra.
Die Zeichen können -alles- sein, also keine reinen ASCII.
Wenn es zuviele sind dann sollte das schadlos bleiben, also die 
Überzähligen einfach verlorengehen.


Kurt

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren