Kaminfeuerprogramm Hilfe ich bin Anfänger ! [Archiv] - ProgForum.com

Archiv verlassen und diese Seite im Standarddesign anzeigen : Kaminfeuerprogramm Hilfe ich bin Anfänger !

Import-Script

02.01.2002, 18:31

Hallo Leute, vieleicht hat ja jemand einen Tip oder ein paar Link's(Beispielprog's möglichst in deutsch)für mich. Kaminfeuerprogramm (die Theorie): 4 Zeitschleifen(an-aus), 0.5sec., 1.5sec., 3sec., 7sec., diese 4 Ausgänge sollen zusammengefasst auf eine Leitung über einen Optokoppler und einen Triac eine Lampe ansteuern, so das ein wirres Flackern dabei rauskommt. Da der MC aber nur eine Schleife zur Zeit abarbeiten kann, habe ich ein Problem mit der parallelen Ausgabe. Danke Holgi

Import-Script

02.01.2002, 19:10

Hallo Holgi, Hast du einen MC der 8051 Familie? Es giebt möglichkeiten die einzelnen Schleifen zu mit Jumps zu schachteln benutzt du das Prog. Studio?

Import-Script

02.01.2002, 19:41

Ach so, klar. Ich benutze Prog-Studio und 89C2051. Sorry

Import-Script

02.01.2002, 23:33

Hallo Holgi, such den größten gemeinsamen Teiler: 0,5s Bau eine Zeitfunktion dafür und zähle verschiedene Bytes runter. Z.B. setze ein Byte auf 14, zähle runter bis 0, setze wieder auf 14 usw. Schon hast Du die 7s. Nimm analog ein Byte für 1,5s und 3s und fertig. Die damit erzeugte Folge wiederholt sich dann alle 21s (= kleinstes gemeinsames Vielfaches). Was ich mich jedoch frage, was sollen diese 4 Leitungen mit dem Triac machen ??? Wie ich sowas machen würde ? Ich würde das ganze in C schreiben, da gibt es eine Pseudo-Zufallsfunktion: int rand(); in STDLIB.H. Dann würde ich mit INT0 einen Nulldurchgangsdetektor aufbauen und damit jede Halbwelle einen Timer starten. Diesen würde ich mit den Zufallszahlen voreinstellen um so eine Phasenanschnittssteuerung zu bewirken. D.h. die Helligkeit wird entsprechend der Zufallszahlenfolge gesteuert. Diese Pseudozufallsfolge wird durch ein 31-Bit-Schieberegister erzeugt, d.h. wenn alle 20ms ein neuer Wert ausgegeben wird, wiederholt sie sich alle 497 Tage. Vielleicht hat ja jemand so eine Pseudozufallsfunktion auch in Assembler ? Peter

Import-Script

02.01.2002, 23:50

Bevor ich so'ne wirre Mission starten würde, hätte ich schon lange eben schnell drei NE555 auf ne Lochraster zusammengewürfelt und das über Dioden auf einen Optokoppler gegeben. Fertig.

Import-Script

03.01.2002, 07:36

@Peter, schönen Dank für deine Antwort ich werd's mal so ausprobieren. @OC, hab ich schon aufgebaut siehe <A HREF="http://www.elektroniktreff.net/Schaltungen/Kaminfeuer.htm" TARGET="_top">http://www.elektroniktreff.net/Schaltungen/Kaminfeuer.htm</A> Eigendlich geht es mir um die Programmierung und nicht um die Schaltung selbst. Danke euch Gruss Holgi

Import-Script

07.01.2002, 08:22

@Peter oder jemandem der weiterhelfen kann, hast du vieleicht ein Beispiel (in Assembler) für einen solchen einen zeitlichen Ablauf? Irgendwie spielt mein Kopf im Moment nicht mit - ich komm einfach nicht auf die richtige Lösung obwohl sie sicherlich einfach ist. Gruss Holgi

Import-Script

07.01.2002, 11:40

ich glaub ich hab's doch geschafft. Allerdings habe ich, wenn ich mich nicht irre einen Binärzähler neu erfunden. main: SETB P1.3 LCALL sec3 CLR P1.3 LCALL sec3 JMP main sec3: SETB P1.2 LCALL sec2 CLR P1.2 LCALL sec2 RET sec2: SETB P1.1 LCALL sec1 LCALL sec1 CLR P1.1 LCALL sec1 LCALL sec1 RET sec1: SETB P1.0 LCALL wait_10ms CLR P1.0 LCALL wait_10ms RET wait_10ms: #IF NOT DEBUGGING MOV R6,#215 _wait_s3: MOV R7,#45 DJNZ R7,$ IF NOT BIT P3.7 THEN JMP start DJNZ R6,_wait_s3 #END IF RET Gruss Holgi