Also... funzt jetzt
zum einen war da noch ein z= 0 am anfang der routine.

es lag aber daran, das ich mit dieser "if z > 45" konstruktion nicht wirklich viel erreicht habe, höchstens den direkten sprung danach aus der subroutine.
brauchste ja ne schleife und keine if- abfrage.
hab das jetzt durch "do loop until z>45" ersetzt... funzt jetzt auch...

trotzdem danke für die antworten und direkt mal den nächsten thread eröffnen.