@Dnerb
Mit dem Code wirds auch nich leichter da der ja Funktioniert nur nach dem Reset was nicht stimmt.
In der Lib wurde nur der Port angepasst.Code:$regfile = "m32def.dat" $lib "lcd4e2.lib" $crystal = 16000000 Dim ___lcde As Byte ___lcde = 0 Cls Lcd " Pollin 27*4 LCD TEST " Locate 2 , 1 Lcd " Zeile 2 " ___lcde = 1 'write to the 2 last lines Cls Lcd " Zeile 3 " Locate 2 , 1 Lcd " Zeile 4 " End
Lesezeichen