-         
Ergebnis 1 bis 2 von 2

Thema: Attiny13

  1. #1
    Neuer Benutzer Öfters hier
    Registriert seit
    12.07.2016
    Beiträge
    6

    Attiny13

    Anzeige

    Hallo und guten Tag an alle,
    ich bin nicht nur neu in der materie sonder auch noch brett vom Kopf.
    ich möchte gern mit eine oder Zwei Taster eine Led schalten der soll 10 mal blinken und dann aus gehen der Zweite Taster solle eine andere Led
    Schalten an bleibe 10 sec. und dann aus gehen dennoch muss die möglichkeit haben mit der selbe taster alles aus zu mache .
    ich habe ein kleine Prg. geschieben geht aber nur an aus, bitte ich brauche eure hilfe vielleicht hat jemand so was schon,
    ich danke euch schon in voraus.
    Gruß Andre

    $regfile = "attiny13.dat"
    $crystal = 1200000
    $swstack = 10

    Config Pinb.3 = Input
    Taste Alias Pinb.3 PIN... nicht port... fuer EINGABE
    Portb.3 = 1

    Waitms 10 'Pullup-Widerstand

    Config Portb.0 = Output 'Portb.0 als Ausgabe
    Led Alias Portb.0 'Definition von Aliasnamen


    Do

    Debounce Taste , 0 , Umschalten , Sub 'Abfragen, ob Taste neu gedrueckt wurde und entprellen

    Loop '
    End

    Umschalten:
    Toggle Led
    Retun


    Bitte

  2. #2
    Erfahrener Benutzer Roboter Experte
    Registriert seit
    15.01.2007
    Ort
    Göttingen
    Beiträge
    705
    ich habe ein kleine Prg. geschieben geht aber nur an aus
    Aber das ist doch genau das was es soll, oder? Im Unterprogramm "Umschalten" wird geoggelt - fertig!

    Probier doch mal ins Unterprogramm eine For-Next-Schlefe zu schreiben, die die LED 20 mal toggelt (also 10 mal an- und ausmacht). Etwa so:

    Code:
    Dim X as Byte
    ...
    ...
    
    Do
    Debounce Taste , 0 , Umschalten
    Loop
    
    Umschalten:
    For X = 1 to 20
    Toggle Led
    waitms 100
    Next X
    Return
    Und wenn das funktioniert, kümmern wir uns um den 2. Taster!

    Gruß,

    Daniel

Ähnliche Themen

  1. Attiny13 PWM
    Von Sp666dy im Forum Elektronik
    Antworten: 3
    Letzter Beitrag: 24.11.2014, 18:10
  2. ATtiny13
    Von modellbahner im Forum AVR Hardwarethemen
    Antworten: 5
    Letzter Beitrag: 29.10.2010, 16:09
  3. ATTiny13 PWM
    Von Jacob2 im Forum AVR Hardwarethemen
    Antworten: 1
    Letzter Beitrag: 13.05.2009, 19:08
  4. attiny13
    Von epos im Forum AVR Hardwarethemen
    Antworten: 2
    Letzter Beitrag: 10.11.2007, 16:55
  5. attiny13
    Von epos im Forum AVR Hardwarethemen
    Antworten: 8
    Letzter Beitrag: 05.10.2007, 22:39

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •