Lauflicht mit Array ohne Waitms

[Brantiko]

Moin,
Habe hier folgendes Lauflicht:




Dim Led(8) As Byte 'Array mit 8 Feldern definieren

Dim Zaehler As Byte
Dim Zaehler1 As Byte



Led(1) = 0 : Led(2) = 1 : Led(3) = 2 : Led(4) = 3 : Led(5) = 4 : Led(6) = 5 : Led(7) = 6 : Led(8) = 7 'Array felder mit Werten Füllen

'Hauptschleife
Do
For Zaehler = 1 To 8 Step 1
Toggle Porta.led(zaehler)
Waitms 50
Next Zaheler

Loop
End


Wie kann ich das ganze nun in ein Programm einbinden, und das Waitms rauswerfen?
Hab schon mit hochzählenden Variablen rumprobiert, aber bis dato hat nichts geklappt!

Gruss
Alex

[Bammel]

erlich gesagt hab ich noch net so die ahnugn vonm sowas.. aber ich würde vllt mal ausprobieren eine dementsprechend große soft-pwm zu programieren...

[Dnerb]

Dafür gibts die Timer. Such mal in den auf Roboternetz, da gibts eine nette Einführung.


Dann packst Du das Toggle Po... einfach in die IRQ-Routine.

Und nebenher kann Dein Controller dann kräftig Däumchen drehen oder sich um andere Dinge kümmern. Z.B. Dir das Badewasser einlassen oder was Du sonst so vor hast.

Gruß Dnerb