Habe aber ne Lösung gefunden:
Code: Alles auswählen
z = 0
Repeat
For n = 1 To 5
If sprite(n)\Z = z
DisplaySprite(sprite(n)\N,sprite(n)\X,sprite(n)\Y)
EndIf
Next
z + 1
Until z = 6
Code und /Code manuell eingegeben

Code: Alles auswählen
z = 0
Repeat
For n = 1 To 5
If sprite(n)\Z = z
DisplaySprite(sprite(n)\N,sprite(n)\X,sprite(n)\Y)
EndIf
Next
z + 1
Until z = 6