'Einmal das Array durchlaufen
  For i = 1 To Laenge
    'Die innere Schleife so oft durchlaufen lassen, dass sie alle Vergleiche ausführen kann
    For x = 0 To Laenge - 2
      'Ist das linke Element wertlich größer als das rechts davon, die beiden Elemente tauschen
      If( Matrix( x ) > Matrix( x + 1 ) ) Then
        'Speicherplatzoptimierter Tauschmechanismus
        Matrix( x )     = Matrix( x )     Xor Matrix( x + 1 )
        Matrix( x + 1 ) = Matrix( x + 1 ) Xor Matrix( x )
        Matrix( x )     = Matrix( x )     Xor Matrix( x + 1 )
      End If
#If BS_DEBUGPRINT
      PrintMatrix( Matrix, Pad )
#End If
      'Fortschritt anzeigen und updaten lassen
      FortschrittsFenster.Fortschritt += Fortschrittsscheibe
    Next
  Next