Ich bin gerade am nachbauen der Schaltung. Will die Schaltung aber nicht stur nachbauen sondern auch verstehen. Könnte mir jemand kurz erklären für was man die Diode D1 und der Spule L1 braucht?
mfg
Beiträge von ICH1992
-
-
Hallo,
ich finde euer Projekt einsamme spitze. Schaue jetzt seit einer Weile hier öfters vorbei. Leider passiert ja nicht mehr viel. Mich würde mal Interessieren habt ihr ganz normale 5mm LEDs genommen und von wo habt ihr diese gekauft?
Und stellt ihr noch den Quelltext ins Internet oder bleibt der euer Eigen? Der würde mich nämlich sehr interessieren.
mfg -
So ich habs jetzt raus wie es geht habe es allerdings nicht mit dem timer config timer0 gemacht sondern habe die Register selber gesetzt. Ich poste morgen mal den genauen code.
mfg -
Hallo,
Timer 1 ist auch nicht das Problem den habe ich ja schon konfiguriert und da geht auch alles. Nur der Timer0 macht mir sorgen. Hier mal der ganze Code. Ich muss aber dazusagen dass ich mir das aus verschiedenen Programmen zusammengebaut habe. Ich habe mir das so gemacht, wie es für mich am verständlichsten ist.Code
Alles anzeigen$regfile = "attiny2313.dat" $crystal = 8000000 Config Pinb.2 = Output 'Die PWM-Pins als Output definieren Config Pinb.3 = Output 'Die PWM-Pins als Output definieren Config Pinb.4 = Output 'Die PWM-Pins als Output definieren 'Die Timer auf PWM-Modus stellen 'Die PWM-Register haben eine Breite von 8 Bit - also Werte von 0 bis 255 'Wobei 0 = 0% Helligkeit und 255 = 100% Helligkeit bedeuten Config Timer0 = Pwm , Pwm = On , Prescale = 1 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down Config Timer1 = Pwm , Pwm = 8 , Prescale = 1 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down 'Die Timer starten Enable Timer0 Enable Timer1 Start Timer0 Start Timer1 'Die PWM-Register zuweisen Led1 Alias Ocr1bl 'PWM-Pin 1 - Red Led2 Alias Ocr1al 'PWM-Pin 2 - Green Led3 Alias Ocr0a 'PWM-Pin 3 - Blau 'ein Paar Variablen Deklarieren Dim Color_delay As Byte Dim Color_stop As Byte Dim Rgb As Byte Dim Led1_0 As Byte Dim Led2_0 As Byte Dim Led3_0 As Byte 'Startwert für die Schleife Rgb = 0 'Farbwechsel Geschwindigkeit pro Schritt (empfohlen 1-15) Color_delay = 12 'Dauer der Pause bei der Grundfarbe (empfohlen 1-10) Color_stop = 7 Do If Rgb = 0 Then Incr Led1_0 Decr Led3_0 Led1 = Led1_0 Led3 = Led3_0 Waitms Color_delay End If If Rgb = 1 Then Decr Led1_0 Incr Led2_0 Led1 = Led1_0 Led2 = Led2_0 Waitms Color_delay End If If Rgb = 2 Then Decr Led2_0 Incr Led3_0 Led2 = Led2_0 Led3 = Led3_0 Waitms Color_delay End If If Led1_0 = 255 Then Rgb = 1 Led3_0 = 0 Led3 = Led3_0 Waitms Color_stop End If If Led2_0 = 255 Then Rgb = 2 Led1_0 = 0 Led1 = Led1_0 Waitms Color_stop End If If Led3_0 = 255 Then Rgb = 0 Led2_0 = 0 Led2 = Led2_0 Waitms Color_stop End If Loop End
mfg -
Hallo,
habe ein Problem und zwar versuche ich jetzt schon seit 2 Tagen den Timer0 des Attiny 2313 für Hardware PWM zu Verwenden. Habe auch viele Anleitungen gefunden und im avr Help geschaut. Bis jetzt sieht es bei mir so aus.
Config Timer0 = Pwm , Pwm = On , Prescale = 1 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down
Allerdings sagt er mich dann immer PWM=on falsche Timer konfig.
An was liegt das? Habe es genau so geschreiben schon in mind. 2 Source-Codes gesehen. Warum geht da bei mir nicht. Wenn ich es weglasse Bekomme ich kein PWM.
Ich Proge mit BascomAVR.
Wäre cool wenn mir jemand weiter helfen kann.
mfg