Sorting ARRAY

[Gintaras]

Macro Macro807

Code:

Copy      Help

out
str SortedArray=
;|000||data000a||data000b|
;|002||data007a||data007b|
;|000||data001a||data001b|
;|002||data008a||data008b|
;|000||data002a||data002b|
;|001||data003a||data003b|
;|001||data004a||data004b|
;|001||data005a||data005b|
;|002||data006a||data006b|
;|000||data009a||data009b|
;|002||data010a||data010b|

ARRAY(str) arr=SortedArray
arr.shuffle
arr.sort(0 sort_dir_func 0)
out arr

Function sort_dir_func

Code:

Copy      Help

;/
function# param str&a str&b

;compares only first 4 characters
ret StrCompareN(a b 4)