请教一下KSAIY大大,关于某字串转换为另一字串的算法及代码

Question

初始字串:L3JDFEQC
转换后的字串:17187981985952254
要用什么样的算法才能进行这样的字串转换,能否给出相关代码,谢谢!
我刚学这个没多久,算法上也不是很清楚该如何进行这样的转换

Answer 1

不知道你的是不是非得固定。
给你个函数可能对字符串加密。呵呵~~不过简单了点。
  Function LockStr(S:String):WideString;
  Var I,L:Integer;
      STemp,C:String;
  Const AStr:String='UXtnGjc4dIBkosvCPQSrDYFZJhTewliyLMaH70uW95xbVzOKq3E1Rmpf8AN62g_~!@#$%^&*';
  Begin
       STemp:='';
       L:=Length(S);
       For I:=1 To L Do
       Begin
            C:='';
            C:=C+S[I];
            If Pos(C,AStr)>0 Then
               Stemp:=Stemp+AStr[73-Pos(C,AStr)];
       End;
       LockStr:=STemp;
  End;

Answer 2

用加密算法了
不一定要按照那样的结果的，效果类似即可http://lysoft.7u7.net

Answer 3

那我笼统的说吧
公式:B=转换器(A)有没有可能在已经B和A的值情况下获得转换器的工作方式及其大概代码
就如前面我给出的两字串
初始字串:L3JDFEQC
转换后的字串:1718798198595225417187981985952254=转换器(L3JDFEQC)我想要知道的就是,转换器有没有可能通过这两个固定的值重写出来?
请各位能理解我所说的试一试看看,我提供的这两个字串是有一定用意的.
不然我就会随便找个MD5加密过的字串来了