Sortieralgorithmus

[Sam]

Servus!

Ich bastele gerade an einem Sortieralgorithmus (ASP mit VBScript) und stehe auf dem Schlauch.

Folgendes Problem ist zu lösen.
Ich habe ein Array mit 4 Werten. Es handelt sich um Strings (eine vorgebene Menge von Abkürzungen), die alphabetisch sortiert werden sollen. Dies ist natürlich kein Problem. Es gibt aber zwei Ausnahmen:

• die Werte "M", "MU","BK" und "IN" stehen immer ganz vorne
• "PH" und "L" stehen ebenfalls ganz vorne, allerdings hinter den zuvor genannten Werten.

Bsp.:

DAF-L-M-W  --> M-L-DAF-W

Mein erster Ansatz war BubbleSort in drei Schritten (hintereinander ausgeführt),

1. if arrSort(i) > arrSort(j) then [tauschen....]
2. if arrSort(j) = "PH" or arrSort(j) = "L" then [tauschen....]
3. if arrSort(j)="M" or arrSort(j)="MU" or arrSort(j)="BK" or arrSort(j)="IN" then [tauschen....]

aber das bringt nicht die gewünschte Reihenfolge.

Wie mache ich das richtig?

Grüße,
Sam