function a($) 
dim $D,$r,$b

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

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

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