das war wohl wirklich purer Zufall - untenstehendes nehme ich zurück - auch ohne diesen Codeschnipsel kommen die merkwürdigen Anzeigen


--------------------------------------------------------------------------------------
So, durch Zufall konnte ich den Fehler etwas einkreisen - kommentiere ich den Aufruf nachfolgender Sub aus, hab ich die Anzeige die ich mir wünsche

Sub Ultraschallmessung()
Local Summe As Word
Local Z As Byte
Summe = 0
For Z = 1 To 4
Summe = Summe + Getadc(0)
Next Z
Shift Summe , Right , 2
Adc_wert(takt_zaehler) = Summe
End Sub


Die Sub soll das Array Adc_wert(32) füllen - und wird 32 mal pro Sekunde aufgerufen, mit einer kleinen Mittelung über 4 Werte.

Leider sehe ich keinen Zusammenhang zwischen meinen fehlerhaften Display-Anzeigen und der Sub.
Teilweise führen die Störungen durch die Sub sogar zum Neustart des ATMega128