Forum: Mikrocontroller und Digitale Elektronik Bascom -- Input mit Buffer


Announcement: there is an English version of this forum on EmbDev.net. Posts you create there will be displayed on Mikrocontroller.net and EmbDev.net.
von Daniel (Gast)


Lesenswert?

Hallo zusammen,

ich versuche Bytes über die serielle Schnittstelle einzulesen. Diese
Daten kommen regelmäßig aus derm Empfänger einer Wetterstation.
Der folgende Test-Code läuft, die Zeichen werden auf dem LCD
dargestellt.
$crystal = 1000000
$regfile = "m8def.dat"
$baud = 1200
On Urxc Rx
Enable Urxc
Enable Interrupts
Dim Temp_byte As Byte
Dim I As Integer
'----------------------------------------------------------
' Hauptprogramm
'----------------------------------------------------------
Cls
Lcd "Test"
Wait 1
Do
  I = I + 1
  Cls
  Lcd Temp_byte
  Lowerline
  Lcd I
  Waitms 300
Loop
End
'----------------------------------------------------------
' ISR
'----------------------------------------------------------
Rx:
Temp_byte = Udr
Return

Ich würde jedoch gerne mit Buffer arbeiten.
Bei diesem Codebeispiel kommt immer die "0" zurück, was bedeuten
soll, dass der Buffer leer ist.

$crystal = 1000000
$regfile = "m8def.dat"
$baud = 1200
Dim Temp_byte As Byte
Dim I As Integer

Config Serialin = Buffered , Size = 20

'----------------------------------------------------------
' Hauptprogramm
'----------------------------------------------------------
Cls
Lcd "Test"
Wait 1
Do
  I = I + 1
  Cls
  Temp_byte = Inkey()
  Lcd Temp_byte
  Lowerline
  Lcd I
  Waitms 300
Loop
End

Hat jemand eine Idee, wo der Fehler liegen könnte ??
Vielen Dank !!!

Daniel

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.