Ich hab das jetzt mal nach einem Beispielcode probiert den ich im Netz gefunden habe. (teilweise modifiziert auf Timer2). Jedoch klappt das noch nicht wirklich. ich möchte das auf einem Mega128 mit 16Mhz Quarz zum laufen bringen. Zum Test soll mal eine Led ein udn aus gedimmt werden.

Wo ist der Fehler?

Config Timer2 = Pwm , Compare A Pwm = Clear Down , Prescale = 8

Config Portb.7 = Output

Dim A As Byte


Do
For A = 0 To 255 Step 1
Pwm2a = A
Waitms 10
Next

For A = 255 To 0 Step -1
Pwm2a = A
Waitms 10
Next
Loop
End