見直ししたら無理ゲーでした。 FOR I=1 TO 600 の後に WAIT 1 を入れてください。