Hallo Bascomer,

ich bin dabei eine Messbereichsumschaltung zu proggen. Dabei soll der
Messbereich entweder per Taster (up, down) oder von einer Windows Anwendung änderbar sein. Wenn ich jedoch den A=inkey () einkommentiere funktioniert die Messbereichsänderung per Taster nicht mehr aber die Verstellung vom PC aus. Kommentiere ich den inkey aus funktionieren die Taster wieder wie gewünscht. Beides zusammen geht irgendwie nicht. Ich hoffe ihr habt eine Lösung parat....
Hier die relevanten Stellen des Code:

Do
'A = Inkey()

'-------------------------------------
'Messbereichsumschaltung per Taster

If Pinc.0 = 0 Then
Waitms 200
Incr A
End If

If Pinc.1 = 0 Then
Waitms 200
Decr A
End If

'--------------------------------------
'Begrenzung der Variable


If A > 53 Then
A = 53
End If

If A < 49 Then
A = 49
End If


If A >= 49 Then

'---------------------------------------
'Zuordnungen

If A = 49 Then
Lowerline
Lcd " 1V "
Portd.2 = 1
Portd.3 = 0
Portd.4 = 0
Portd.5 = 0
Portd.6 = 0
End If

If A = 50 Then
Lowerline
Lcd " 2V "
Portd.2 = 0
Portd.3 = 1
Portd.4 = 0
Portd.5 = 0
Portd.6 = 0
End If

If A = 51 Then
Lowerline
Lcd " 5V "
Portd.2 = 0
Portd.3 = 0
Portd.4 = 1
Portd.5 = 0
Portd.6 = 0
End If

If A = 52 Then
Lowerline
Lcd " 10V "
Portd.2 = 0
Portd.3 = 0
Portd.4 = 0
Portd.5 = 1
Portd.6 = 0
End If

If A = 53 Then
Lowerline
Lcd " 20V "
Portd.2 = 0
Portd.3 = 0
Portd.4 = 0
Portd.5 = 0
Portd.6 = 1
End If

End If

Loop

End

Wie man sieht versuche ich immer die Variable A zu ändern die als Byte def. ist.

Danke schon mal im vorraus

Neutro