易经八卦彩票占卜程序.V6.3以前只是追出注册码，这个例子演示了如何利用源反编译代码写注册机，虽然很简单，但是大家看看吧，这个也算交作业了吧，该睡觉了。。。

注册机：
;cr_yj.asm******************************
.386
.model flat,stdcall
option casemap:none
include hd.h
_ProcDlg proto :DWORD,:DWORD,:DWORD,:DWORD 
;->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>data seg
        .data
User      db 80 dup(0)
Serial      db 80 dup(0)
Count      dd 0
adsn dd    0
MsgMesaage1 db "Must input Usernmae  in oder to generate Reg Code! ",0
MsgCap      db "By (C)hume,July,2001",0


        .data?
hInstance  HANDLE ?
        .const
DLG_MAIN equ     1000
IDC_UN     equ     1001
IDC_REG     equ     1002
ID_GEN     equ     1003
ID_EXIT     equ     1004
  ;-->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>code seg
         
        .code
start: 
    invoke    GetModuleHandle,NULL
    mov    hInstance,eax
    invoke    DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlg,0
    invoke    ExitProcess,NULL

_ProcDlg    proc    uses ebx edi esi, \
        hWnd:DWORD,wMsg:DWORD,wParam:DWORD,lParam:DWORD
        
        mov    eax,wMsg
        .if    eax == WM_CLOSE
            invoke    EndDialog,hWnd,NULL
        .elseif    eax == WM_COMMAND
          mov eax,wParam
          .IF lParam!=0
            .if ax==ID_GEN
            invoke RtlZeroMemory,addr User,80
            invoke RtlZeroMemory,addr Serial,80
            invoke GetDlgItemText,hWnd,IDC_UN,addr User,80
                .if eax!=NULL
                mov Count,eax
                call Cal
                invoke SetDlgItemText,hWnd,IDC_REG,addr Serial

                .else
                invoke MessageBox,NULL,addr MsgMesaage1,addr MsgCap,MB_OK or MB_ICONEXCLAMATION

                .endif



                        .elseif ax==ID_EXIT
            invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL
            .endif
            
          .ENDIF
        .else
        mov eax,FALSE
        ret
          .endif
        mov eax,TRUE
        ret
_ProcDlg    ENDP        

Cal        PROC    uses eax ebx
      xor      edx,edx
      mov      ecx,0
      lea      ebx,Serial
      mov      adsn,ebx
 
lopcal:  LEA      EDI,[ECX+01]
      lea      eax,User
      add      eax,ecx
      MOV      BL,[EAX]
      MOVSX    ESI,BL
      MOV      EAX,ESI
      MOV      EBX,4Bh
      IMUL    ESI
      IMUL    ESI
      LEA      EDX,[ECX+01]
      IMUL    EDX,EDI
      SUB      EAX,EDX
      LEA      EDX,[ECX+01]
      IMUL    EDX,ESI
      SUB      EAX,EDX
      INC      ECX
      CDQ   
      XOR      EAX,EDX
      SUB      EAX,EDX
      CDQ   
      IDIV    EBX
      MOV      EAX,EDX
      ADD      AL,30h
      mov      ebx,adsn
      add      ebx,ecx
      dec      ebx
      MOV      [ebx],AL
      inc      ebx
      inc      eax
      CMP      ECX,Count      ;//
      JL      lopcal    ;//比较循环是否结束循环,计算
ToEit:        ret
Cal        endp
;-->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>end all        
    end start
;cr_yj.rc******************************
#include <c:\masm32\include\resource.h>

#define DLG_MAIN      1000
#define IDC_UN          1001
#define IDC_REG          1002
#define ID_GEN          1003
#define ID_EXIT          1004

DLG_MAIN DIALOG 64, 53, 204, 52
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "易经八卦彩票占卜程序.V6.3 Asm Keygen by Hume"
FONT 8, "MS Sans Serif"
{
DEFPUSHBUTTON "GENERATE", ID_GEN, 148, 6, 50, 14
PUSHBUTTON "EXIT", ID_EXIT, 148, 24, 50, 14
EDITTEXT IDC_UN, 52, 10, 78, 12, WS_BORDER | WS_TABSTOP
EDITTEXT IDC_REG, 52, 29, 78, 13, WS_BORDER | WS_TABSTOP
LTEXT "USERNAME:", -1, 8, 12, 40, 10
LTEXT "REG  CODE:", -1, 8, 30, 41, 9
}


附件：
易经八卦彩票占卜程序.V6.3暴力及注册码破解

作　　者：冷雨飘心 humewen@263.net
破解时间：2001-4-23
破解工具：TRW2000 V1.23 Hiew V6.40  W32dasm黄金版
下载地址: http://member.netease.com/~tr/
说    明:彩票软件,比昨天那个丁氏软件强点,至少用了八卦占卜,还算有创意,另外至少
还可以写出注册程序,价格也便宜

一、暴力破解方法:
W32dasm可见:
:004067E1 8B8310030000            mov eax, dword ptr [ebx+00000310]
:004067E7 E860B1FFFF              call 0040194C
:004067EC 84C0                    test al, al
:004067EE 7428                    je 00406818   
  <------------------------------不让它跳即可！
          ^^^^改为9090
:004067F0 A158525100              mov eax, dword ptr [00515258]
:004067F5 6A40                    push 00000040

* Possible StringData Ref from Data Obj ->"提示"
                                  |
:004067F7 B918AA5000              mov ecx, 0050AA18

* Possible StringData Ref from Data Obj ->"恭喜！
注册成功！"
                                  |
:004067FC BA06AA5000              mov edx, 0050AA06
:00406801 8B00                    mov eax, dword ptr [eax]
:00406803 E830F60F00              call 00505E38
:00406808 8BC3                    mov eax, ebx
:0040680A E831000000              call 00406840
:0040680F 8BC3                    mov eax, ebx
:00406811 E8AE010000              call 004069C4
:00406816 EB18                    jmp 00406830

* Referenced by a (U)nconditional or (C)onditional Jump at Address:
|:004067EE(C)
|
:00406818 A158525100              mov eax, dword ptr [00515258]
:0040681D 6A10                    push 00000010

* Possible StringData Ref from Data Obj ->"错误"
                                  |
:0040681F B947AA5000              mov ecx, 0050AA47

* Possible StringData Ref from Data Obj ->"对不起，用户名和注册码不匹配。
注册失败！"
                                  |
:00406824 BA1DAA5000              mov edx, 0050AA1D
:00406829 8B00                    mov eax, dword ptr [eax]
:0040682B E808F60F00              call 00505E38
但修改后，每次运行都要注册一次,很烦,估计还有陷阱,每次启动时还要检查,故祭出
trw2000动态跟踪,发现实际上是调用yijing.dll进行注册码计算追踪过程
:004019FB FFD3                    call ebx//调用yijing.dll
//的wackywooky函数
:004019FD 85C0                    test eax, eax
:004019FF 0F95C0                  setne al//置标志
:00401A02 83E001                  and eax, 00000001
:00401A05 8BD8                    mov ebx, eax
//因此:   
4019ff setnz al=>setz al
hiew 0fff:0f95c0-->0f94c0
注册码随便输,只要不是正确的,即可,(正确的概率象中5,000,000嘿嘿)

二、注册码查找
在:004019FB FFD3                    call ebx处追入
GO,to here:

0167:013012AF  CALL    01302738
0167:013012B4  POP      ECX
0167:013012B5  CMP      ESI,EAX
0167:013012B7  JZ      013012C0
//比较用户名和序列号的个数若相等,则进一步比较,否则
跳走,你就什么也看不到了!退出填入相同个数的用户名和密码
我的是用户名:812153
以下是注册码生成全过程,由于没有时间,所以不写注册机,go on
0167:013012B9  XOR      EAX,EAX
0167:013012BB  JMP      0130138A
0167:013012C0  PUSH    EBX
0167:013012C1  CALL    01302738
0167:013012C6  POP      ECX
0167:013012C7  MOV      [EBP-08],EAX
0167:013012CA  MOV      EDX,[EBP-08]
0167:013012CD  INC      EDX
0167:013012CE  PUSH    EDX
0167:013012CF  CALL    013015C8
0167:013012D4  POP      ECX
0167:013012D5  MOV      [EBP-04],EAX
0167:013012D8  MOV      EAX,[EBP+0C]
0167:013012DB  MOV      ECX,[EBP-04]
0167:013012DE  MOV      EDI,EAX
0167:013012E0  XOR      EAX,EAX
0167:013012E2  MOV      ESI,ECX
0167:013012E4  OR      ECX,BYTE -01
0167:013012E7  REPNE SCASB
0167:013012E9  NOT      ECX
0167:013012EB  SUB      EDI,ECX
0167:013012ED  MOV      EDX,ECX
0167:013012EF  XCHG    ESI,EDI
0167:013012F1  SHR      ECX,02
0167:013012F4  MOV      EAX,EDI
0167:013012F6  REP MOVSD
0167:013012F8  MOV      ECX,EDX
0167:013012FA  AND      ECX,BYTE +03
0167:013012FD  REP MOVSB
0167:013012FF  MOV      EAX,[EBP-04]
0167:01301302  XOR      ECX,ECX
0167:01301304  MOV      EDX,EAX
0167:01301306  MOV      EAX,EBX
0167:01301308  MOV      [EBP-14],EDX
0167:0130130B  MOV      [EBP-10],EAX
0167:0130130E  MOV      EDX,[EBP-08]
0167:01301311  CMP      ECX,EDX
0167:01301313  JNL      01301360          //开始注意了
0167:01301315  MOV      EAX,[EBP-10]
0167:01301318  LEA      EDI,[ECX+01]
0167:0130131B  MOV      BL,[EAX]
0167:0130131D  MOVSX    ESI,BL
0167:01301320  MOV      EAX,ESI
0167:01301322  MOV      EBX,4B
0167:01301327  IMUL    ESI
0167:01301329  IMUL    ESI
0167:0130132B  LEA      EDX,[ECX+01]
0167:0130132E  IMUL    EDX,EDI
0167:01301331  SUB      EAX,EDX
0167:01301333  LEA      EDX,[ECX+01]
0167:01301336  IMUL    EDX,ESI
0167:01301339  SUB      EAX,EDX
0167:0130133B  INC      ECX
0167:0130133C  MOV      [EBP-0C],EAX
0167:0130133F  MOV      EAX,[EBP-0C]
0167:01301342  CDQ   
0167:01301343  XOR      EAX,EDX
0167:01301345  SUB      EAX,EDX
0167:01301347  CDQ   
0167:01301348  IDIV    EBX
0167:0130134A  MOV      EAX,EDX
0167:0130134C  MOV      EDX,[EBP-14]
0167:0130134F  ADD      AL,30
0167:01301351  MOV      [EDX],AL
0167:01301353  INC      DWORD [EBP-14]
0167:01301356  INC      DWORD [EBP-10]
0167:01301359  MOV      EAX,[EBP-08]
0167:0130135C  CMP      ECX,EAX      //
0167:0130135E  JL      01301315    //比较循环是否结束循环,计算
0167:01301360  MOV      EAX,[EBP-04]
0167:01301363  MOV      EDX,[EBP+0C]
0167:01301366  MOV      CL,[EAX]----//[EAX],指向注册码
//d eax ----->kFYn<9,很奇怪,但就是他!
0167:01301368  CMP      CL,[EDX]
0167:0130136A  JNZ      01301388
可以bpx 01301368 do "d eax"取得注册码,不用写注册机,注意如果一次注册成功,下次
将无法注册,是因为在注册表里作了手脚:查找yijing,你发现什么,不要犹豫,删之!
(用户名和密码要相同长度)
推荐注册码:用户名:1
        序列号:z

昨天晚上没有详细写出，今天补上，希望对初学者有所帮助
第一步：注册算法分析，关键部分如下：
0167:01301313  JNL      01301360    ****->      开始注意了，以下为注册码计算部分
0167:01301315  MOV      EAX,[EBP-10]****->顺序取取注册名每个字母
0167:01301318  LEA      EDI,[ECX+01]****->初始化EDI，1，以后顺序加1，设为n（n=1,2...)
0167:0130131B  MOV      BL,[EAX]
0167:0130131D  MOVSX    ESI,BL
0167:01301320  MOV      EAX,ESI    ****->ESI=EDI=取出注册名 设为X
0167:01301322  MOV      EBX,4B
0167:01301327  IMUL    ESI
0167:01301329  IMUL    ESI        ****->X三次方
0167:0130132B  LEA      EDX,[ECX+01]
0167:0130132E  IMUL    EDX,EDI   
0167:01301331  SUB      EAX,EDX   
0167:01301333  LEA      EDX,[ECX+01] ****->减n平方
0167:01301336  IMUL    EDX,ESI
0167:01301339  SUB      EAX,EDX      ****->减n*X
0167:0130133B  INC      ECX
0167:0130133C  MOV      [EBP-0C],EAX
0167:0130133F  MOV      EAX,[EBP-0C]
0167:01301342  CDQ   
0167:01301343  XOR      EAX,EDX  ****-> 与0 XOR     
0167:01301345  SUB      EAX,EDX
0167:01301347  CDQ   
0167:01301348  IDIV    EBX
0167:0130134A  MOV      EAX,EDX    ****->除0x4b，取余送eax
0167:0130134C  MOV      EDX,[EBP-14]
0167:0130134F  ADD      AL,30      ****->加0x30
0167:01301351  MOV      [EDX],AL  ****->保存
0167:01301353  INC      DWORD [EBP-14]
0167:01301356  INC      DWORD [EBP-10]
0167:01301359  MOV      EAX,[EBP-08]
0167:0130135C  CMP      ECX,EAX     
0167:0130135E  JL      01301315    ****->循环处理每一个字母

第二步：构造GUI接口，以后写注册机可以用它作为模板
;cr_yj.rc******************************
#include <c:\masm32\include\resource.h>

#define DLG_MAIN      1000
#define IDC_UN          1001
#define IDC_REG          1002
#define ID_GEN          1003
#define ID_EXIT          1004

DLG_MAIN DIALOG 64, 53, 204, 52
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "易经八卦彩票占卜程序.V6.3 Asm Keygen by Hume"
FONT 8, "MS Sans Serif"
{
DEFPUSHBUTTON "GENERATE", ID_GEN, 148, 6, 50, 14
PUSHBUTTON "EXIT", ID_EXIT, 148, 24, 50, 14
EDITTEXT IDC_UN, 52, 10, 78, 12, WS_BORDER | WS_TABSTOP
EDITTEXT IDC_REG, 52, 29, 78, 13, WS_BORDER | WS_TABSTOP
LTEXT "USERNAME:", -1, 8, 12, 40, 10
LTEXT "REG  CODE:", -1, 8, 30, 41, 9
}
;hd.h****************************************head include files
    include c:\masm32\include\windows.inc
    include c:\masm32\include\user32.inc
    include c:\masm32\include\kernel32.inc
    include c:\masm32\include\gdi32.inc
    include c:\masm32\include\comctl32.inc
    include c:\masm32\include\comdlg32.inc
    include c:\masm32\include\shell32.inc

    includelib c:\masm32\lib\user32.lib
    includelib c:\masm32\lib\kernel32.lib
    includelib c:\masm32\lib\gdi32.lib
    includelib c:\masm32\lib\comctl32.lib
    includelib c:\masm32\lib\comdlg32.lib
    includelib c:\masm32\lib\shell32.lib
;cr_yj.asm******************************
.386
.model flat,stdcall
option casemap:none
include hd.h
_ProcDlg proto :DWORD,:DWORD,:DWORD,:DWORD 
;->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>data seg
        .data
User      db 80 dup(0)
Serial      db 80 dup(0)
Count      dd 0
adsn dd    0
MsgMesaage1 db "Must input Usernmae  in oder to generate Reg Code! ",0
MsgCap      db "By (C)hume,July,2001",0


        .data?
hInstance  HANDLE ?
        .const
DLG_MAIN equ    1000
IDC_UN    equ    1001
IDC_REG    equ    1002
ID_GEN    equ    1003
ID_EXIT    equ    1004
  ;-->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>code seg
         
        .code
start: 
    invoke    GetModuleHandle,NULL
    mov    hInstance,eax
    invoke    DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlg,0
    invoke    ExitProcess,NULL

_ProcDlg    proc    uses ebx edi esi, \
        hWnd:DWORD,wMsg:DWORD,wParam:DWORD,lParam:DWORD
       
        mov    eax,wMsg
        .if    eax == WM_CLOSE
            invoke    EndDialog,hWnd,NULL
        .elseif    eax == WM_COMMAND
          mov eax,wParam
          .IF lParam!=0 
            .if ax==ID_GEN                ;generate按钮按下时的处理
            invoke RtlZeroMemory,addr User,80
            invoke RtlZeroMemory,addr Serial,80
            invoke GetDlgItemText,hWnd,IDC_UN,addr User,80
                .if eax!=NULL
                mov Count,eax
                call Cal                  ;注册码生成子程序
                invoke SetDlgItemText,hWnd,IDC_REG,addr Serial

                .else
                invoke MessageBox,NULL,addr MsgMesaage1,addr MsgCap,MB_OK or MB_ICONEXCLAMATION                        ;错误处理
                .endif

            .elseif ax==ID_EXIT
            invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL
            .endif
           
          .ENDIF
        .else
        mov eax,FALSE
        ret
          .endif
        mov eax,TRUE
        ret
_ProcDlg    ENDP       


第三步：拷贝这部分代码，去掉前面的地址,构造Cal子程序：
稍微修改一下这部分代码，使之能够从数据部分取数，计算注册码，小写代码为改动部分

Cal        PROC    uses eax ebx
      xor      edx,edx
      mov      ecx,0
      lea      ebx,Serial
      mov      adsn,ebx
 
lopcal:  LEA      EDI,[ECX+01]
      lea      eax,User
      add      eax,ecx
      MOV      BL,[EAX]
      MOVSX    ESI,BL
      MOV      EAX,ESI
      MOV      EBX,4Bh
      IMUL    ESI
      IMUL    ESI
      LEA      EDX,[ECX+01]
      IMUL    EDX,EDI
      SUB      EAX,EDX
      LEA      EDX,[ECX+01]
      IMUL    EDX,ESI
      SUB      EAX,EDX
      INC      ECX
      CDQ   
      XOR      EAX,EDX
      SUB      EAX,EDX
      CDQ   
      IDIV    EBX
      MOV      EAX,EDX
      ADD      AL,30h
      mov      ebx,adsn
      add      ebx,ecx
      dec      ebx
      MOV      [ebx],AL
      inc      ebx
      inc      eax
      CMP      ECX,Count 
      JL      lopcal    ;//比较循环是否结束循环,计算
ToEit:        ret
Cal        endp
;-->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>end all       
    end start
第四步：编译，我用MASM32 V6编译，如果环境不同路径需要作部分修改
;mk.bat
cls
c:\masm32\bin\ml /c /coff /Cp  yj.asm
rc /v yj.rc
c:\masm32\bin\link /SUBSYSTEM:WINDOWS /LIBPATH:c:\masm32\lib yj.obj yj.res

第五步：享受成果，编译文件只有3k，没有进行压缩处理，执行速速飞快，win界面，dos界面总使人感觉与时代脱节，注册机在本人机器上运行正常，不知程序是否有BUG？调试真是比破解还累啊
第六步：总结
本人实在菜鸟一个，告诉菜鸟们一个秘诀，拿简单的开刀，使自己也变成老鸟！

付诗几句：
人生得意须尽欢，莫使金樽空对月！
仰天大笑出门去，我辈岂是蓬蒿人！

                    Hume，10/7,2001

#include <stdio.h>
#include <string.h>
main()
{
    char name[80];
    register int i;
    long int tmp;
    printf("****************************************\n");
    printf("*YiJIng Lottery Program Key_Gen by hume*\n");
    printf("****************************************\n");
    printf("Please input your register name:");
    gets(name);
    printf("\nYour register Code Is:");
    for (i=0;i<strlen(name);i++ )
    {tmp=name[i];
    tmp=((tmp*tmp*tmp-(i+1)*(i+1)-(i+1)*tmp)%0x4b+0x30);
    printf("%c",(char)tmp);
    }


}