Hallo,
danke für den PWM**-Tip, das wars! Ich konnte alle möglichen PWMs testen - sie funktionieren. Bin total überrascht, dass das so gut ging. Ich fange gerade mit AVR und Bascom an, hab davor noch nichts damit zu tun gehabt, sehr wohl aber mit Mikrocontrollern.
Hier der Code für alle die es interessiert:
Code:
$prog , 255 , &B11011001 , 'Quarz an / Teiler aus / Jtag aus
$regfile = "m2560def.dat"
$hwstack = 82 '80
$framesize = 68 ' 64
$swstack = 68 '44
$crystal = 16000000 'Quarzfrequenz
Config Portg.5 = Output
Config Porte.3 = Output
Config PortE.4 = Output
Config Porth.3 = Output
Config PortH.4 = Output
Config PortH.5 = Output
Config PortH.6 = Output
Config PortB.4 = Output
Config PortB.5 = Output
Config PortB.6 = Output
Config PortB.7 = Output
Config Pind.5 = Output
Led Alias Portd.5
Config Timer0 = Pwm , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 256
Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Compare C Pwm = Clear Up , Prescale = 256
Config Timer2 = Pwm , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 256
Config Timer3 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Compare C Pwm = Clear Up , Prescale = 256
Config Timer4 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Compare C Pwm = Clear Up , Prescale = 256
Do
Led =0
Pwm0b = 160
Pwm1a = 160
Pwm1b = 160
Pwm1c = 160
Pwm2a = 160
Pwm2b = 160
Pwm3a = 160
Pwm3b = 160
Pwm4a = 160
Pwm4b = 160
Pwm4c = 160
Waitms 1000
Led = 1
Pwm0b = 80
Pwm1a = 80
Pwm1b = 80
Pwm1c = 80
Pwm2a = 80
Pwm2b = 80
Pwm3a = 80
Pwm3b = 80
Pwm4a = 80
Pwm4b = 80
Pwm4c = 80
Waitms 1000
Loop
End
Hat diese Forum im Moment eigentlich einen Bug? Wenn meine Antwort eine bestimmte Länge überschreitet springt die Ansicht ohne zutun immer nach ganz oben und dann wieder ganz runter wenn ich schreibe.
Viele Grüße
Cornelius
Lesezeichen