Hi, also ich habs jetzt so gemacht, dass ich die Spannungsquelle des Boards einfach auf 6,5V gestellt hab und den Sensor da mit angeschlossen hab. Ich hab das weiße Kabel an den Pin PA0 des RNB-Busses angeschlossen und siehe da: es funktioniert! Dummerweise passiert bei besonders lauten geräuschen folgendes: sobald der Wert 255 übersteigt, geht er wieder auf 0 zurück, dh, wenn ich ein geräusch hab, das knapp lauter ist als 255 bekomm ich z.B. 1 als Wert.
Hier mal der Bascom-Code:
Code:
Dim W As Byte
Config Adc = Single , Prescaler = Auto
$baud = 9600
$crystal = 8000000
Portd.6 = 0
Start Adc
Do
W = Getadc(0)
Print W
Waitms 200
Loop
End
@Frank:
Hast du dir mal den Thread über mein Problem mit VB bzw Delphi bzw der Verbindung zwischen dem Controller und dem PC angeschaut? Es scheint als kann niemand wirklich helfen.
Lesezeichen