Modification.Win32.BlueBall.4117病毒演示
2008-04-09 04:00:02来源:互联网 阅读 ()
Author: whg
Email: whg@whitecell.org
Homepage:http://www.whitecell.org
.586p
.model flat,STDCALL ;汇编框架定义
MyMemFlag EQU 000
VirusSum EQU 2047 ;小球个数
OFF EQU OFFSET
L EQU LARGE
MyMemory struc ;小球的位置数组结构
XXYY dd VirusSum*2 dup(?)
PosXY dd VirusSum*2 dup(?)
MyMemory ends
.data
hDC dd ?
hBrush dd ?
Static dd 1234 ;初始随机数变量
Msg1 db 'Virus Demo---Win32.Cxdz.4117',0
Msg0 db 'Modification.Win32.BlueBall.4117 Virus Demo',0
.code
extrn GlobalAlloc: proc
extrn ExitProcess: proc
extrn MessageBoxA: proc
extrn GetWindowDC: proc
extrn Ellipse: proc
extrn CreateSolidBrush: proc
extrn SelectObject: proc ;要用到的win32 API函数
start:
call MessageBoxA,L 0,OFF Msg0,L OFF Msg1,L 0 ; 提示,开始演示
@@display_msg:
call GlobalAlloc,L MyMemFlag,L size MyMemory;申请一块内存
mov edi,eax
call CreateSolidBrush,L 00800000h;创建一个蓝色的画刷
mov [hBrush],eax
@@Timer_1:
call GetWindowDC,L 0;得到Window DC
mov [hDC],eax
call SelectObject,eax,[hBrush];选入DC
mov ebp,esi
push esi
push edi
lea esi,[edi.XXYY]
lea edi,[edi.PosXY]
mov ecx,VirusSum
@@timer_0:
push ecx
call @@Rnd ;产生随机数
call @@Value ;将随机数转化为小球的运动方向,沿X轴
mov eax,[edi]
mov ebx,[esi]
add eax,ebx
call @@LimitX ;限制小球的运动范围,不能超过屏幕!
mov [edi],eax
add esi,4
add edi,4
call @@Rnd ;产生随机数
call @@Value ;将随机数转化为小球的运动方向,沿Y轴
mov eax,[edi]
mov ebx,[esi]
add eax,ebx
call @@LimitY ;限制小球的运动范围,不能超过屏幕!
mov [edi],eax
add esi,4
add edi,4
mov ebx,[edi-8]
mov edx,[edi-4]
push edx
push ebx
add ebx,10
add edx,10
push edx
push ebx
call Ellipse,[hDC];画出小球
pop ecx
loop @@timer_0 ;继续画,共画2047个
pop edi
pop esi
jmp @@Timer_1 ;继续画,死循环
@@Rnd:
push ebx
push edx
mov eax,[Static];取随机数种子
mov ebx,8191 ;乘以2的12次方-1, 8191是个素数!
;产生随机数的带换公式:
;Rnd(n 1)=(Rnd(n)*A B) MOD C
;经理论研究认为:
;A,C都应该为素数,那么随机数产生的个数为最大=C,即最为随机!
;这须要我们设置好A,B,C的值
;我们可以认为2的奇次方减一都是素数,例如: 7,21,127,1023....
;所以,我取C=7fffffffh=2**31-1;A=8191=2**13-1
mul ebx
add eax,1023
mov ebx,7fffffffh
xor edx,edx
div ebx
mov [Static],edx ;保存Rnd(n),作为下一次机算用的Rnd(n-1)
mov eax,edx
pop edx
pop ebx
ret
@@Value:
cmp eax,20000000h
ja short @@Value_0
mov dword ptr [esi],1;向正方向移动
ret
@@Value_0:
cmp eax,40000000h
ja short @@Value_1
mov dword ptr [esi],-1;向负方向移动
ret
@@Value_1:
ret ;不改变移动方向
@@LimitX:
cmp eax,800 ;800*600
jG short @@LimitX_0
cmp eax,0
jL short @@LimitX_1
ret
@@LimitX_0:
mov eax,0
mov dword ptr[esi],1;超出屏幕显示区,修改移动方向
ret
@@LimitX_1:
mov eax,800
mov dword ptr[esi],-1;超出屏幕显示区,修改移动方向
ret
@@LimitY:
cmp eax,600;800*600
jG short @@LimitY_0;超出屏幕显示区,修改移动方向
cmp eax,0
jL short @@LimitY_1;超出屏幕显示区,修改移动方向
ret
@@LimitY_0:
mov eax,0
mov dword ptr[esi],1;超出屏幕显示区,修改移动方向
ret
@@LimitY_1:
mov eax,600
mov dword ptr[esi],-1;超出屏幕显示区,修改移动方向
ret
end start
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash