PWM dimmen in BASCOM-AVR

Bascon-User Gast #1212669
Lesenswert?
• ▲
▼ 
Hallo, ich möchte die PWM dimmen lassen.

Ich habe mit For Next versucht. Beim aufdimmen von dunkel nach hell 
klappt es. Wenn A 1023 erreicht ist, dann soll es umkehren von hell nach 
dunkel dimmen. Klappt aber nicht.

Hier die kurze Code.

$regfile="m8def.dat
$crystal=1000000

Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear down , Prescale = 
1

Dim A as Integer

A=1

Do

For A=1 to 1023
Waitms 1
Next A

If A= 1023 then
For A=1023 to 1
Waitms 1
Next A
End if

Loop
Antwort Zitieren Bearbeiten Thread verschieben Thread sperren Anmeldepflicht aktivieren Anpinnen Thread löschen Thread mit anderem zusammenführen Beitrag melden
Bascon-User Gast #1212751
Lesenswert?
• ▲
▼ 
Hallo, danke für die Antwort.

Ich habe es rausgefunden. Es funktioniert, was ich eigentlich will.

$regfile="m8def.dat
$crystal=1000000

Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear down , Prescale = 
1

Do

For A = 1 to 1023 Step 1
Pwm1a = A
Waitms 1
Next

For A = 1024 to 1 Step -1
Pwm1a = A
Waitms 1
Next

Loop
Antwort Zitieren Bearbeiten Löschen Beitrag melden
Thread beobachten

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

Bestehender Account

oder

Mit Google-Account einloggen

Noch kein Account?

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren