首页
社区
课程
招聘
[原创]菜鸟DELPHI第一作!
发表于: 2008-6-27 14:49 6704

[原创]菜鸟DELPHI第一作!

2008-6-27 14:49
6704
经过昨夜的一晚上的DELPHI速成学习,今天就发个超白痴的CM吧!爆破那就不用说了,超级EASY!但是要用来追码的话,那就还有点意思!希望大家不要爆破它,这样才有利于追码能力的提高嘛!谢谢大家合作!不过由于是速成的仍然存在不少的BUG!期望高手指教一二,小弟就感激不尽了!愿为其效犬马之劳!同时也为高考和大考的同学们打打气,加加油!GO GO LET‘S GO !同学们你们辛苦了!

韩育工作室
  卫怡之作

[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)

上传的附件:
收藏
免费 0
支持
分享
最新回复 (12)
雪    币: 2362
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
***** TRY
|
004541EA   64FF30                 push    dword ptr fs:[eax]
004541ED   648920                 mov     fs:[eax], esp
004541F0   8D55EC                 lea     edx, [ebp-$14]

* Reference to control Edit1 : TEdit
|
004541F3   8B8310030000           mov     eax, [ebx+$0310]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004541F9   E856EFFDFF             call    00433154
004541FE   8B45EC                 mov     eax, [ebp-$14]

* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
00454201   E89A54FBFF             call    004096A0
00454206   DB7DE0                 fstp    tbyte ptr [ebp-$20]
00454209   9B                     wait
0045420A   8D55DC                 lea     edx, [ebp-$24]

* Reference to control Edit2 : TEdit
|
0045420D   8B8314030000           mov     eax, [ebx+$0314]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00454213   E83CEFFDFF             call    00433154
00454218   8B45DC                 mov     eax, [ebp-$24]

* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
0045421B   E88054FBFF             call    004096A0
00454220   DB6DE0                 fld     tbyte ptr [ebp-$20]
00454223   DEC1                   faddp   st(1), st(0)
00454225   DB7DD0                 fstp    tbyte ptr [ebp-$30]
00454228   9B                     wait
00454229   8D55CC                 lea     edx, [ebp-$34]

* Reference to control Edit3 : TEdit
|
0045422C   8B8318030000           mov     eax, [ebx+$0318]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00454232   E81DEFFDFF             call    00433154
00454237   8B45CC                 mov     eax, [ebp-$34]

* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
0045423A   E86154FBFF             call    004096A0
0045423F   DB6DD0                 fld     tbyte ptr [ebp-$30]
00454242   DEC1                   faddp   st(1), st(0)
00454244   DB7DC0                 fstp    tbyte ptr [ebp-$40]
00454247   9B                     wait
00454248   8D55BC                 lea     edx, [ebp-$44]

* Reference to control Edit4 : TEdit
|
0045424B   8B831C030000           mov     eax, [ebx+$031C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00454251   E8FEEEFDFF             call    00433154
00454256   8B45BC                 mov     eax, [ebp-$44]

* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
00454259   E84254FBFF             call    004096A0
0045425E   DB6DC0                 fld     tbyte ptr [ebp-$40]
00454261   DEC1                   faddp   st(1), st(0)
00454263   DD5DF8                 fstp    qword ptr [ebp-$08]
00454266   9B                     wait
00454267   DD45F8                 fld     qword ptr [ebp-$08]
0045426A   D83584434500           fdiv    dword ptr [$00454384]
00454270   DD5DF0                 fstp    qword ptr [ebp-$10]
00454273   9B                     wait
00454274   DD45F8                 fld     qword ptr [ebp-$08]
00454277   83C4F4                 add     esp, -$0C
0045427A   DB3C24                 fstp    tbyte ptr [esp]
0045427D   9B                     wait
0045427E   8D45B8                 lea     eax, [ebp-$48]

|
00454281   E8BA53FBFF             call    00409640
00454286   8B55B8                 mov     edx, [ebp-$48]

* Reference to control Edit5 : TEdit
|
00454289   8B8320030000           mov     eax, [ebx+$0320]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0045428F   E8F0EEFDFF             call    00433184
00454294   DD45F0                 fld     qword ptr [ebp-$10]
00454297   83C4F4                 add     esp, -$0C
0045429A   DB3C24                 fstp    tbyte ptr [esp]
0045429D   9B                     wait
0045429E   8D45B4                 lea     eax, [ebp-$4C]

|
004542A1   E89A53FBFF             call    00409640
004542A6   8B55B4                 mov     edx, [ebp-$4C]

* Reference to control Edit6 : TEdit
|
004542A9   8B8324030000           mov     eax, [ebx+$0324]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
004542AF   E8D0EEFDFF             call    00433184
004542B4   8D55B0                 lea     edx, [ebp-$50]

* Reference to control Edit5 : TEdit
|
004542B7   8B8320030000           mov     eax, [ebx+$0320]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004542BD   E892EEFDFF             call    00433154
004542C2   8B45B0                 mov     eax, [ebp-$50]

* Possible String Reference to: '254'
|
004542C5   BA90434500             mov     edx, $00454390

* Reference to: System.@LStrCmp;
|
004542CA   E85903FBFF             call    00404628
004542CF   770C                   jnbe    004542DD

* Possible String Reference to: '59分你就犯罪了 +_+ !'
|
004542D1   B89C434500             mov     eax, $0045439C

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004542D6   E89937FDFF             call    00427A74
004542DB   EB50                   jmp     0045432D
004542DD   8D55AC                 lea     edx, [ebp-$54]

* Reference to control Edit6 : TEdit
|
004542E0   8B8324030000           mov     eax, [ebx+$0324]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004542E6   E869EEFDFF             call    00433154
004542EB   8B45AC                 mov     eax, [ebp-$54]

* Possible String Reference to: '60'
|
004542EE   BABC434500             mov     edx, $004543BC

* Reference to: System.@LStrCmp;
|
004542F3   E83003FBFF             call    00404628
004542F8   720C                   jb      00454306

* Possible String Reference to: '60分万岁!^=^~~'
|
004542FA   B8C8434500             mov     eax, $004543C8

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004542FF   E87037FDFF             call    00427A74
00454304   EB27                   jmp     0045432D
00454306   8D55A8                 lea     edx, [ebp-$58]

* Reference to control Edit5 : TEdit
|
00454309   8B8320030000           mov     eax, [ebx+$0320]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0045430F   E840EEFDFF             call    00433154
00454314   8B45A8                 mov     eax, [ebp-$58]

* Possible String Reference to: '999999999'
|
00454317   BAE0434500             mov     edx, $004543E0

* Reference to: System.@LStrCmp;
|
0045431C   E80703FBFF             call    00404628
00454321   750A                   jnz     0045432D

* Possible String Reference to: '你真是牛啊!底你获的最有创意奖!'
|
00454323   B8F4434500             mov     eax, $004543F4

* Reference to: Dialogs.ShowMessage(AnsiString);
|
00454328   E84737FDFF             call    00427A74
0045432D   33C0                   xor     eax, eax
0045432F   5A                     pop     edx
00454330   59                     pop     ecx
00454331   59                     pop     ecx
00454332   648910                 mov     fs:[eax], edx

****** FINALLY
|
要分析的就这些了
2008-6-27 14:59
0
雪    币: 2362
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
先是获得前四个空的值,转为浮点数。再就相加到五空,平均到六空。上六十就说 ‘59***’
总分999999999就说有创意
   还有几个,我分析不出来,还是程序逻辑有错误?
上传的附件:
2008-6-27 15:12
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
总分大于254就过第一个跳,
第二个跳看似比对平均数跟60的关系,不懂……
总分等于999999999,你真牛啊!

还请高人讲解下跳二处有啥端倪~~
2008-6-27 16:25
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
5
sizhaoming 见笑了!我也不太懂这是为什么?如果你都是平均的话就不能出现999999999,你真牛这个地方,同样如果都是总和也不行!因为刚刚学的不太懂那些逻辑语,还有如果你不输的话!那也会出现错误!太多太多BUG了!真是丢人!
2008-6-27 17:17
0
雪    币: 440
活跃值: (61)
能力值: ( LV5,RANK:60 )
在线值:
发帖
回帖
粉丝
6


自已写的东东都看不懂,那我也不懂了..



我是这样理解的....

总分是将输入的总分和"254"从最高位开始逐位判断(可以跟一下下面的这个CALL)
004542CA  |.  E8 5903FBFF   call    00404628
如果前者大于后者那就跳走
这句应该是判断的地方
004542CF     /77 0C         ja      short 004542DD

如果上面跳了那就比较平均分.
将输入的平均分和"60"从最高位开始逐位判断.(下面的CALL)
004542F3  |.  E8 3003FBFF   call    00404628
如果前者小于后者那就跳走
004542F8  |. /72 0C         jb      short 00454306

后面就是看总分是否是"999999999"了.是的话就不跳,不是就跳走.
2008-6-27 17:49
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
作者兄太谦虚了~~

小弟我把四个框都输入249999999.75,于是我也牛了~~
2008-6-27 18:02
0
雪    币: 177
活跃值: (12)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
8
把999999999分成4份,比如:
900000000
90000000
9000000
999999
它是把总分分别跟254和999999999比较,
要是小于254的话"59分你就犯罪了 +_+ !"
大于245,小于999999999的话应该是"60分万岁"吧
等于999999999的话就是"你真是牛啊!底你获的最有创意奖!"
大于999999999的话,直接退出
菜鸟分析,请大牛们指正
不懂算法
2008-6-27 22:57
0
雪    币: 261
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
9
ysfeagle 的分析我有所保留,我的有三段函数,其中大于等于60就万岁,这一段是不和总和比较的!是只取平均值,它的有效区域是60~99连到100都无效。其于区段的都无效而不是退出!还有不输就会发生错误因为没浮点植!
2008-6-27 23:13
0
雪    币: 317
活跃值: (93)
能力值: ( LV9,RANK:140 )
在线值:
发帖
回帖
粉丝
10
哈哈,米办法玩不懂,直接爆了一关!
上传的附件:
2008-6-28 00:17
0
雪    币: 177
活跃值: (12)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
嘿嘿
由于昨天晚上是熄灯前做的,没有怎么仔细分析  
对60那部分我是猜测的(谁知道居然是错的  ),
"退出"是表达不清楚,应该是"无效" 
2008-6-28 08:06
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
这个是什么东西啊?完全不懂
2008-7-3 20:24
0
雪    币: 8835
活跃值: (2404)
能力值: ( LV12,RANK:760 )
在线值:
发帖
回帖
粉丝
13
最近很不习惯看没有CV过的代码~~
2008-7-4 10:38
0
游客
登录 | 注册 方可回帖
返回
//