JavaScript (ES6), score 8181 78
Saved 3 points thanks to @Arnauld
s=>s.replace(d=/./g,z=>q+=d[z]=-~d[z],q=0)&&q
My original score-81 recursive solution:
f=([c,...s],d={})=>c?(d[c]=-~d[c])+f(s,d):0
81 can also be scored with a non-recursive solution:
s=>s.replace(d=/./g,c=>q+=d[c]=-~d[c],q=0)&&q