Serial Port "kontinuierlich" auslesen Arduino

Henning Huth schrieb:
> Ist das wirklich die "richtige" Lösung?

Programm zeigen, sonst spielen wir Rätselraten.

Programm am PC umprogrammieren.

Oder vom PC aus Aktiv abfragen und auf Antwort warten.

Sven A. schrieb:
> interrupt statt pollen?

So etwas wäre besser. Leider hab ich schon im Internet gesehen, dass das 
SerialPort.DataReceived Event nicht "richtig" funktionieren soll.
Link:

http://www.sparxeng.com/blog/software/must-use-net-system-io-ports-serialport

(... The DataReceived event (100% redundant, also completely 
unreliable))

Ich werde es trotzdem so probieren.

@ Frank

Das Problem stellt sich so dar:

Unter dem Serial Monitor des Arduinos sieht es so aus, wenn ich den 
Encoder drehe

0 1 2 3 4 5 6 (Encoder im Uhrzeigersinn drehen // jetzt g.Uhrzeigersinn) 
5 4 3 ... alles i.O


Leider ließt er unter VB.Net am Serial Port in etwa so aus
0 5 5 10 8 (im Urzeigersinn // g.Uhrzeigersinn) 8 8 9 2 6 3

Es Funktioniert afaik schon ziemlich richtig. Aber es unterscheidet 
nicht für dich ob DEINE Nachricht vollständig angekommen ist. Es Meldet 
nur das neue Daten im Buffer sind, ob das der vollständige String ist 
den du gerne sehen möchtest oder nur 1 Zeichen davon, musst du selbst 
checken. Also am Besten noch mit einem Abschlusszeichen oÄ arbeiten um 
sicherzugehen.

Glaskugel Besitzer schrieb:
> Henning Huth schrieb:
>> Ist das wirklich die "richtige" Lösung?
>
> Programm zeigen, sonst spielen wir Rätselraten.

Bleibt dabei. Wie sollen wir dir hier Tips geben, wenn kein Code da ist. 
Vielleicht machst du einfach nur was falsch.

@ Glaskugelbesitzer ob das jetzt wirklich so wichtig ist

Polling vom PC per VB.Net:
...
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles 
Timer1.Tick
        Try
            Dim i As Single = SerialPort1.ReadExisting
            LblEncoder.Text = "Encoder Wert : " & i.ToString

        Catch ex As Exception

        End Try
    End Sub
...


Arduino Code:

int messungPin1 = LOW;
int messungPin1Alt = LOW;
int encoderWert = 0;

 void setup() {
 pinMode(3, INPUT);
 pinMode(4, INPUT);
 Serial.begin(9600);
 }

 void loop() {
 messungPin1 = digitalRead(3);
 if ((messungPin1 == HIGH) && (messungPin1Alt == LOW)) {
 if (digitalRead(4) == HIGH) {
 encoderWert++;
 } else {
 encoderWert--;
 }
 Serial.println (encoderWert);
 }
 messungPin1Alt = messungPin1;
 }

super ... wenn es wirklich so einfach ist und ich "nur" anstelle
> Dim i As Single = SerialPort1.ReadExisting
Dim i As String ... nehmen muss.

Kann das jetzt gerade nicht mehr testen bin erst ab 17 Uhr wieder da.

Danke für den Hinweis