Let's name function that takes the name and finds the checksum as F1(), and name another function (for serial) as F2().
You need build function F2'() which is inverse of F2() i.e. F2(F2'(x)) == F2'(F2(x)) == x.

After that to get valid serial for any name just calculate F2'(F1(Name)).