Um ein 4*20 Zeichen LC-Display mit dem inzwischen auch schon populären KS0073 Controller an der C-Control zu verwenden, ist es nötig ein wenig mit den Zeilen zu Tricksen.
Beispiel - Display: EADIP204-4 (Datenblatt in Anlage)
Hier also der entsprechende Code um mit Basic++ das Display sinnvoll mit allen 4 Zeilen und jeweils bis zu 20 Zeichen anzusteuern:
- Code: Alles auswählen
'//////////////////////////////////////
'//
'// CCBasic++
'// Destination C-Control I M2.0
'// Beschreibung: 4x20 LCD KS0073
'//
'//////////////////////////////////////
OPTION CC2.0 'Zielplattform
'--------------------------
'------ I/O PORTS ---------
'--------------------------
define LCDPORT byteport[2]
'--------------------------
'---- SYSTEM MEMORY -------
'--------------------------
define OUTBYTE byte
LCD.INIT
LCD_WRITECMD(24h)
pause 2
LCD_WRITECMD(09h)
pause 2
LCD_WRITECMD(20h)
pause 2
LCD.POS 1,1
LCD.PRINT "Zeile 1"
LCD.POS 1,33
LCD.PRINT "Zeile 2"
LCD.POS 1,65
LCD.PRINT "Zeile 3"
LCD.POS 1,97
LCD.PRINT "Zeile 4"
'--------- ------WRITE HI NIBBLE LCD COMMAND ------------
Function LCD_WRITECMD(LCDDATA as byte)
OUTBYTE=(LCDDATA shr 4)
LCDPORT=OUTBYTE or 01000000b
LCDPORT=OUTBYTE and 10111111b
'--------------- WRITE LO NIBBLE ------------------------
OUTBYTE=(LCDDATA and 0Fh)
LCDPORT=OUTBYTE or 01000000b
LCDPORT=OUTBYTE and 10111111b
end Function
'-------------------------------------------------------
Gruß
Thomas
