-
Notifications
You must be signed in to change notification settings - Fork 12
Expand file tree
/
Copy path[proc,poh_costumes_searchsort].cs2
More file actions
38 lines (38 loc) · 1.05 KB
/
[proc,poh_costumes_searchsort].cs2
File metadata and controls
38 lines (38 loc) · 1.05 KB
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
// 3561
[proc,poh_costumes_searchsort](intarray $intarray0, int $int1, int $int2)
def_int $index3 = calc(($int1 + $int2) / 2);
def_int $int4 = $intarray0($index3);
$intarray0($index3) = $intarray0($int2);
$intarray0($int2) = $int4;
def_obj $obj5 = null;
def_obj $obj6 = null;
def_string $string0 = "";
if (cc_find(interface_162:50, $int4) = ^true) {
$obj6 = cc_getinvobject;
if ($obj6 ! null) {
$string0 = oc_name($obj6);
}
}
def_int $int7 = $int1;
def_int $int8 = $int1;
def_int $int9 = -1;
while ($int8 < $int2) {
if (cc_find(interface_162:50, $intarray0($int8)) = ^true) {
$obj5 = cc_getinvobject;
}
if (compare(oc_name($obj5), $string0) <= 0) {
$int9 = $intarray0($int8);
$intarray0($int8) = $intarray0($int7);
$intarray0($int7) = $int9;
$int7 = calc($int7 + 1);
}
$int8 = calc($int8 + 1);
}
$intarray0($int2) = $intarray0($int7);
$intarray0($int7) = $int4;
if ($int1 < calc($int7 - 1)) {
~poh_costumes_searchsort(intarray0, $int1, calc($int7 - 1));
}
if (calc($int7 + 1) < $int2) {
~poh_costumes_searchsort(intarray0, calc($int7 + 1), $int2);
}