Or perhaps something like this:
SuperStrict Local name:String = Input( "Type your name here: " ) Local accum:Int = 0 For Local n:Int = 0 Until name.length accum:+name[n] Next Local serial:Int = 3 * accum Print "Name : " + name Print "Int : " + accum Print "Serial : " + serial EndIt goes without saying that this is not a particularly good and/or secure way to generate serial numbers.