ADC in Bascom verwenden (Anfänger)

[Jan Weber (Gast)]

Hallo,
ich habe folgendes Programm geschrieben:

$regfile = "m8def.dat"
$crystal = 1000000
Config Portd = Output
Config Adc = Single , Prescaler = Auto , Reference = Off
Dim A As Integer
Dim B As Integer
Dim W As Word , Channel As Byte
Start Adc

Do
A = Getadc(1)
W = A / 10
Portd = 1
Waitms W
Portd = 0
Waitms W
Loop

Es soll bewirken, dass an Portd eine Led in einstellbarer frequenz
blinkt. Ich habe das Programm im Bascom simulator ausprobiert und es
funktioniert ohne probleme. Kann ich dieses Prog einfach auf den
ATmega8 übertragen? In Assembler ist das nämlich wesentlich
kompliezierter! Oder muss ich noch etwas umändern? Kann ich später die
LED einfach (ohne zus. IC o.ä) an den entsprechenden Ausgang(z.B ADC1)
am Mega8 hängen(natürlich mit wiederstand)?
Mit freundlichen Grüßen
Jan Weber

[pebisoft (Gast)]

kannst die leuchtdidoe direkt mit vorwiderstand an den port hängen.
20 milliamp dürfen als dauerstrom nicht überschritten werden.

mfg pebisoft

[Jan Weber (Gast)]

Also brauch ich kein anderen SteuerIC oder so?
MfG
Jan

[pebisoft (Gast)]

wie findest du eigentlich die frequenz anhand der anlegespannung am
adc.
ist es nicht ziemlich wahllos.

mfg pebisoft

[pebisoft (Gast)]

du brauchts kein steuer-ic

[Jan Weber (Gast)]

Das ist gut!
Danke für die schnelle Antwort!
Ich wollte eigentlich nur ein programm machen, dass eine Led blinken
lässt. Die frequenz war mir dabei egal. hab ich mal ausptobiert und
hab
A/10 geteilt um ein besseres regelfeld zu bekommen
MfG
Jan