219
 Code:
function a($) 
dim $D,$r,$n

for each $ in split($,',')
 $a=$
 do
  dim $t
  while $
   $t=$t+ (asc($) mod 96 & 63) mod 48
   $=right($,~)
  loop
  $=$t
 until 10>$

 $n=$n+$a+'='+$+', '
 
 $=b+(9-$)+($a^)

 if $D=$
  $r=Draw
 endif
 if $>$D
  $D=$
  $r='Winner='+$a
 endif

 $a=$n+$r
endfunction
_________________________
!

download KiXnet