Hab ähnliche Problem. Ich kann von 1 bis 9 steuern. Von 10 bis 255 nicht.
Insgesamt sind 11 Buttons eingabaut.
1 = Unten links
2 = Unten
3 = Unten rechts
4 = Links
5 = Motorstopp
6 = Rechts
7 = Oben links
8 = Oben
9 = Oben rechts
10 = Stift runter
11 = Stift hoch
Visual Basic 2010
BASCOM-AVRCode:Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click SerialPort1.Open() SerialPort1.Write("10") SerialPort1.Close() End Sub
Stift fährt nicht runter.Code:. . Dim B as String * 2 Do B = Waitkey() Select Case B Case "10" : Gosub Kpd_plus End Select Loop
Lesezeichen