Function Sort (C) // Fast Sort
{
SS = C.Split (",");
L = 0;
h = (ss.length-1);
Temp = ss [0];
STR1 = "";
While (l
{
While (L TEMP)
{
H -;
} // while
Ss [l] = ss [h];
While (l
{
l ;
} // while
SS [h] = ss [l];
} // while
SS [L] = TEMP;
For (j = 0; j
{IF (j == ss.length-1)
STR1 = STR1 SS [J];
Else
STR1 = STR1 SS [J] ",";
}
RETURN STR1;
}