Ähm ja nu hab ich das LCD hier und es will nicht richtig. Schwarze Balken werden angezeigt und ich kanna uch den Kontrast regeln, aber das wars dann auch schon.
Code:
$regfile = "M8def.dat"
$crystal = 3686400
Config Portd = Output
Config Lcd = 16 * 1
Config Lcdpin = Pin , Db4 = Portd.3 , Db5 = Portd.4 , Db6 = Portd.5 , Db7 = Portd.6 , E = Portd.2 , Rs = Portd.7
Config Lcdbus = 4
Config Lcdmode = Port
Initlcd 'initialisiert das LCD
'--------------------------------------------------------------
Do 'Begin Hauptschleife
Cls
'setzt Cursor in die obere Zeile
Lcd "Erster Test"
Wait 1 'wartet 1 sekunde
Cls 'löscht LCD
Wait 1 'wartet 1s und schreibt erneut
Loop 'erneut aufrufen
End
Lesezeichen