简单CRACKME，新手来搞 给你信心/。。
成功的截图，其他都是错的！！
温馨提示：下载cM 不需要CB
；大神来搞：@zbnysjwsnd8
本帖最后由 zbnysjwsnd8 于 2017-7-30 21:14 编辑
唔。。我不是大神 请不要这么叫我。。。
机器码:
先执行这段脚本:
Function Getcpuid()
Dim cpuSet,cpu
Set cpuSet = GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf("Win32_Processor")
For Each cpu In cpuSet
getcpuid=cpu.ProcessorId
exit for
Next
end Function
设这段函数的返回值为a
则机器码 = a + a + "PO"
注册码:
先执行这段脚本:
Function MACAddress()
Dim mc,mo
Set mc=GetObject("Winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration")
For Each mo In mc
If mo.IPEnabled=True Then
MACAddress= mo.MacAddress
Exit For
End If
Next
End Function
设这段函数的返回值为a1
则注册码 = a + 机器码 + 子文本替换 (a1, “:”, “-”, , , 真)
附 注册机源代码和成品:
本帖最后由 zbnysjwsnd8 于 2017-7-30 22:40 编辑
dazong 发表于 2017-7-30 21:19
怎么分析的？ 按钮事件 应该断不下来了注册不是按钮 ， 但是我调用了一次按钮事件但是跟注册没关系
{:1_909:}真的断不下来吗？
我不知道。。。
一下就断下来了。。。
我用的是吾爱破解专版OD + SharpOD
而且
就算不是按钮也可以的
bp GetWindowTextA
如果一直断的话 (一直不是编辑框)
可以用 彗星编程助手 探测一下注册码这个编辑框的句柄
然后OD下条件断点。
回到程序领空一样可以。 支持楼主 还是得学习编程啊，先学习了，感谢 zbnysjwsnd8 发表于 2017-7-30 21:11
唔。。我不是大神 请不要这么叫我。。。
机器码:
先执行这段脚本:
你 厉害了！！！！ 本帖最后由 dazong 于 2017-7-30 21:21 编辑
zbnysjwsnd8 发表于 2017-7-30 21:11
唔。。我不是大神 请不要这么叫我。。。
机器码:
先执行这段脚本:
怎么分析的？ 按钮事件 应该断不下来了注册不是按钮 ， 但是我调用了一次按钮事件但是跟注册没关系，按钮里边好像有判断编辑框2内容，如果不对 结束， 在这里 暴露了！判断的 跟上面一样 zbnysjwsnd8 发表于 2017-7-30 21:20
真的断不下来吗？
我不知道。。。
一下就断下来了。。。
你等会我重新写个cm 你看看 zbnysjwsnd8 发表于 2017-7-30 21:20
真的断不下来吗？
我不知道。。。
一下就断下来了。。。
你试试这个 ！ zbnysjwsnd8 发表于 2017-7-30 21:20
真的断不下来吗？
我不知道。。。
一下就断下来了。。。
彗星编程助手！！！这么强大么。。 无语