Bascom PWM geht nicht

Gast #3446863
Lesenswert?
• ▲
▼
Hat jemand eine Idee,

die LED will uns verrecken nicht seine Helligkeit ändern;-(((

Bin verzweifelt;-)


An PB3 (PIN 17) hängt eine LED mit der Kathode, über 220 Ohm geht's an 
Plus.

Fusebits sind auf internen Oszi eingestellt.





'PWM with output on the PB3(OC1) pin.


$regfile = "m88def.dat"
$crystal = 8000000
$hwstack=40
$swstack=16
$framesize=32


$crystal = 8000000

Config Portb.1 = Output
Config Portb.2 = Output

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


Config Pinb.4 = Input


Enable Interrupts

Compare1a = 1023

Waitms 1000

Compare1a = 0

Waitms 1000

Do

'If Pinb.4 = 0 Then

'Capture1 = Capture1 + 10

'End If

'Compare1a = Capture1

Incr Compare1a

Waitms 10

Loop

End

Antwort schreiben

Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt. Bitte hier nur auf die ursprüngliche Frage antworten, für neue Fragen einen neuen Beitrag erstellen.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.