怀旧CM一个,给我等新人提点士气
估计见过这个狐狸头图标的都40后了,CM有唯一解,正确、错误界面见下图:温情提示:这个图标的怕记事本。
正确会打开咱们的版规哟
解压即可食用:
本帖最后由 小菜鸟一枚 于 2020-8-3 19:08 编辑
验证dll是这个:VFP6R.DLL
如何去网页,吾爱破解第二课有讲shellexcuteA/W
你们说我输入52pojie,会怎么样呢?:lol
最后代码很容易看懂吧,算法都在里面了:handshake,有没有大佬出个教程,带我学习一下怎么用OD破解它!
PS:谢谢作者保留的记事本大法,让我能够破解这个CM。
Width = 374
ShowWindow = 2
DoCreate = .T.
AutoCenter = .T.
Caption = "CM1"
Name = "Form1"
)PROCEDURE Unload
CLEAR EVENTS
ENDPROC
剥? ? ? 7 % 8 N H ? U 政 U Unload, ??1 Q 1 ) ? label label Label1 Form1 bFontSize = 15
Caption = "口令:"
Height = 37
Left = 48
Top = 41
Width = 73
Name = "Label1"
textbox textbox Text1 Form1 OFontSize = 15
Height = 36
Left = 108
Top = 36
Width = 228
Name = "Text1"
commandbutton
commandbutton Command1 Form1 gTop = 96
Left = 72
Height = 48
Width = 180
FontSize = 15
Caption = "验证一下"
Name = "Command1"
颬ROCEDURE Click
if len(alltrim(thisform.text1.value))=7 then
str0=alltrim(thisform.text1.value)
str1=str(val(substr(str0,1,2))-38)
str2=str(31)
str3=str(asc(substr(str0,5,1))-70)
str4=str(asc(substr(str0,6,1))-104)
str5=str(asc(upper(substr(str0,7,1)))-68)
str_done=CHRTRAN(str1+str2+str3+"-"+str4+"-"+str5,' ','')
ThisForm.HyperLink1.NavigateTo("https://www.52pojie.cn/thread-"+str_done+".html")
else
messagebox("口令长度是7位!","信息提示")
endif
答案是:52**jie
**星号处任意即可
143136-1-1计算得出此数据
逆向分析一下,
e小写转大写到ascii-68=1
i到asscii-104=1
j到asscii-70=36
赋值31
分割文本取前两位-38=14
结果等于“143136”+“-”+"1"+"-"+"1"
打开地址https://www.52pojie.cn/thread-"+结果+".html
本层楼主纯属瞎猜,楼下大佬请继续{:301_1004:} 40后。。。恐怖如斯
40后。。。40岁以上的意思吧?@@~ 我去,这个不是Visual FoxPro 吗?我上学时候学过,现在都忘到脑后面去了。。。 果然是很厉害,依旧好玩,我滴哪个giaogiao!!!厉害! 练手对象,好玩就行
40后。。。恐怖如斯 小白学习中,,,感谢分享
页:
[1]
2