LED Lauflicht (Simulation Rollo)

Naja schaltplan wirste dafür nicht unbedingt fertig finden.
Und wieder einmal meine liebe universalantwort: Ich würds mit einem Mikrocontroller lösen.

Hi,

na ja das ist ja nun schon einer der einfachen Aufgaben einen uC. Sprich man sollte erstmal sich die Grundlagen anschaffen...also HowTo's lesen...und dann ist das eine sehr einfache Angelegenheit.

Platine aufbauen.....Tastenabfrage....ein zwei Schleifen hochzählen lassen und fertig ist es.

Grüße

Lars

also eine möglichkeit:

Pollin ein Entwicklungsboard für AVRs kaufen. und dann einfach mal anfangen rumzuspielen. ansich ist dein Projekt ein klasse Anfängerprojekt und sollte mit ein wenig "how-to"'s lesen leicht zu machen sein.

Und hat den vorteil, du hast das Wissen und das Entwicklungsboard zu Hause und kannst weitere Projekte realisieren.
Sogar hier im LED-Forum gibts genug Topics , wo der Einstieg zu den µC (Mikrocontrollern) erläutert wird.

Bloody

Klar kann man das auch mit diskreten Bausteinen aufbauen. Das wird aber sicher nicht einfacher.

Evtl. hilft der Kauf eines echten Rollos. Dann entfaellt das Problem es simmulieren zu muessen.

Fabi

Die Frage ist halt: Wie viel einfacher als ein Microkontroller soll es denn noch werden? Da kann du einfach an die zwei Taster und die LEDs (evlt noch ueber einen kleinen Verstaerker und/oder Vorwiderstand) direkt an den Chip dran loeten. Ansonsten brauchst du noch ein paar Kaebelchen um ihn programmieren zu koennen und das wars ja schon fast.

Ansonsten schau dir mal die FunnyMatrix64 an. Da muestest du nur noch einen weiteren Taster anloeten und dann schauen, wie du den ATMega neu programmiert kriegst. Doku gibt es da auch, weil die Matrix die letzte Slotmachinen-Aktion war. Vielleicht programmiert und verkauft die dir ja sogar jemand...

Fabi

Eher weniger.

Mit 8 LEDs wäre ein einfacher Lauflicht-IC ausreichend.

Andere Lösung wäre:

1 Kondensator + 11 Transistoren + einen haufen Widerstände:

Der Kondensator ist voll, alle Transistoren schalten durch.
Der Kondensator entlädt sich, der erste Transistor mit großem Widerstand schaltet nicht mehr korrekt durch, weil die Spannung abgefallen ist --> erste LED geht aus/an je nach Schaltung.
Der Kondensator entlädt sich weiter, der nächste Transistor mit etwas (logarithmisch) kleinerem Widerstand schaltet nicht mehr korrekt durch --> zweite LED geht aus/an je nach Schaltung.
...

Der Kondensator schaltet auch den letzten Transistor nicht mehr durch --> aufladen.

Je nach größe des Kondensators sowie der Transistoren lässt sich die Geschwindigkeit anpassen...

Aber geht auch einfacher mit 'nem IC

klein und günstig geht das nur mit nem mikrocontroller! wie groß dürfen denn die maximalen abmessungen sein?

Grmlz... Sry hab die Anforderungen nicht wirklich gelesen... Aber das stimmt wohl, diskret/analog wird das ganze wohl nicht praktikabel möglich sein...

Hi,

wie gesagt....brauchst du keine Angst zu haben. Das ist programmieren auf einfachster Ebene was du vor hast. Und wenn du fragen hast wird dir hier sehr viel geholfen!!
Am besten das Pollin board bestellen.....da lernt man sehr einfach mit.

Grüße

Lars

Hallo,

ich habs gerade mal gecodet und gesteckt weil mir langweilig war.

EDIT: in wirklichkeit läuft das flüssiger als auf dem Video

ist das ungefähr was du suchst?

'$sim
$regfile = "2313def.dat"
$framesize = 40
$swstack = 20
$hwstack = 20
$crystal = 8000000


Config Pind.4 = Input
Config Pind.5 = Input
Set Portd.4
Set Portd.5


Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output
Config Portb.3 = Output
Config Portb.4 = Output
Config Portb.5 = Output
Config Portb.6 = Output
Config Portb.7 = Output


Dim Rolo(9) As Byte


Dim I As Byte
Dim Tmp As Byte


Tmp = 0
I = 0


Rolo(1) = &B00000000
Rolo(2) = &B00000001
Rolo(3) = &B00000011
Rolo(4) = &B00000111
Rolo(5) = &B00001111
Rolo(6) = &B00011111
Rolo(7) = &B00111111
Rolo(8) = &B01111111
Rolo(9) = &B11111111




Do


If Pind.4 = 0 Then Gosub Hoch
If Pind.5 = 0 Then Gosub Runter


Portb = Tmp


Waitms 20
Loop






Hoch:
If I > 1 Then I = I - 1
Tmp = Rolo(i)
Return






Runter:
If I < 9 Then I = I + 1
Tmp = Rolo(i)
Return

noname2.hex.txt

HTH
Snowfly

Hi,

oder wenn dir das (obwohl wie du siehst sehr einfach) zuviel ist......kauf es doch fertig:

http://www.led-tech.de/de/LED-…it-LEDs-LT-498_21_22.html

grüße,

Lars

den kann man aber auch umprogrammieren.....nur so als info.