关于Delphi 加密……

Question

我有一个会员系统，是别人帮到开发的，但他们没有给我们制卡的加密方式，每回拿回来批新卡，或是消磁了，都要寄过去，我们反应了很多回，他们也不给我们加密码方式，先声明，这个软件加密码方式只跟我们公司有关，但他拿到手上不给我们，现请大家帮我一个忙？？，看看他咋个加密码了的10028020007110802681029033    8201     
20328060000110502611020033    8202
30428060006110902651029033    8203
40028060009110302651027033    8204
(是卡里的数字)                 是解出来的值

Answer 1

10<0>28
20<3>28 
30<4>28 
40<0>28 2810   8201
2820   8202
2830   8203
2840   8204取值 矩陣轉換才給20分太小器吧

Answer 2

0070C490   55                     push    ebp
0070C491   8BEC                   mov     ebp, esp
0070C493   33C9                   xor     ecx, ecx
0070C495   51                     push    ecx
0070C496   51                     push    ecx
0070C497   51                     push    ecx
0070C498   51                     push    ecx
0070C499   51                     push    ecx
0070C49A   53                     push    ebx
0070C49B   56                     push    esi
0070C49C   57                     push    edi
0070C49D   8BD8                   mov     ebx, eax
0070C49F   33C0                   xor     eax, eax
0070C4A1   55                     push    ebp* Possible String Reference to: '閄x?脬_^[嬪]?
|
0070C4A2   68EBC67000             push    $0070C6EB***** TRY
|
0070C4A7   64FF30                 push    dword ptr fs:[eax]
0070C4AA   648920                 mov     fs:[eax], esp
0070C4AD   8D45FC                 lea     eax, [ebp-$04]* Reference to: System.@LStrClr(void;void);
|
0070C4B0   E86F81CFFF             call    00404624
0070C4B5   8D55F8                 lea     edx, [ebp-$08]* Reference to pointer to GlobalVar_007EA9C8
|
0070C4B8   A19C767E00             mov     eax, dword ptr [$007E769C]
0070C4BD   8B00                   mov     eax, [eax]* Reference to: SysUtils.LowerCase(AnsiString):AnsiString;
|
0070C4BF   E800CDCFFF             call    004091C4
0070C4C4   8B45F8                 mov     eax, [ebp-$08]* Possible String Reference to: 'magcard'
|
0070C4C7   BA04C77000             mov     edx, $0070C704* Reference to: System.@LStrCmp;
|
0070C4CC   E88B85CFFF             call    00404A5C
0070C4D1   752B                   jnz     0070C4FE* Reference to pointer to GlobalVar_007EA9D0
|
0070C4D3   A154817E00             mov     eax, dword ptr [$007E8154]
0070C4D8   8B00                   mov     eax, [eax]* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
0070C4DA   E83186CFFF             call    00404B10
0070C4DF   50                     push    eax* Reference to pointer to GlobalVar_007EA9D4
|
0070C4E0   A194757E00             mov     eax, dword ptr [$007E7594]
0070C4E5   8B00                   mov     eax, [eax]* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
0070C4E7   E82486CFFF             call    00404B10
0070C4EC   50                     push    eax* Reference to: MagCardLK602.MagCardLK602ReadUnCodeData()
|
0070C4ED   E84E72FFFF             call    00703740
0070C4F2   8BD0                   mov     edx, eax
0070C4F4   8D45FC                 lea     eax, [ebp-$04]* Reference to: System.@LStrFromPChar(String;String;PAnsiChar);
|
0070C4F7   E83083CFFF             call    0040482C
0070C4FC   EB4D                   jmp     0070C54B
0070C4FE   B201                   mov     dl, $01* Reference to class TStringList
|
0070C500   A180CA4100             mov     eax, dword ptr [$0041CA80]* Reference to: System.TObject.Create(TObject;Boolean);
|
0070C505   E87A72CFFF             call    00403784|
0070C50A   E85972FFFF             call    00703768
0070C50F   8BF0                   mov     esi, eax
0070C511   8BC6                   mov     eax, esi
0070C513   8B10                   mov     edx, [eax]* Reference to method TStringList.GetCount()
|
0070C515   FF5214                 call    dword ptr [edx+$14]
0070C518   85C0                   test    eax, eax
0070C51A   7F1A                   jnle    0070C536
0070C51C   6A00                   push    $00
0070C51E   668B0D0CC77000         mov     cx, word ptr [$0070C70C]
0070C525   B201                   mov     dl, $01* Possible String Reference to: '读卡错误，或者未连接读卡器！'
|
0070C527   B818C77000             mov     eax, $0070C718|
0070C52C   E81F0BD3FF             call    0043D050
0070C531   E992010000             jmp     0070C6C8
0070C536   8D4DFC                 lea     ecx, [ebp-$04]
0070C539   33D2                   xor     edx, edx
0070C53B   8BC6                   mov     eax, esi
0070C53D   8B38                   mov     edi, [eax]* Reference to method TStringList.Get(Integer)
|
0070C53F   FF570C                 call    dword ptr [edi+$0C]
0070C542   B201                   mov     dl, $01
0070C544   8BC6                   mov     eax, esi
0070C546   8B08                   mov     ecx, [eax]* Possible reference to virtual method TStringList.OFFS_04
|
0070C548   FF51FC                 call    dword ptr [ecx-$04]
0070C54B   837DFC00               cmp     dword ptr [ebp-$04], +$00
0070C54F   0F845B010000           jz      0070C6B0
0070C555   33D2                   xor     edx, edx* Reference to control TCardWithdrawForm.qryCardAccount : TADOQuery
|
0070C557   8B837C030000           mov     eax, [ebx+$037C]
0070C55D   8B08                   mov     ecx, [eax]* Possible reference to virtual method TADOQuery.OFFS_0178
|
0070C55F   FF9178010000           call    dword ptr [ecx+$0178]* Reference to control TCardWithdrawForm.qryCardAccount : TADOQuery
|
0070C565   8B837C030000           mov     eax, [ebx+$037C]* Reference to: DB.TDataSet.Close(TDataSet);
|
0070C56B   E890C9E3FF             call    00548F00* Reference to control TCardWithdrawForm.qryCardAccount : TADOQuery
|
0070C570   8B837C030000           mov     eax, [ebx+$037C]* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0070C576   E83955E5FF             call    00561AB4
0070C57B   50                     push    eax* Possible String Reference to: 'Select * From dddd Where ttID=''
|
0070C57C   6840C77000             push    $0070C740
0070C581   FF75FC                 push    dword ptr [ebp-$04]
0070C584   68C4C77000             push    $0070C7C4
0070C589   8D45F4                 lea     eax, [ebp-$0C]
0070C58C   BA03000000             mov     edx, $00000003上面是我反编过来的，我要的就是ttID的值是通什么得来的…………
今天得又发现，应该是33020162001100008201  前面多了330201620011

Answer 3

magcard 应该是读卡的过程，加密应该就在主程序里面，