>Frage zun Next For schleife

[Cybererror]

Hallo

Hatte was Probiert nur leider ging es nicht wie ich will

Warum nicht?

hatte geschreiben:

Bleibt aber immer nur in der Erstenschleife Stecken.
Dimmt Licht nur hoch und aus und wieder von vorn,
Will aber das er hoch dimmt und runter Dimmt.

 
Dim A as Byte
Dim B As Byte

Do
A = 0
B = 0

For A = 1 to 255
   A = A + 1
   PWM = A
   Waitms 100
Next A

wait 1

For B = 1 to 255
    A = A - 1
    PWM = A
    Waitms 100
Next B

Loop

[Searcher]

Hi,

in der ersten Schleife wird A durch die FOR A.. von allein hochgezählt. In der folgenden Zeile addierst Du noch 1. Weis nicht was Bascom da macht, wenn die Zählvariable als Byte Variable am Ende der Schleife 255 erreicht. Wird die da nicht wieder zu 1 wenn zu 255 noch 1 addiert wird? und dann die Schleife kein Ende findet.

Was passiert wenn Du die Zeile A = A + 1 einfach wegläßt?

Gruß
Searcher

[Netzman]

Dim A as Byte

Do

For A = 1 to 255
   PWM = A
   Waitms 100
Next A

wait 1

For A = 255 to 1 Step -1
    PWM = A
    Waitms 100
Next A

Loop

mfg