-
Notifications
You must be signed in to change notification settings - Fork 11
/
Copy path[proc,quicksort_cctext].cs2
38 lines (38 loc) · 1.06 KB
/
[proc,quicksort_cctext].cs2
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
// 1491
[proc,quicksort_cctext](intarray $intarray0, component $component1, int $int2, int $int3)
def_int $index4 = calc(($int2 + $int3) / 2);
def_int $int5 = $intarray0($index4);
$intarray0($index4) = $intarray0($int3);
$intarray0($int3) = $int5;
def_int $int6 = $int2;
def_int $int7 = $int2;
def_int $int8 = -1;
def_string $string0 = "";
def_string $string1 = "";
while ($int7 < $int3) {
if (cc_find($component1, $intarray0($int7)) = ^true) {
$string0 = cc_gettext;
} else {
$string0 = "";
}
if (cc_find($component1, $int5) = ^true) {
$string1 = cc_gettext;
} else {
$string1 = "";
}
if (compare(lowercase($string0), lowercase($string1)) <= 0) {
$int8 = $intarray0($int7);
$intarray0($int7) = $intarray0($int6);
$intarray0($int6) = $int8;
$int6 = calc($int6 + 1);
}
$int7 = calc($int7 + 1);
}
$intarray0($int3) = $intarray0($int6);
$intarray0($int6) = $int5;
if ($int2 < calc($int6 - 1)) {
~quicksort_cctext(intarray0, $component1, $int2, calc($int6 - 1));
}
if (calc($int6 + 1) < $int3) {
~quicksort_cctext(intarray0, $component1, calc($int6 + 1), $int3);
}