;***********************************************************************
.586
.model flat,stdcall
option casemap:none
;***********************************************************************
include  xlib.inc
;***********************************************************************
.code
start:
pushad
call chaos
db 0B8h
call        @F
                @@:
                pop        ebx
                sub        ebx,offset @B    ;relocation
initX   XFL_MAX, "user32"     
lea eax,szContext[ebx]
lea ecx,szCaption[ebx]
invokex   MessageBoxA,0,eax,ecx,0
popad
jmp begin
szContext db 'xxxx!',0
szCaption db 'xxxx',0
chaos:
inc DWORD ptr[esp]
ret
begin:  ;下面你代码的开始
invokex  ExitProcess,0
end start
;***********************************************************************
以前写的 还在

上传的附件：

• xlib.rar （1.67kb，4次下载）