运行分析 需要破解Name和Serial PE分析 Delphi程序,32位,无壳 静态分析&动态调试 ida找到关键字符串,双击进入 动调主函数,函数sub_4251A0作用未知 函数sub_4251A0作用:Name每个字符ascii相乘 算法分析 Name = 'concealbear' a1 = 1 for i in range(len(Name)): a1 *= ord(Name[i]) Serial = str(a1&0xfffffff) print(Name + '的Serial为:\n' + Serial) 算法验证成功