Svenska ElektronikForumet

Har byggt om ett elvärmeljus från rusta så det ser mer levande ut.
De har ju bara ett fast sken när man köper dom.

http://www.rusta.se/product.asp?p=78101178

Jag byggde in en liten PIC12F629 som jag skrev ett litet program till i picbasic.

Det är bara en pic jag laggt till, inget annat, den går på interna oscillatorn.
Jag filade bort lite av den vita plasten för att picen skulle få plats, sen limmade jag fast den med superlim och lödade ditt sladdarna.

Har tyvärr inte kunnat mäta strömförbrukningen, då min multimeter pajat.

Här är ett litet filmklipp på hur det blev.
http://web.telia.com/~u36308569/ljus.avi

-----------start picbasic kod------------
DEFINE OSC 4

led VAR GPIO.4
Output led

i VAR WORD
p VAR WORD
r VAR WORD

Random r
While (r > 1000)
r = r - 1000
Wend

start:

Random p

IF p < 1000 Then

ra:
Random r
While (r > 1000)
r = r - 1000
Wend
Else
EndIF

Random p

While (p > r)
p = p - r
Wend

For i= 0 TO p

High led
PauseUs i
Low led
PauseUs p - i
Next i

Random p

While (p > r)
p = p - r
Wend

For i= 0 TO p

High led
PauseUs p - i
Low led
PauseUs i
Next i

GoTo start

-----------slut picbasic kod------------

Snyggt resultat. Det blir mycket mer som ett levande ljus när det "flimrar" lite.

riktigt fint det där och tack för filmen .

Snyggt!

Trevligt med en film som inte tar en kvart att ladda ner.

Nice!

Gå till baks till Rusta och sälj. =)