Hallo,
habs jetzt endlich geschafft, eine PWM zu erschaffen.
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...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
Hoffe mir kann wer helfen.
Gruß
zebrafalke







Zitieren

Lesezeichen