怀旧CM一个，给我等新人提点士气

weikun444

估计见过这个狐狸头图标的都40后了，CM有唯一解，正确、错误界面见下图：

温情提示：这个图标的怕记事本。


正确会打开咱们的版规哟



解压即可食用：

小菜鸟一枚

验证dll是这个：VFP6R.DLL
如何去网页，吾爱破解第二课有讲shellexcuteA/W
你们说我输入52pojie，会怎么样呢？

最后代码很容易看懂吧，算法都在里面了，有没有大佬出个教程，带我学习一下怎么用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

GJH588

答案是：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
本层楼主纯属瞎猜，楼下大佬请继续

a865170

40后。。。恐怖如斯

jerome_c

40后。。。40岁以上的意思吧？@@~

小李一直在前进

我去，这个不是Visual FoxPro 吗？我上学时候学过，现在都忘到脑后面去了。。。

一条小虫虫2

果然是很厉害，依旧好玩，我滴哪个giaogiao！！！厉害！

bigdawn

练手对象，好玩就行

cyl279

40后。。。恐怖如斯

lykenan

小白学习中，，，感谢分享