Hmm..
Im Simulator geht es. (Version 1.11.8.7)
(wenn man zusätzlich das END am Ende hinschreibt und die Quarzfrequenz angibt)
GrußCode:$sim $crystal = 16000000 Dim test As String * 48 Dim S_char(48) As Byte At test Overlay Test = "Das ist ein Teststring" S_char(1) = Asc( "T") S_char(2) = Asc( "E") S_char(3) = Asc( "S") S_char(4) = Asc( "T") Cls lcd test End
Christopher
Lesezeichen