ADC in Bascom verwenden (Anfänger)

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