So, nun klappt es so wie ich mir es vorgestellt habe
Aber mit dem µC ist es bei jedem Test das gleiche:
Jegliches Ausprobieren klappt nicht bis zur totalen Verzweifelung, dann einen Tag Pause neu überlegen, testen, klappt nicht, Datenblatt lesen, testen und dann Erfolg!! (Juchu)
Hier mein Programm um eine LED an Portb.0 runter und wieder rauf zu dimmen.
Code:
'============================================================
'
' ************************************
' *** ***
' *** Hardware PWM 06.07.2006 ***
' *** ***
' ************************************
'
' µC: ATtiny13
' Hardware Pwm auf Portb.0
' Fusebit DCBA 1001 (4,8 MHz)
'
'
'
'============================================================
'
$regfile = "ATtiny13.DAT"
$crystal = 4800000
Config Pinb.0 = Output
Tccr0a = &B11110001
Tccr0b = &B00000011
Dim I As Byte
Do
For I = 1 To 255
Ocr0a = I
Waitms 5
Next I
For I = 255 To 1 Step -1
Ocr0a = I
Waitms 5
Next I
Loop
End
Gruß Thomas
Lesezeichen