Nein, Deine Schleifen sind total verquer:

Der Programmteil muss ohne do / loop in die If-then Schleife. Habe gerad enicht mehr Zeit, mache ich nacher...