forked from RuneStar/cs2-scripts
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path[proc,poh_costumes_quicksort].cs2
30 lines (30 loc) · 1.03 KB
/
[proc,poh_costumes_quicksort].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
// 3543
[proc,poh_costumes_quicksort](intarray $intarray0, int $int1, int $int2, enum $enum3)
def_int $index4 = calc(($int1 + $int2) / 2);
def_int $int5 = $intarray0($index4);
$intarray0($index4) = $intarray0($int2);
$intarray0($int2) = $int5;
def_namedobj $namedobj6 = null;
def_namedobj $namedobj7 = enum(int, namedobj, $enum3, $int5);
def_string $string0 = enum(obj, string, enum_3302, $namedobj7);
def_int $int8 = $int1;
def_int $int9 = $int1;
def_int $int10 = -1;
while ($int9 < $int2) {
$namedobj6 = enum(int, namedobj, $enum3, $intarray0($int9));
if (compare(enum(obj, string, enum_3302, $namedobj6), $string0) <= 0) {
$int10 = $intarray0($int9);
$intarray0($int9) = $intarray0($int8);
$intarray0($int8) = $int10;
$int8 = calc($int8 + 1);
}
$int9 = calc($int9 + 1);
}
$intarray0($int2) = $intarray0($int8);
$intarray0($int8) = $int5;
if ($int1 < calc($int8 - 1)) {
~poh_costumes_quicksort(intarray0, $int1, calc($int8 - 1), $enum3);
}
if (calc($int8 + 1) < $int2) {
~poh_costumes_quicksort(intarray0, calc($int8 + 1), $int2, $enum3);
}