Hallo Freunde,
ich habe mich vor ein paar Minuten als Neuling angemeldet.
Folgendes Problem:
Hardware : Arduino UNO mit LCD 16x2 Zeichen. Software Bascom.
Möchte gerne meinen alten Verstärker mit einen Display erweitern.
LCD soll mir nur die Eingangswahl von verschiedene Quellen anzeigen.
Aux , Plattenspieler, CD und Tuner. Habe schon erste Teilerfolge.
In der zweiten Zeile soll dauernd "Made by Masa" stehen.
in der ersten Zeile die Verschiedene Eingänge die mittels Drehschalter umgeschaltet werden.
Nun mein Problem:
Wenn ich nur eine Zeile nehme funktioniert es einwandfrei .
Sobald ich die zweite Zeile "Made by masa " nehme flackert diese Zeile.
Habe viele Zeiten (waitms ) ausprobiert.
Kann mir bitte da einer weiterhelfen ?
Anbei Miniprogramm
Alles anzeigen
ich habe mich vor ein paar Minuten als Neuling angemeldet.
Folgendes Problem:
Hardware : Arduino UNO mit LCD 16x2 Zeichen. Software Bascom.
Möchte gerne meinen alten Verstärker mit einen Display erweitern.
LCD soll mir nur die Eingangswahl von verschiedene Quellen anzeigen.
Aux , Plattenspieler, CD und Tuner. Habe schon erste Teilerfolge.
In der zweiten Zeile soll dauernd "Made by Masa" stehen.
in der ersten Zeile die Verschiedene Eingänge die mittels Drehschalter umgeschaltet werden.
Nun mein Problem:
Wenn ich nur eine Zeile nehme funktioniert es einwandfrei .
Sobald ich die zweite Zeile "Made by masa " nehme flackert diese Zeile.
Habe viele Zeiten (waitms ) ausprobiert.
Kann mir bitte da einer weiterhelfen ?
Anbei Miniprogramm
BASCOM-Quellcode
- $regfile = "m328pdef.dat"
- $crystal = 16000000
- $swstack = 10
- Config Lcdpin = Pin , Db4 = Portd.2 , Db5 = Portd.3 , Db6 = Portd.4 , Db7 = Portd.5 , E = Portb.3 , Rs = Portb.4
- Config Lcd = 16 * 2
- Cursor Off
- Portb = 255
- Config Portd.6 = Input
- Taste1 Alias Pind.6
- Config Portd.7 = Input
- Taste2 Alias Pind.7
- Config Portb.1 = Input
- Taste3 Alias Pinb.1
- Config Portb.2 = Input
- Taste4 Alias Pinb.2
- Do
- If Taste1 = 0 Then
- Waitms 220
- Cls
- Locate 1 , 1
- Lcd " AUX "
- Lowerline
- Locate 2 , 1
- Lcd "MADE BY MASA"
- Upperline
- Waitms 200
- End If
- If Taste2 = 0 Then
- Waitms 220
- Cls
- Locate 1 , 1
- Lcd " Plattenspieler"
- Lowerline
- Locate 2 , 1
- Lcd "MADE BY MASA"
- Upperline
- Waitms 220
- End If
- If Taste3 = 0 Then
- Waitms 220
- Cls
- Locate 1 , 1
- Lcd " cd "
- Lowerline
- Locate 2 , 1
- Lcd "MADE BY MASA"
- Upperline
- Waitms 220
- End If
- If Taste4 = 0 Then
- Waitms 220
- Cls
- Locate 1 , 1
- Lcd " Tuner "
- Lowerline
- Locate 2 , 1
- Lcd "MADE BY MASA"
- Upperline
- Waitms 220
- End If
- Loop
- End