Darwin, Robby-Fan,
vielen Dank !!
Den letzten Vorschlag werde ich gleich testen.
Habe inzwischen mal das hier probiert:
Code:
$crystal = 3686400
$regfile = "m8def.dat"
Dim Xstring As String * 20
Dim Xbyte(21) As Byte At Xstring Overlay
Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , Rs = Portd.2 , E = Portd.3
Config Lcd = 16 * 2
Initlcd
Xbyte(1) = 5
Xbyte(2) = 4
Xbyte(3) = 2
Xbyte(4) = 5
Xbyte(5) = 8
Xbyte(6) = 3
Xbyte(7) = 8
Xbyte(8) = 0
Cls
Lcd "test"
Lowerline
Lcd Xstring
End
Im LCD steht nachher auch Test in der oberen Zeile.
Dadrunter steht nur Müll. Was mache ich falsch ??
Daniel
Lesezeichen