GetADC

[Kay (Gast)]

Hi,

habe an meine AT90S8535 nen Poti angeschlossen. über GetADC lese ich
die Daten von Port PA0 ein. ich habe folgenden Code geschrieben :

$regfile = "8535def.dat"
$crystal = 4000000


Config Adc = Single , Prescaler = Auto
Config Portb = Output

Start Adc
Dim W As Word , Channel As Byte
Channel = 0

Do

   W = Getadc(channel)
   If W < 3 Then Portb.0 = 1 : Portb.1 = 0

   If W > 3 Then Portb.1 = 1 : Portb.0 = 0


Loop

Wenn ich das jetzt laufen lasse, dann glimmt die LED an Portb.0 nur
wenig. Wenn ich das Poti so drehe, das 5V anliegen, dann geht die LED
an Portb.0 leicht an und die LED an Portb.1 aus. gehe ich unter 3V,
dann geht die Portb.1 LED an und die LED an Portb.0 glimmt ein wenig.
was stimmt da denn nicht ???

mfg Kay
PS: Als Compiler benutze ich Bascom

[ThomasB (Gast)]

hallo kay:
hilft dir der Dateianhang weiter.?
nur mal so eine Idee von mir.


mfg ThomasB

[Kay (Gast)]

hallo ThomasB,

vielen herzlichen Dank. Es funktioniert. ich habe mir mal das
Datenblatt vom AT90S8535 angeschaut. da steht, das AVCC, AREF und AGND
angeschlossen werden müssen. ich hab das nicht gemacht und es funzt
trotzdem. warum ? muss ich das wirklich alles anschließen, damit es
keine probleme gibt ?
Ich habe nen Spannung am Poti von 0V ( niedrigste Stellung ) und 5V (
höchste Stellung ). Wenn ich jetzt 10 LED´s an PortB anschließe und
will, das mir die Stellung des Potis anhand der LED´s angezeigt wird,
was muss ich im programm ändern ? kannste mir da nochmal helfen bitte
?

mfg Kay