Hallo,

hast du schon mal versucht, die Schleife etwas langsamer zu machen? Versuche doch mal ein "Waitms 100" nach dem "Do" einzubauen. Ansonsten sollte es eigentlich funktionieren.