...noch Blöcke, also nichts sinnvolles mehr.
So langsam weiss ich nich mehr warum.

Im Terminal Fenster wird mir alles vernünftig angezeigt.

Do
F = Getadc(0) 'Dim F as Word / Pin45 /
G = F / 200 'Dim G as Single
J = Str(g) 'Dim J as string * 1
J = Fusing(g , "#.##")

Call Lcd_print(j , 12 , 70 , 1 , 1 , 1 , White , Black)
Print #4 , Fusing(g , "#.##")
Waitms 500
Loop