Thanks Richard, You Da Man!
thanks, but that was Allen's, mine was ($^): 76

 Code:
;!
Function a($)
	if $
		$a=asc(right($,1))-64
		$a=a(left($,~))+($^)*$a*($a>)
EndFunction
;!
;!
; end Quicksum



Edited by Benny69 (2007-07-24 02:50 PM)
_________________________
Wait don't order yet,... get KiXforms Designer .NET 2.0 (Beta)
KiXforms Designer .NET 2.0 (Beta)