k, here is a stab at benny's code.
gave 228:
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_humansort.kix

Computer
OS               = Windows Vista Enterprise Edition
CPU              = Intel Pentium Model 13
Speed            = 1866 MHz
Memory           = 758 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = KiXtart Golf: Human Sort
Processing Start = 2007/01/01 16:47:46.026
Processing End   = 2007/01/01 16:54:34.528
Duration         = 0000/00/00 00:06:48.502
# Tests Run      = 9
# Tests Passed   = 9
# Tests Failed   = 0
Result           = passed
KiXGolf Score    = 228

Code:
Function a($)
	Dim $c,$d
	For $c = 0 to UBound($)
		For $d = $c + 1 to UBound($)
			If b($[$d],$) < b($[$c],$)
				$a = $[$d]
				$[$d] = $[$c]
				$[$c] = $a
			EndIf
			$a=$
EndFunction
Function b($,$i)
	Dim $g,$h
	For $h = Len($) to Len(Join($i))
		For $g = 0 to 9
			$=Join(Split($,$g),#+$g)
			$b=$
EndFunction
_________________________
!

download KiXnet