ok, I can't go down with out a fight

 Code:
Function a($b,$c)
	Dim $,$d,$e
	$a=0
	For Each $ in $b
		Dim $f
		For Each $d in $b
			If $<$d
				For $e = -($^) to -2
					If $=Join($c,SubStr($,2,-$e)) & -$e-$f<$a | ~$a
						$a=''+(($^)-$f)+' '+$
					Else
						If Right($,-$e)=Left($d,-$e)
							$=$+' '+$d
							$f=$f-$e+1
;						EndIf
;					EndIf
;				Next
;			EndIf
;		Next
;	Next
EndFunction


Running Test 1...Done...Result: 11 about outside ideas
Running Test 2...Done...Result: 4 ones
Running Test 3...Done...Result: 0
Running Test 4...Done...Result: 7 aabbbb bbbbz
Running Test 5...Done...Result: 0
Running Test 6...Done...Result: 9 ayrton onset
Running Test 7...Done...Result: 6 kita tart
Running Test 8...Done...Result: 11 about outside ideas
Your solution passed all tests

Your solution passed all tests

KiXtart
KiXtart Version = 4.53
KiXGolf Script = kixgolf_A2Z.kix

Computer
OS = Windows Vista Ultimate Edition
CPU = Intel(R) Pentium(R) D CPU 2.80GHz
Speed = 2792 MHz
Memory = 2048 MB

KiXGolf Scoring Engine
Scoring Engine = 3.3

KiXtart Golf Score
Tournament = A-to-Z
Processing Start = 2007/09/14 16:20:00.910
Processing End = 2007/09/14 16:20:00.990
Duration = 0000/00/00 00:00:00.079
KiXGolf Score = 206

Thank you for participating in KiXtart Golf!
Press any key to continue...
_________________________
Wait don't order yet,... get KiXforms Designer .NET 2.0 (Beta)
KiXforms Designer .NET 2.0 (Beta)