BASCOM und SERIN

[Kurt B. (kurt-b)]

Hallo Leute,

ist es möglich einen Eingangspuffer für SERIN einzurichten (BASCOM, 
Mega32)?

Möchte mehrere SER-Eingänge anlegen und diese nacheinander auslesen.

Kurt

[danst (Gast)]

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

[Kurt B. (kurt-b)]

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