benny's 215:

 Code:
; begin A-to-Z
;
;!
Function a($b,$c)
	Dim $,$d,$e
	$a=0
	For Each $ in $b
		Dim $f
		For Each $d in $b
			If $<$d
				For $e = $d^0 to 2 Step -1
					If $=$c[0]+Left(Right($,~),~)+$c[1] & ($^)-$f<$a | ~$a
						$a=''+(($^)-$f)+' '+$
					Else
						If Right($,$e)=Left($d,$e)
							$=$+' '+$d
							$f=$f+$e+1
EndFunction
;!
;!
; end A-to-Z




Your solution passed all tests

KiXtart
KiXtart Version = 4.52
KiXGolf Script = kixgolf_a2z.kix

Computer
OS = Windows XP Professional
CPU = Intel Pentium Model 13
Speed = 798 MHz
Memory = 1024 MB

KiXGolf Scoring Engine
Scoring Engine = 3.3

KiXtart Golf Score
Tournament = A-to-Z
Processing Start = 2007/09/13 11:33:00.765
Processing End = 2007/09/13 11:33:00.796
Duration = 0000/00/00 00:00:00.031
KiXGolf Score = 215

Thank you for participating in KiXtart Golf!


Changed:
$a = ($^)-$f
$a=''+$a+' '+$

To

$a=''+(($^)-$f)+' '+$

Edited by DrillSergeant (2007-09-13 11:35 AM)
Edit Reason: explained change
_________________________
The Code is out there