首页
社区
课程
招聘
[原创]突发奇想!让windows不再windows
发表于: 2009-3-27 12:55 25736

[原创]突发奇想!让windows不再windows

2009-3-27 12:55
25736

希望不要随便利用:汇编代码(附件是演示的程序,最多两分钟后会安全返回)
*****************************************************************
.386
.model flat,stdcall
option casemap:none
;****************************************************************
include  windows.inc
include  kernel32.inc
includelib  kernel32.lib
include  user32.inc
includelib  user32.lib
;****************************************************************
.data?
hwnd dd ?
hwdesk dd ?
mesg  MSG <>
.const
szClassName        db        'Progman',0
szCaptionMain        db        'Program Manager',0
;****************************************************************
.code
start:
   invoke FindWindow,addr szClassName,addr szCaptionMain
   mov hwdesk,eax
   invoke SetTimer,NULL,1,500,0
   .while 1
   invoke GetMessage,addr mesg,NULL,0,0
    .if mesg.message==WM_TIMER
    invoke GetForegroundWindow
     .if eax!=hwdesk
       mov hwnd,eax
       invoke IsWindowVisible, hwnd     
         .if eax
      invoke ShowWindow,hwnd,SW_HIDE
         .endif
     .endif
    .endif
    .endw
    invoke KillTimer,NULL,1
    invoke ExitProcess,NULL
end start
;****************************************************************


[培训]内核驱动高级班,冲击BAT一流互联网大厂工作,每周日13:00-18:00直播授课

上传的附件:
收藏
免费 7
支持
分享
最新回复 (63)
雪    币: 71
活跃值: (10)
能力值: ( LV3,RANK:20 )
在线值:
发帖
回帖
粉丝
2
呵呵,果然很好玩,搞搞恶作剧还是不错的
2009-3-27 14:10
0
雪    币: 140
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
是让当前窗口隐藏吧,呵呵,可以娱乐一下别人
2009-3-27 16:58
0
雪    币: 370
活跃值: (52)
能力值: ( LV13,RANK:350 )
在线值:
发帖
回帖
粉丝
4
是的 虽然很简单 如果利用不当可是效果是可怕
2009-3-27 17:36
0
雪    币: 104
活跃值: (72)
能力值: ( LV2,RANK:15 )
在线值:
发帖
回帖
粉丝
5
标记一下一会儿来学习~
2009-3-27 19:35
0
雪    币: 105
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
6
两分钟时限在哪儿?
2009-3-27 19:51
0
雪    币: 105
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
start:
  invoke FindWindow,addr szClassName,addr szCaptionMain ; 查找桌面窗口句柄
  mov hwdesk,eax
  invoke SetTimer,NULL,1,500,0 ; 启动定时器,500毫秒发送一次WM_TIMER消息
  .while 1 ; 无限循环?
    invoke GetMessage,addr mesg,NULL,0,0
    .if mesg.message==WM_TIMER ; 如是定时器消息
      invoke GetForegroundWindow ; 获取当前活动窗口句柄
      .if eax!=hwdesk ; 如果不是桌面窗口句柄
        mov hwnd,eax
        invoke IsWindowVisible, hwnd 
        .if eax ;如果当前窗口可见,则隐藏当前窗口
          invoke ShowWindow,hwnd,SW_HIDE
        .endif
      .endif
    .endif
  .endw ; 何时运行到这儿?
  invoke KillTimer,NULL,1
  invoke ExitProcess,NULL
end start
2009-3-27 19:58
0
雪    币: 370
活跃值: (52)
能力值: ( LV13,RANK:350 )
在线值:
发帖
回帖
粉丝
8
贴的这个不是演示程序的源码了 演示程序到了时限就会退出的 贴的这个就只有重启了 如果再加个自动启动什么的。。。。。。。 所以啊 希望不要随便乱用了嘛
2009-3-27 20:29
0
雪    币: 210
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
9
膜拜一下,的确比较牛。。。
2009-3-27 22:22
0
雪    币: 293
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
10
谢谢共享!有意思的很!
2009-3-27 22:36
0
雪    币: 212
活跃值: (47)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
呵呵 做个记号 好玩
2009-3-27 22:37
0
雪    币: 201
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
学习一下  下下来玩一玩
2009-3-28 01:45
0
雪    币: 200
活跃值: (16)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
13
用了之后所有激活的窗口都会关闭。
Vista sp2 RTM escrow下面打开开始菜单后开始菜单消失,但是最终恢复之后会有开始菜单右侧的阴影无法消除,一直在屏幕上,只有重启了。
2009-3-28 15:55
0
雪    币: 222
活跃值: (10)
能力值: ( LV6,RANK:90 )
在线值:
发帖
回帖
粉丝
14
关注下,挺不错的思想
2009-3-28 21:17
0
雪    币: 100
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
15
楼主再继续发挥一下,有可能想出更多更好的东西来。
2009-3-28 21:41
0
雪    币: 362
活跃值: (25)
能力值: ( LV7,RANK:100 )
在线值:
发帖
回帖
粉丝
16
很有意思,顶一下。
2009-4-7 17:52
0
雪    币: 112
活跃值: (51)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
17
有想法
,,,
2009-4-10 13:23
0
雪    币: 148
活跃值: (12)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
18
重启“Windows Explorer”也不行吗?
2009-4-10 13:27
0
雪    币: 204
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
19
上高中的时候,就看过类似的恶作剧代码
2009-4-10 15:43
0
雪    币: 210
活跃值: (25)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
20
确实不错,不过为什么任务管理器的窗口可以正常显示?故意留的?代码里面没看到啊。。
2009-4-15 11:56
0
雪    币: 210
活跃值: (25)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
21
虚拟机环境下试的,没在物理主机上试过。。。
2009-4-15 11:57
0
雪    币: 7115
活跃值: (639)
能力值: (RANK:1290 )
在线值:
发帖
回帖
粉丝
22
..... 不错的恶作剧软件。。。
2009-4-15 17:54
0
雪    币: 201
活跃值: (31)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
23
颇有创意的代码。呵呵
2009-4-16 09:40
0
雪    币: 8
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
24
呵呵 还真好玩!
2009-5-29 10:48
0
雪    币: 238
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
25
确实,我的跟你一样
2009-5-29 11:46
0
游客
登录 | 注册 方可回帖
返回
//