野猫III 发表于 2006-7-21 11:40:25

VB ReVerseMe #1 by WildCatIII

So simple,hope you enjoy!

caterpilla 发表于 2006-7-21 12:12:56

强烈支持。。。。。。。。

绝恋风尘 发表于 2006-7-21 16:17:54

支持!!!!

绝恋风尘 发表于 2006-7-21 16:44:29

算法简单.
一组可用的注册码:          用户名:绝恋风尘   
                                 注册码:Simple   15

绝恋风尘 发表于 2006-7-21 16:54:32

004050DB   .50            PUSH EAX
004050DC   .8995 5CFFFFFF MOV DWORD PTR SS:,EDX
004050E2   .FFD7          CALL EDI
004050E4   .8B8D 5CFFFFFF MOV ECX,DWORD PTR SS:
004050EA   .8B3D 08104000 MOV EDI,DWORD PTR DS:[<&MSVBVM60.__vbaVarMove>]   ;MSVBVM60.__vbaVarMove
004050F0   .03C8          ADD ECX,EAX                                       ;用户名与注册名长度相加为记为SN1
004050F2   .8D95 7CFFFFFF LEA EDX,DWORD PTR SS:
004050F8   .0F80 DE010000 JO VB_ReVer.004052DC
004050FE   .894D 84       MOV DWORD PTR SS:,ECX
00405101   .8D4D DC       LEA ECX,DWORD PTR SS:
00405104   .C785 7CFFFFFF>MOV DWORD PTR SS:,3
0040510E   .FFD7          CALL EDI                                          ;<&MSVBVM60.__vbaVarMove>
00405110   .8D55 C4       LEA EDX,DWORD PTR SS:
00405113   .8D45 C8       LEA EAX,DWORD PTR SS:
00405116   .52            PUSH EDX
00405117   .50            PUSH EAX
00405118   .6A 02         PUSH 2
0040511A   .FF15 84104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeStrList>];MSVBVM60.__vbaFreeStrList
00405120   .8D4D BC       LEA ECX,DWORD PTR SS:
00405123   .8D55 C0       LEA EDX,DWORD PTR SS:
00405126   .51            PUSH ECX
00405127   .52            PUSH EDX
00405128   .6A 02         PUSH 2
0040512A   .FF15 1C104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeObjList>];MSVBVM60.__vbaFreeObjList
00405130   .83C4 18       ADD ESP,18
00405133   .8D45 AC       LEA EAX,DWORD PTR SS:
00405136   .C745 84 C4474>MOV DWORD PTR SS:,VB_ReVer.004047C4       ;UNICODE "Simple"
0040513D   .C785 7CFFFFFF>MOV DWORD PTR SS:,8
00405147   .6A 03         PUSH 3
00405149   .50            PUSH EAX
0040514A   .FF15 44104000 CALL DWORD PTR DS:[<&MSVBVM60.#526>]            ;MSVBVM60.rtcSpaceVar
00405150   .8D8D 7CFFFFFF LEA ECX,DWORD PTR SS:
00405156   .8D55 AC       LEA EDX,DWORD PTR SS:
00405159   .51            PUSH ECX
0040515A   .8D45 9C       LEA EAX,DWORD PTR SS:
0040515D   .52            PUSH EDX
0040515E   .50            PUSH EAX
0040515F   .FF15 94104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarAdd>]       ;MSVBVM60.__vbaVarAdd
00405165   .8D4D DC       LEA ECX,DWORD PTR SS:                     ;Simple与三个空格相加记为SN2
00405168   .50            PUSH EAX
00405169   .8D55 8C       LEA EDX,DWORD PTR SS:
0040516C   .51            PUSH ECX
0040516D   .52            PUSH EDX
0040516E   .FF15 70104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarCat>]       ;MSVBVM60.__vbaVarCat
00405174   .8BD0          MOV EDX,EAX                                       ;SN2与SN1连起来为SN3
00405176   .8D4D CC       LEA ECX,DWORD PTR SS:
00405179   .FFD7          CALL EDI
0040517B   .8D45 9C       LEA EAX,DWORD PTR SS:
0040517E   .8D4D AC       LEA ECX,DWORD PTR SS:
00405181   .50            PUSH EAX
00405182   .51            PUSH ECX
00405183   .6A 02         PUSH 2
00405185   .FF15 14104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeVarList>];MSVBVM60.__vbaFreeVarList
0040518B   .8B16          MOV EDX,DWORD PTR DS:
0040518D   .83C4 0C       ADD ESP,0C
00405190   .56            PUSH ESI
00405191   .FF92 04030000 CALL DWORD PTR DS:
00405197   .50            PUSH EAX
00405198   .8D45 C0       LEA EAX,DWORD PTR SS:
0040519B   .50            PUSH EAX
0040519C   .FFD3          CALL EBX
0040519E   .8BF8          MOV EDI,EAX
004051A0   .8D55 C8       LEA EDX,DWORD PTR SS:
004051A3   .52            PUSH EDX
004051A4   .57            PUSH EDI
004051A5   .8B0F          MOV ECX,DWORD PTR DS:
004051A7   .FF91 A0000000 CALL DWORD PTR DS:
004051AD   .85C0          TEST EAX,EAX
004051AF   .DBE2          FCLEX
004051B1   .7D 12         JGE SHORT VB_ReVer.004051C5
004051B3   .68 A0000000   PUSH 0A0
004051B8   .68 B0474000   PUSH VB_ReVer.004047B0
004051BD   .57            PUSH EDI
004051BE   .50            PUSH EAX
004051BF   .FF15 24104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaHresultCheckOb>;MSVBVM60.__vbaHresultCheckObj
004051C5   >8B45 C8       MOV EAX,DWORD PTR SS:
004051C8   .8D4D CC       LEA ECX,DWORD PTR SS:
004051CB   .8945 B4       MOV DWORD PTR SS:,EAX
004051CE   .8D45 AC       LEA EAX,DWORD PTR SS:
004051D1   .50            PUSH EAX
004051D2   .51            PUSH ECX
004051D3   .C745 C8 00000>MOV DWORD PTR SS:,0
004051DA   .C745 AC 08800>MOV DWORD PTR SS:,8008
004051E1   .FF15 4C104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaVarTstEq>]   ;MSVBVM60.__vbaVarTstEq
004051E7   .8D4D C0       LEA ECX,DWORD PTR SS:                     ;SN3与假码比较是否相等，其实SN3就是真码。
004051EA   .8BF8          MOV EDI,EAX
004051EC   .FF15 AC104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeObj>]      ;MSVBVM60.__vbaFreeObj
004051F2   .8D4D AC       LEA ECX,DWORD PTR SS:
004051F5   .FF15 0C104000 CALL DWORD PTR DS:[<&MSVBVM60.__vbaFreeVar>]      ;MSVBVM60.__vbaFreeVar
004051FB   .8B16          MOV EDX,DWORD PTR DS:
004051FD   .56            PUSH ESI
004051FE   .66:85FF       TEST DI,DI
00405201   .74 25         JE SHORT VB_ReVer.00405228
00405203   .FF92 04030000 CALL DWORD PTR DS:
00405209   .50            PUSH EAX

[ 本帖最后由 绝恋风尘 于 2006-7-21 16:56 编辑 ]

野猫III 发表于 2006-7-21 17:57:11

原帖由 绝恋风尘 于 2006-7-21 16:54 发表
004050DB   .50            PUSH EAX
004050DC   .8995 5CFFFFFF MOV DWORD PTR SS:,EDX
004050E2   .FFD7          CALL EDI
004050E4   .8B8D 5CFFFFFF MOV ECX,DWORD PTR SS:
004050EA   .8B3D...

哈哈～～～兄弟完全正确！　:victory:　:victory:

Reverse　就比较简单，但咱想兄弟们做做它的KeyGen看下。

[ 本帖最后由 野猫III 于 2006-7-21 18:07 编辑 ]

绝恋风尘 发表于 2006-7-21 19:02:35

VB源码
Private Sub Command1_Click()
Dim SN1 As Integer
Dim SN2 As Integer
Dim SN3 As String
If Text1.Text <> "" Then
    SN1 = Len(Text1.Text)
    SN2 = 11 + SN1
    SN3 = "Simple   " & SN2
    Text2.Text = SN3
Else
    Text1.Text = "请输入用户名！"
End If
End Sub

[ 本帖最后由 绝恋风尘 于 2006-7-21 19:46 编辑 ]

lgjxj 发表于 2006-7-21 22:36:42

啊，这么快就出了分析，没心情下了，建议下次出了 CakeMe 过几天才出破文

网游难民 发表于 2006-7-22 13:49:50

偶下来看看~~~
破文出来了,正好可以做参考~~
有什么不好哦~~
偶喜欢

网游难民 发表于 2006-7-23 18:02:40

goqq2008
Simple   19
页: [1] 2
查看完整版本: VB ReVerseMe #1 by WildCatIII