BASCOM "for" Schleife!

Gast #2488835
Hallo Freunde,

ich möchte gerade das meine LED auf meinem Board 20x Blinkt!
dies soll meine for Schleife sein aber das funktioniert nicht :(
kann mir jemand helfen?

Dim A as Byte
A=0

Do

A = A + 1

For A = 1 To 20 Step 1

A:

Led1 = 1
Waitms 20
Led1 = 0
Waitms 20

Next A

Loop
End
Gast #2488926
Wegstaben Verbuchsler schrieb:
> womit prüfst du denn das blinken? Mit den Augen wird das vermutlich nix,
> 20 ms zu "sehen"

mit nem 2313 auf 8 MHz basis sollte man das sehen, kauf dir lieber mal 
eine Brille ;)

-->



Dim A As Byte
A = 0

Do

A = A + 1

For A = 1 To 5 Step 1
If A = 20 Then
Goto Kreisel:
End If


Do:

Programm -->



next A (Variable)
loop
end
Gast #2489069
Hallo Janiiix3,

unabhängig vom Prozessor oder Taktfrequenz würde mit (dem w/richtigsten 
von) deinem Programm die LED mit 25 Hz blinken.

Gerade dein letztes Posting bedarf vielleicht etwas Erklärungsbedarf?
Was bedeuten die Pfeile?

Wozu das A=A+1? oder das Do: oder NEXT A (Variable)?

AlexW hat dir fast die richtige Lösung gezeigt, im Anhang habe ich sie 
noch etwas korrigiert.

Gruß
Angehängte Dateien:
#2493582
Auch nicht ganz wie gewünscht ;-) Die blinken alle öfter als 20 Mal. Mal 
schauen, ob ich es fehlerfrei hinbekomme. :-)
1
Dim a as byte
2
led1 alias portx.y
3

4
config led1 = output
5
for a= 1 to 40
6
   toggle led1
7
   waitms 500
8
next a
9

10
do
11

12
loop
13
end
#2496769
Nein, dann kannst Du sie auch weglassen, da diese im Loop ausgeführt 
wird. Die Anforderung war 20 Mal blinken und nicht unendlich.

@bewaffneter Affe: Jedem das seine. Nur weil Du es vielleicht nicht 
verstehst, muss es nicht schlecht sein.
Gast #2496815
Hallo Janiiix3 u. Thomas der Bastler

so, wie es Peter R. und Schleife bechrieben haben, ist es richtig.
Das von Schleife gefällt mir am besten, weil jede Zeile eindeutig ist 
und immer klar ist, was passiert. Gerade als Anfänger ist man für solch 
einen Code dankbar.
Haken und Ösen kann man immer noch einbauen, wenn man etwas sattelfester 
ist.

Merkt euch für später: Kommentarzeilen sind NIE! überflüssig! Lieber 
jetzt einen halben Aufsatz schreiben, bevor man später nicht mehr weiß, 
was man damals gemacht hat.


@bewaffneter Affe:
Wohl C-Programmierer?
Jeder hat eben so seine Vorlieben. Schlecht machen bringt nichts. Zur 
Not könntest du ja eine Schmerztablette einnehmen.

C = Gürteltiersprache ....??

Der Quellcode sieht so aus als wäre ein Gürteltier über die Tastatur 
gerollt...!  :-)


MfG

Antwort schreiben

Eine eigene Frage? Dieser Thread ist über 14 Jahre alt. Stell sie in einem eigenen Thread – dort lesen mehr Leute mit, und sie wird öfter und schneller beantwortet.

Neuen Thread starten

Eine Lösung, Ergänzung oder Rückmeldung zu diesem Thread? Dann antworte hier.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.