danke rene,

ich muß sagen trotz deiner enormen anstrengen mir zu helfen fehlen mir einfach zu viele Kenntnisse um es hinzubekommen. Ich habe es jetzt mal versucht in eine Programm umzusetzen dieses wurde auch fehlerfrei kompiliert aber es kommt irgendwie nur mist dabei raus. Ich habe den Eindruck das er den analogport nun irgendwie gar nicht mehr berücksichtigt.

Auf der RS232 spuckt er mir nun periodisch dies aus :

565
65
65
65
65
65
65
6565


Hier ist der Code den ich versucht habe
Code:
    ' ------------- Hier die üblichen RN-Control Anweisungen --------------
$regfile = "m32def.dat"
$crystal = 16000000                                         'Quarzfrequenz
$baud = 38400


Config Adc = Single , Prescaler = Auto

Config Porta = Input                                        '
                                       ' Port A als Anlogeingang konfigurieren


Start Adc

Dim Summe(64) As Byte
Dim I As Single
Dim N As Single
Dim Zwoelfbitwert(64) As Byte


For I = 0 To 7                                              'Schleife für 8 ADC-Eingänge
Summe(i) = 0                                                ' löschen
For N = 0 To 15                                             ' Schleife für 16faches oversampling
Summe(i) = Summe(i) + Getadc(i)
Next N
Print Zwoelfbitwert(i) = Summe(i) / 4

Waitms 500
Next I

Vermutlich sind die Datentypen oder die Array Zuweisungen falsch.

Gruß
Steffen