LED Dimmungsproblem

Hallo,
habs jetzt endlich geschafft, eine PWM zu erschaffen.

Code:

---

$regfile = "m32def.dat"
$crystal = 4000000
$baud = 9600

Dim A As Word

Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 8

Config Pind.5 = Output


do

For A = 0 To 511 Step 1

 Pwm1a = A
 Waitms 7

Next

For A = 511 To 0 Step -1

 Pwm1a = A
 Waitms 7

Next
loop
End

---

Damit versuche ich, ne LED erst hoch- und dann wieder runterzudimmen, aber leider funktioniert das nicht, ich glaube ich hab da einen Denkfehler, denn die LED dimmt zwar hoch, aber dann dimmt sie manchmal nicht mehr runter, also es ist kein gleichmäßiges Fading...

Hoffe mir kann wer helfen.

Gruß
zebrafalke

511 bei 8 bit ?

Setz mal 255 ein.

Hups, danke, das wars :oops: