Hallo Jul-Ian
Für eine Laufschrift verwendest du einfach den Befehl [glow=red:afd835059d] shiftlcd [/glow:afd835059d]
Schau mal in die Bascom Hilfe.
Hier hab ich das mal schnell bei meinem LCD ausprobiert:
Code:'Laufschrift auf LCD 'Quick and Dirty from Gandalf 'LCD mit HD44780 kompatiblem Controller 4 Zeilen a 20 Zeichen '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 +5V '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" ' Ich verwende AT Mega 16 Config Lcd = 20 * 4 Config Lcdpin = Pin , Db4 = Porta.3 , Db5 = Porta.2 , Db6 = Porta.1 , Db7 = Porta.0 , E = Porta.4 , Rs = Porta.5 Cls Initlcd 'initialisiert das LCD '-------------------------------------------------------------- Do 'Begin Hauptschleife Cursor Off Upperline 'setzt Cursor in die obere Zeile Lcd "Schiebe Text" Shiftlcd Left ' schiebt Text nach links 'Shiftlcd Right ' schiebt Text nach rechts Waitms 300 Lowerline Lcd "Gandalf made it!" Waitms 300 'wartet 0,4 Sekunden Loop 'erneut aufrufen End







Zitieren

Lesezeichen