Another 77 based on Dales' code with mods from Richard

 Code:
function a($)
  if $
    $a=asc(right($,1))-64
    $a=a(left($,~))+($a>)*$a*(0^$)
endfunction


Running Test 1...Done
Running Test 2...Done
Running Test 3...Done
Running Test 4...Done
Running Test 5...Done
Running Test 6...Done
Your solution passed all tests

KiXtart
KiXtart Version = 4.53
KiXGolf Script = KIXGOL~1.KIX

Computer
OS = Windows 2000 Professional
CPU = Intel(R) Pentium(R) 4 CPU 2.80GHz
Speed = 2793 MHz
Memory = 504 MB

KiXGolf Scoring Engine
Scoring Engine = 3.3

KiXtart Golf Score
Tournament = Quicksum
Processing Start = 2007/07/24 13:11:07.406
Processing End = 2007/07/24 13:11:07.421
Duration = 0000/00/00 00:00:00.014
KiXGolf Score = 77

Thank you for participating in KiXtart Golf!
_________________________