Mini RGB-Licht

Hallo zusammen,

passend zur dunklen Jahreszeit, habe ich endlich mal Zeit gefunden das erste Exemplar meines Mini RGB-Licht ferdrig zu stellen. Eine runde Platine (eigentlich zumindest, mein Prototyp ist nur grob ausgeschnitten) mit ATtiny25, LM78L05, Widerständen, Kondensatoren und einer PLCC4 RGB-LED. Mit drauf ist natürlich auch eine ISP-Schnittstelle zum wechseln der Firmware.

Leider ist mir erst nach dem Bestellen der ersten Platinen aufgefallen, dass ich einen kleinen Fehler drauf habe. Die LED ist an PB0,3 und 4 angeschlossen. PB0 ist auch teil der ISP-Schnittstelle (MOSI) und genau das war das Problem. Mein ISP-Progger (serielles Bitbanging mittels Pollin Evaluations Board) schafft es nicht beim Proggen die LED mit zu treiben, weshalb ich in dieser Konstellation mit dem Auflöten der LED die ISP-Schnittstelle nichtmehr nutzen konnte. Auf dem Steckbrett half ein Pulldown von etwa 500 Ohm an MOSI, bei der fertigen Schaltung nicht. Deswegen habe ich als Workaround den Widerstand für rot nicht auf das eigentlich Pad gelötet was dann mit MOSI verbunden wurde, sondern so dass eine Seite quasi in der Luft hängt und diese dann mit einem kleinen Draht an MISO angeschlossen. MISO wird beim Proggen vom AVR selber getrieben und dieser schafft die LED problemlos.

Warum überhaupt ISP? Ich möchte die Platine für mehrere Dinge nutzen. Konkret stell ich mir drei Möglichkeiten vor:

• Kerzenlichtsimulation
• RGB Farbkreis (für den Einsatz in Dekoobjekten)
• Blitzen/Gewitter (zB für Halloween)

Die Firmware für den Farbkreis und fürs Blitzen ist soweit fertig, zur Kerzenlichtsimulation bin ich bisher noch nicht gekommen. Beim Farbkreis nutze ich die angepasste HSV->RGB-Routine von synvox, hier nochmal danke dafür. Ich gehe in einer Schleife einfach den HUE-Wert durch, Sättigung und Helligkeit stehen fest auf dem Maximum.

Die Platine ist übrigens nicht angelaufen, die Schatten sind Reste vom Fluxer. War grad zu faul sie sauber zu machen.

Hier sieht man den Fix.

Für die LED habe ich 100 bzw. 150 Ohm Widerstände verwendet, alle Farben laufen damit bei etwa 17mA. Die gesamte Stromaufnahme _vor_ dem Regler beträgt beim Farbkreis etwa 25mA als Maximum.

Ich habe bereits ein korrigiertes Layout, weiß aber noch nicht ob ich das so fertigen lassen soll. Mir schwebt als Nächstes eine Version vor, die mit Knopfzellen und ohne Regler betrieben werden soll, damit sie wirklich als Teelicht-Replacement dienen kann. Ein 12er-Nutzen der Platine hat mich inkl. Versand 16 EUR gekostet (platinenbelichter.de). Die Bauteile sind bis auf die LEDs standard SMD-Kram von Reichelt. Die LEDs waren irgendwelche billigen PLCC4 LEDs von eBay (20 Stk für 7,19 EUR).

Zum Schluß noch ein Video, wobei man nicht viel sehen kann. Ich habe vor die LED im Abstand von etwa 5cm einfach ein Stück Plexi gehalten, weil man sonst mit der Digicam einfach nur viel Licht sieht :D. Das Flimmern oder Flackern muss an der Cam liegen, in Wirklichkeit pumpt die Helligkeit kein bisschen.

fKWYM174pHM

Alles in Allem nix Besonderes, aber ein nettes Gimmick, vielleicht auch mal als Geschenk. Hoffe es gefällt euch.

EDIT: Für diejenigen, die auch Interesse an dem kleinen Spielzeug haben, mal die Ätzvorlage: http://crap.dgoersch.info/ls/rgb-mini-light_nutzen.pdf

Zitat von Flabig

Da fehlt nur noch eine Kommunikationsschnittstelle...

So rein aus Neugierde... womit würdest du dein Teelicht kommunizieren lassen?

Zitat von Fasti

Mit was machst du deine Layouts?

Das Layout ist mit EAGLE erstellt. Hatte es zuerst in den üblichen 45°.Knicken, aber das sah total hässlich aus. Runde Leiterbahnführung auf runder Platine gefiel mir dann total gut. Bei Bedarf kann ich gern mal ein 12er-Nutzen als PDF anhängen...

EDIT: Natürlich vom Layout ohne den Fehler

Zitat von Fasti

Ich denke das Pumpen kommt vom Autofokus

Ich glaube eher durch die Helligkeitsanpassung (Shutter oder so heissts glaube ich) im Video-Modus.

Zitat von jens_n

Und dann an einem nen Sensor (IR oder so), da nen Feuerzeug drüberhalten - und alle gehen an

Darüber hatte ich ernsthaft nachgedacht, allerdings nicht IR sondern einen Temp-Sensor. Durch starke Hitze (Freuer) einschalten und durch Temperaturabfall (Pusten) abschalten. Aber "Standby"-Strom bei Batterieanwendungen die man nur alle paar Tage mal braucht erschien mir dann für wenig sinnvoll.

Zitat von Fasti

Hat das erst die neue 5er Version drin oder gabs das schon in der 4er?

Das kann ich dir leider nicht sagen. Ich habe eine wohl auch nichtmehr so ganz frische 5er Version.

Ich bin via PN nach dem Code für den Farbfader gefragt worden. Da er zum größten Teil aus der HSV->RGB-Umrechnung von synvox besteht, veröffentliche ich den natürlich auch gerne wieder. Die Lorbeeren gebühren aber synvox.

$regfile = "attiny25.dat"
$crystal = 8000000                                      	'F_CPU 8MHz
$hwstack = 32                                           	'default use 32 for the hardware stack
$swstack = 10                                           	'default use 10 for the SW stack
$framesize = 40                                         	'default use 40 for the frame space


Dim Hue_val As Integer , Sat As Byte , Bri As Byte
Dim Temp_b As Byte , Temp_i As Integer
Dim Red As Byte , Green As Byte , Blue As Byte
Dim Red_w As Word , Green_w As Word , Blue_w As Word
Dim Zaehler As Byte


Declare Sub Init
Declare Sub Color_set


Call Init


Config Timer0 = Timer , Prescale = 1
On Timer0 Timer0_isr


Enable Timer0
Enable Interrupts


Main:
Do
   For Hue_val = 0 To 764
  	Call Color_set
  	Waitms 50
   Next Hue_val
Loop
End


Sub Color_set
   If Hue_val > 764 Then Hue_val = 0
   If Hue_val < 255 Then
  	Temp_i = Hue_val - 170
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Red = Temp_i
  	Temp_i = 85 - Hue_val
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Green = Temp_i
  	Temp_i = 85 * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Blue = Temp_i
   Elseif Hue_val < 510 Then
  	Temp_i = 85 * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Red = Temp_i
  	Temp_i = Hue_val - 425
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Green = Temp_i
  	Temp_i = 340 - Hue_val
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Blue = Temp_i
   Else
  	Temp_i = 595 - Hue_val
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Red = Temp_i
  	Temp_i = 85 * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Green = Temp_i
  	Temp_i = Hue_val - 680
  	Temp_i = Temp_i * Sat
  	Temp_i = 10880 - Temp_i
  	Shift Temp_i , Right , 7
  	Blue = Temp_i
   End If


   Temp_i = Bri + 1


   Red_w = Temp_i * Red
   Green_w = Temp_i * Green
   Blue_w = Temp_i * Blue


   Red = High(red_w)
   Green = High(green_w)
   Blue = High(blue_w)
End Sub


Sub Init
   Ddrb = &B00011111                                    	'PB0..4 output
   Portb = &B00011111                                   	'PB0..4 high


   Led_rot Alias Portb.1
   Led_gruen Alias Portb.4
   Led_blau Alias Portb.3


   Red = 0                                              	'Red LED off
   Green = 0                                            	'Green LED off
   Blue = 0                                             	'Blue LED off


   Bri = 255                                            	'Full brightness
   Sat = 128                                            	'Full saturation
End Sub


Timer0_isr:
   Incr Zaehler


   If Zaehler < Red Then Led_rot = 0 Else Led_rot = 1
   If Zaehler < Green Then Led_gruen = 0 Else Led_gruen = 1
   If Zaehler < Blue Then Led_blau = 0 Else Led_blau = 1
Return

Immer gerne doch... solange ich nicht von Obst dumm angemacht werde....
(Muss man nun nicht verstehen.)

Da schreibst du am besten mal synvox an, denn der Code ist von ihm.

EDIT: Schön, dass der Code auch bei dir funktioniert.

Ich habe im ersten Beitrag mal die Ätzvorlage für den 12er-Nutzen angehängt. Natürlich die korrigierte Version. Der Code oben ist auch schon die angepasste Version (rote LED an PB.1 statt PB.0).

Zitat von Freaky91

so nun aber genug offtopic (tut mir leid)

So wirklich OT wars ja garnicht, gehört ja schon irgendwie zur Firmware.

Zitat von Mick

Nur so aus Neugierde, was hast du als Ätzmittel verwendet ?

Ich hab mir den "Luxus" gegönnt und 'nen 12er-Nutzen auf 175x125mm fertigen lassen (für 16 EUR inkl. Verzinnen und Versand bei platinenbelichter.de).

Noch eine Frage an die Allgemeinheit: Die SMD LED auf dem Ding blendet ziemlich, jemand eine Idee wie ich die etwas diffus, am besten halbrund abdecken könnte ohne zuviel der Leuchtkraft zu verlieren? Hatte zuerst ein ein Stück Tischtennisball gedacht, aber der wird wohl zuviel Licht schlucken.