Druckbare Version
http://www.sprut.de/electronic/pic/programm/led.htmZitat:
jetzt hab ich mal ne saublöde frage wie schließe ich das display hier überhaupt an?
hier findest du eine einfache Ansteuerung ohne BCD Decoder.
In deiner Timerinterrupt Routine lässt du bei jedem Interrupt eine andere Ziffer anzeigen.
- Transistor 1 ansteuern und Ziffer 1 über den 7 Segmentport ausgeben.
beim nächsten Interrupt ...
- Transistor 2 ansteuern und Ziffer 2 über den 7 Segmentport ausgeben.
u.s.w.
jo des mit den sekunden wollte ich schon machen da bringt mir bascom aber immer einen fehler value doesnt fit into byte.
da hab ichs deswegen mit minuten gemacht. danke euch beiden schon mal.
und wenn ich des ganze jetzt per tastendruck starten will muss ich dass ja in dass hauptprogramm scheiben also wenn ich dass aus dem buch jetzt richtig verstanden habe oder?
und geht dass jetzt einfach so paralel dass ich jetzt zb schreibe
if pind.0 =1 then
sekunde = sekunde +1
oder würde man dass so nicht schreiben um die sekunde zu erhöhen?
Du hast wahrscheinlich Sekunde als Byte deklariert. Ein Byte kann nur hat nur 8 Bit und kann deshalb nur Werte von 0-255 aufnehmen. Sekunde wird bis 300 hochgezählt, also wäre in der Variablen kein Platz mehr, deshalb die Fehlermeldung. Du kannst statt dessen einfach Word oder Integer verwenden. Word besteht glaub ich aus 16 Bit -> also von 0 bis 65535.
MfG
ne habs schon als integer deklariert is komisch.
aber habs jetzt eben so mit minute gelassen.
und wie bekomme ich des rein dass der timer mit ner taste an geht?
und wie dass ich die sekunden einstellen kann?
muss ich ja alles ins hauptprogramm einfügen oder?
Hi,
mit Taste zum starten und einstellbarer Zeit sieht das so aus:
Die Variable taste_gedrueckt wird am Anfang des Programmes auf 0 gesetzt. Wird nun eine Taste betätigt wird taste_gedrueckt der Wert 1 zugewiesen und die Befehle in der ISR werden ausgeführt.Code:Timer0_isr:
Tcnt0 = 26
If taste_gedrueckt = 1 Then
Incr Intzaehler
If Intzaehler = 25 Then
Intzaehler = 0
Incr Zehntelsek
End If
If Zehntelsek = 10 Then
If Minute < Vorgabe Then
Toggle Led3
End If
Incr Sekunde
Zehntelsek = 0
End If
If Sekunde = 60 Then
Incr Minute
End If
End If
Return
Neu ist noch die Variable Vorgabe. In diese schreibst du die Zeit, wie lang der Countdown dauern soll, in Minuten rein. Es wäre praktischer wenn du, wie schon oben erwähnt, mit der Variable Sekunde rechnen würdest, da man dann statt Minuten, mit Sekunden arbeiten könnte.
MfG
naja ich habs ja probiert in sekunde zu schreiben is ja net so dass ich mich dagegen streube. aber bascom sieht es trotz integer als fehler
Hmm wie lautet denn die Fehlermeldung? Ich krieg da keine Fehlermeldung, vielleicht hast du irgendwo nen Tippfehler?
MfG
jetzt gehts weiß echt net was es war. warscheinlich hab ich mich doch vertippt. wollte mich nur mal so bedanken dass du mir so geholfen hast. du hättest mir des aber echt net schreiben brauchen hättest mich ja auch hinführen können wäre noch en bischen übung für mich gewesen. aber trotzdem mal danke. ich werde mich im laufe der woche mal intensiver damit befassen und schauen ob es dann auch so meinen wünschen entspricht. falls ich noch was habe werde ich mich melden.
was ich dich oder jemanden noch fragen wollte das mit dem einschalten klappt net so ganz. wenn ich jetzt meinen taster drücke bleibt es nur während ich die taste drücke angeschaltet wenn ich loslasse geht der timer wieder ab wie bekomme ich dass aber hin dass ich den taster einmal drücken muss und dass der timer dann nach ablaufen der zeit selbst aufhört.
achso und könntest du mir dass mit dem einstellen noch einmal erklären des hab ich also komplett net ganz verstanden.
Hi,
zum Starten des Timers:
Sobald die Taste gedrückt wird, musst du die Variable "taste_gedrueckt" auf 1 setzen (Vorher muss diese Variable 0 sein).
Mit diesem Befehl läuft dein Timer 300 Sekunden lang. Wenn du jetzt eine variable Zeit einstellen möchtest, ersetzt du einfach die 300 durch eine Variable in der die Zeit gespeichert ist. Also z.B.:Code:If Sekunde < 300 Then
Toggle Led3
End If
In diesem Fall wird der Timer 500 Sekunden lang ausgeführt. Du brauchst also die gewünschte Zeit einfach in die Variable "Einstellung" schreiben.Code:Dim Einstellung as Integer
Einstellung = 500
...
If Sekunde < Einstellung Then
Toggle Led3
End If
MfG
achso. ja dass habe ich auch gesehen und auch ausprobiert. weißt du ich möchte es aber so machen:
es wird ja ein belichtungsapparat.
und da möchte ich mit ner taste die sekunden einstellen können. zb dass das maximale was ich einstellen kann zb. 500 sekunden is aber dass ich da auch was weiß ich 349 sekunden über ne taste einstellen kann die die sekunden immer um 1 erhöhen.
weißt du zb so wie bei ner microwelle oder so. da muss ich ja auch irgendwie was reinbauen wie if pinc.1 = 1 then sekunde = sekunde+1 oder sowas.
dass ich halt die zeit erst einstellen kann diese auf den 7 segment anzeigen sehe und dann den startknopf drücken kann.