Dieses Programm sollte funktionieren :
Code:
'Fehlersuche
'LCD mit HD44780 kompatiblem Controller
'Anschluß
'LCD Pin 1 = 0Volt (GND)
'LCD Pin 2 = +5 Volt (VDD)
'LCD Pin 3 = 0-5 Volt Kontrast (V0): Poti 10k zwischen 0V und 5V Schleifer an LCD3
'LCD Pin 4 = RS an PortA.2
'LCD Pin 5 = R/W an GND
'LCD Pin 6 = E an Porta.3
'LCD Pin 7 = DB0 'frei
'LCD Pin 8 = DB1 'frei
'LCD Pin 9 = DB2 'frei
'LCD Pin 10 = DB3 'frei
'LCD Pin 11 = DB4 an Porta.4
'LCD Pin 12 = DB5 an Porta.5
'LCD Pin 13 = DB6 an Porta.6
'LCD Pin 14 = DB7 an Porta.7
'_____________________________________________________________
$crystal = 16000000
$regfile = "m16def.dat"
Config Lcd = 16 * 2 'welches LCD wird verwendet ?
Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7 , E = Porta.3 , Rs = Porta.2
' wie ist das LCD angeschlossen - muß in einer Zeile stehen
Initlcd 'initialisiert das LCD - nicht vergessen
'--------------------------------------------------------------
Do 'Begin Hauptschleife
Cls 'löscht das LCD
Upperline 'setzt Cursor in die obere Zeile
Lcd "Erster Test"
Lowerline 'setzt Cursor in die untere Zeile
Lcd "Hallo Welt!!!"
Wait 1 'wartet 1 Sekunde
Cls 'löscht LCD
Wait 1 'wartet 1s und schreibt erneut
Loop 'erneut aufrufen
End
Du mußt hier noch die Anschlüsse von deinem LCD eintragen bei
Config Lcdpin = Pin , Db4 = Porta.4 ... sagt wie dein LCD angeschlossen ist und
config lcd = 16 *2 (= LCD mit 2 Zeilen a 16 Buchstaben) sagt welches LCD du verwendest
Du mußt in $regfile noch deinen Chip einstellen und in $chrystal noch deinen Quartz.
Konfigurationen hier im Programm haben Vorrang vor Konfigurationen im Bascom, sollten aber trotzdem übereinstimmen, sonst gibts beim Übertragen Fehlermeldungen.
Viel Erfolg Bernd
Lesezeichen