Problem mit Duo-LED Ansteuerung

    This site uses cookies. By continuing to browse this site, you are agreeing to our Cookie Policy.

    • ceperiga wrote:

      Hallo Nadine,
      es ist Freitag, da ist ein Moment Zeit. Ich habe mal die Attiny13- Platine und eine Duo- LED rausgekramt. Bevor ich was poste, probiere ich das ganz gerne mal aus, auch wenn es recht einfache Dinge sind.

      Für die gegenläufige Ansteuerung der Duo- LED eignet sich hervorragend der NOT- Befehl. Damit kann man die LED ganz normal toggeln.

      BASCOM Source Code

      1. '************************************************************
      2. ' Kleiner Mikrocontroller Einsteigerkurs
      3. ' (c) 2013/2014 ceperiga
      4. '------------------------------------------------------------
      5. ' Projektinfos: www.bascomforum.de
      6. '------------------------------------------------------------
      7. ' Stufe 1: Attiny 13
      8. '------------------------------------------------------------
      9. 'Informationen zur CC-Lizensierung:http://creativecommons.org
      10. '============================================================
      11. ' Name:
      12. ' Unit: 1.0
      13. '------------------------------------------------------------
      14. 'Beschreibung: Erste Schritte -Duo LED an PortB.0 und PortB.1
      15. '************************************************************
      16. $regfile = "attiny13.dat" 'verwendeter Controller
      17. $crystal = 1200000 'Taktfrequenz
      18. $hwstack = 6 'Stackwerte und Framesize zuweisen
      19. $swstack = 6
      20. $framesize = 28
      21. Config Portb.0 = Output
      22. Config Portb.1 = Output
      23. Led Alias Portb.0
      24. '==============================================================================
      25. 'Hauptprogramm
      26. '------------------------------------------------------------------------------
      27. Do
      28. Toggle Led
      29. Portb.1 = Not Portb.0
      30. Wait 3
      31. Loop 'Zurück zu Do (Schleifenanfang)
      32. '==============================================================================
      33. End 'end program
      Display All
      Wie Stefan schon geschrieben hat, ist es anders als Du glaubst auch möglich die LED auszuschalten, indem beide Ausgänge das gleiche Potential haben. Da geht dann Toggle verständlicher Weise nicht mehr:

      BASCOM Source Code

      1. '************************************************************
      2. ' Kleiner Mikrocontroller Einsteigerkurs
      3. ' (c) 2013/2014 ceperiga
      4. '------------------------------------------------------------
      5. ' Projektinfos: www.bascomforum.de
      6. '------------------------------------------------------------
      7. ' Stufe 1: Attiny 13
      8. '------------------------------------------------------------
      9. 'Informationen zur CC-Lizensierung:http://creativecommons.org
      10. '============================================================
      11. ' Name:
      12. ' Unit: 1.0
      13. '------------------------------------------------------------
      14. 'Beschreibung: Erste Schritte -Duo LED an PortB.0 und PortB.1
      15. '************************************************************
      16. $regfile = "attiny13.dat" 'verwendeter Controller
      17. $crystal = 1200000 'Taktfrequenz
      18. $hwstack = 6 'Stackwerte und Framesize zuweisen
      19. $swstack = 6
      20. $framesize = 28
      21. Config Portb.0 = Output
      22. Config Portb.1 = Output
      23. Led_a Alias Portb.0
      24. Led_k Alias Portb.1
      25. '==============================================================================
      26. 'Hauptprogramm
      27. '------------------------------------------------------------------------------
      28. Do
      29. Led_a = 1 : Led_k = 0
      30. Wait 1
      31. Led_a = 1 : Led_k = 1
      32. Wait 1
      33. Led_a = 0 : Led_k = 1
      34. Wait 1
      35. Led_a = 0 : Led_k = 0
      36. Wait 1
      37. Loop 'Zurück zu Do (Schleifenanfang)
      38. '==============================================================================
      39. End 'end program
      Display All
      Kannst Dir ja mal die beiden Beispiele ansehen, ob Du das so verstehst. Die ergänzende Aufgabe von Stefan mit der Mischfarbe bleibt Dir dann erhalten.

      Ich hätte übrigens nicht gedacht, dass man "Output" durch "1" ersetzen kann, aber es funktioniert. Ich selber bleibe aber bei "Output", das finde ich übersichtlicher.

      Gruß Christian
      Hallo Christian,

      die von dir gezeigten Beispiele sehen sehr interessant aus. Ungeachtet meines derzeitigen Listening werde ich deine Beispiel ausprobieren und dann berichten.

      Gruß Nadine

      PS. Den Bausatz des Attiny13 Experimentierboard habe ich mal vor einiger Zeit von dir erworben, funktioniert noch immer bestens.
      Könntest du mir eventuell noch mal den Schaltplan des Bords mit seriellem Programmer zukommen lassen?
    • Nadine wrote:

      PS. Den Bausatz des Attiny13 Experimentierboard habe ich mal vor einiger Zeit von dir erworben, funktioniert noch immer bestens.
      Könntest du mir eventuell noch mal den Schaltplan des Bords mit seriellem Programmer zukommen lassen?
      Hallo Nadine,
      Schaltpläne habe ich heute ergänzt, waren etwas tiefer in der Dateiablage :)

      Schaltplan attiny13 experimentierboard.pdf
      Schaltplan attiny13 experimentierboard 2.pdf
      Wenn das die Lösung ist, möchte ich mein Problem wieder haben.
    • ceperiga wrote:

      Nadine wrote:

      PS. Den Bausatz des Attiny13 Experimentierboard habe ich mal vor einiger Zeit von dir erworben, funktioniert noch immer bestens.
      Könntest du mir eventuell noch mal den Schaltplan des Bords mit seriellem Programmer zukommen lassen?
      Hallo Nadine,Schaltpläne habe ich heute ergänzt, waren etwas tiefer in der Dateiablage :)

      Schaltplan attiny13 experimentierboard.pdf
      Schaltplan attiny13 experimentierboard 2.pdf
      Hallo Christian,

      vielen herzlichen Dank :)