Bygga startgran?

Elektronikrelaterade (på komponentnivå) frågor och funderingar.
Användarvisningsbild
anrhm
Inlägg: 371
Blev medlem: 3 november 2005, 15:13:33
Ort: Norrtälje

Inlägg av anrhm »

Jag trodde att jag loggade in på Elektronikforumet men jag måste ha kommit fel och hamnat på forumet för handvevade/enkla lösningar i stället. :D

Det är klart att det ska lösas med elektronik, helst en processor!

Hur länge ska den gula lampan lysa? Lika länge varje gång man startar sekvensen eller ska det skilja från gång till gång? Mellan vilka tider i så fall?

Hur länge ska den gröna lysa innan den släcks och den röda tänds igen?

Vet man det är det snabbt gjort att sno ihop en lösning...
salle
Inlägg: 880
Blev medlem: 28 oktober 2004, 09:41:45
Ort: Växjö

Inlägg av salle »

Ramzon: Har du vippströmbrytare så kan du synka vänster och höger tumme så fixar sig det med tändning och släckning, troligtvis är din en 230-variant om du inte skruvat ner den själv. :roll: (min favvosmiley)

anrhm: Tror att en av finesserna är att lamporna inte ska lysa lika länge vid varje "start, tror att reaktionstiden ska spela in, annars går det att lära sig signalen.

Salle, igen
Ramzon
Inlägg: 11
Blev medlem: 16 april 2007, 22:35:40
Ort: Sjuntorp

Inlägg av Ramzon »

Precis. Poängen var ju att när den visar gult så skall det vara en slumpad tid, säg mellan 2-6 sek tills det att den slår till grönt.

Men jag tror jag kör på lite reläer till att börja, skall knåpa ihop ett kopplingschema och se om jag har fattat allt rätt. Sedankanske man kan bygga en mer avancerad gran men tillsvidare kör jag på den simpla varianten :D.
Ramzon
Inlägg: 11
Blev medlem: 16 april 2007, 22:35:40
Ort: Sjuntorp

Inlägg av Ramzon »

Nu har jag suttit en stund och pulat ihop ett kopplingsschema med reläer som jag hoppas fungerar. Skratta ni åt mina oerhörda paintkunskaper :D: Var knappt så jag själv fattar hur jag menar ett tag mitt i målandet :D.

http://geting.se/viewimage.php?image=37 ... rtgran.gif
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

hej,
her er en test setup random delay time på gula lys 2 - 6 sec
AT90S2313 bascom-avr
http://www.geting.se/viewimage.php?imag ... TRAFIK.JPG
Mindmapper
Inlägg: 7123
Blev medlem: 31 augusti 2006, 16:42:43
Ort: Jamtland

Inlägg av Mindmapper »

Kimmi:
Det går att spara in reläerna och dioderna över reläerna. Istället låter man lamporna sitta där reläerna sitter nu. D.v.s. mellan kollektor och +12V. Naturligtvis måste man byta till transistorer som klarar lampströmmen.
Att ha röd, gul, grön lysdiod med serieresistor där lamporna kopplas in är också en bra ide. Då kan man testa utan att koppla in granen.

Edit: Billigt, bra och enkelt. Tror att det blir svårt att få en billigare och bättre lösning.
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

Hej.
Jeg tænkte på om det var 220 volt derfor relæ ,
Senast redigerad av kimmi 19 april 2007, 01:01:13, redigerad totalt 1 gång.
Ramzon
Inlägg: 11
Blev medlem: 16 april 2007, 22:35:40
Ort: Sjuntorp

Inlägg av Ramzon »

Riktigt bra jobbat kimmi! Ser helt kanon ut! En sak jag funderade på bara, jag kolalde upp vad det satt för lampor i ljuset och dom låg på 30W. Blir det någon skillnad i kopplingschemat som kimmi gjort där han använt sig utav 21W lampor eller spelar det ingen roll?

edit: Nu är det bara shoppinglistan kvar då, men jag har lite svårt att hitta sakerna på elfa. Antar att komponenterna finns där bara jag som inte är van :D:
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

hej,
Det er transistoren der bestemmer WATT BD539 cs 45 watt see datasheet på den transistor du bruger
Mindmapper
Inlägg: 7123
Blev medlem: 31 augusti 2006, 16:42:43
Ort: Jamtland

Inlägg av Mindmapper »

En spänningsregulator t.ex. 7805 med kondensatorer på in och utgång (enligt tillverkarens rekommendation) behövs också för att microcontrollern ska må bra.

Är lamporna 12V/30W behöver transistorn tåla ca 2,5A enligt ohms lag. Men eftersom lampan drar mer ström när den är kall är det bra med betydligt mera strömtålighet.
Dessutom behövs en förstärkning i transistorn som kan öka strömmen som mikrocontrollern kan lämna till den ström lampan behöver.
Låt säga 2,5A/0,01A ca 250ggr, mer gör inget.

Darlingtontransistorer eller logikstyrbar fälteffekt rekommenderas därför.
IRL2703 t.ex. tycker jag borde funka bra.
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

hej,
Okay , her er en version med buz11 eller IRL2703
pris ca 150.00 kr (elfa priser)
http://www.geting.se/viewimage.php?imag ... gran_1.JPG

hoppas det er ok nu !
Ramzon
Inlägg: 11
Blev medlem: 16 april 2007, 22:35:40
Ort: Sjuntorp

Inlägg av Ramzon »

Grymt imponerande :bravo: Problemet nu är att jag inte kan se tydligt nog vad du har använt dig utav för komponenter i schemat, haha :D.
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

Ramzon
Inlägg: 11
Blev medlem: 16 april 2007, 22:35:40
Ort: Sjuntorp

Inlägg av Ramzon »

Haha, nejdå :D. Nu är det perfekt, återkommer när jag har börjat bygga :D. Tack så hemskt mycket för all hjälp! :D
kimmi
Inlägg: 221
Blev medlem: 13 april 2007, 12:25:00

Inlägg av kimmi »

Hej,

Her er en anden code RND(max) gir samma random altid från start

Har fixat det med brug av timer0 mycke bra random nu

Kod: Markera allt

$regfile = "2313def.dat"
$crystal = 4000000                                          '4 Mhz

Const Timer0reload = 156
Config Timer0 = Timer , Prescale = 256
Load Timer0 , Timer0reload
On Ovf0 Timer0_isr
Enable Ovf0
Start Timer0
Enable Interrupts
Dim H As Word , A As Word
Config Portb.0 = Output : Set Portb.0                       'red port
Config Portb.1 = Output : Reset Portb.1                     'gul port
Config Portb.2 = Output : Reset Portb.2                     'gron port
Config Portd.2 = Input : Set Portd.2                        'start button
A = 1256

Do
If Pind.2 = 0 Then                                          'IF START IS PUSH
   Set Portb.1 : Reset Portb.0                              'RED OFF GUL ON
   Wait 2
   H = A                                                    'WAIT FROM 2 - 6 SEC
   Waitms H
   Reset Portb.1 : Set Portb.2                              'GUL OFF GRON ON
   Wait 5                                                   'WAIT 5 SEC THEN GRON OFF RED ON
   Reset Portb.2                                            ' AND WAIT FOR NEW START PUSH
   Set Portb.0
End If
Loop
End


Timer0_ISR:
   load timer0, Timer0Reload
   Incr A
   If A > 4000 Then A = 0
  return
Skriv svar