2024年3月27日发(作者：)
竭诚为您提供优质文档/双击可除
愚人节整人代码
篇一：整人病毒代码
前段时间看到大家对这种整人的代码兴趣还挺浓厚的，
我最近就收集了一些和大家分享。ps：由于精力问题没有对
代码的可用性进行一一验证，所以不保证全部可用，大家如
果发现有不可用的或者需要改进的地方请提出来，以下代码
仅供娱乐，请勿用于非法用途。一、怎么点都没反应的桌面
如果同事的电脑开着，他离开电脑前一会，嘿嘿，机会
来了。
把他的电脑桌面按print键截屏截下来，（当然QQ截屏
也可以，不过效果不太逼真！）建议大家用print截屏，设
置为桌面。
然后把原来在桌面上的文件统统移到一个盘的文件夹
里，这样桌面看上去和平时一个样。他回来后狂点鼠标，却
怎么都没有反应！现在还在关机,开机,关机,开机,关机,开
1 20
机中
附带：print键截屏方法：
键盘右上方的“printscreensysRq”键的作用是屏幕抓
图！
用法一，按“printscreensysRq”一下，对当前屏幕进
行抓图，就是整个显示屏的内容。
用法二，先按住“Alt”键，再按“printscreensysRq”
键，则是对当前窗口进行抓图。如你打开“我的电脑”后，
用此法就抓取“我的电脑”窗口的内容。
用上诉两种方法抓图后，再打开“开始”、“附件”里的
“画图”程序，点“编辑”、“粘贴”就把抓取的图片贴出来
了，可以保存为自己需要的格式。
哈哈，简单吧，这方法真挺搞的，有兴趣的童鞋可以试
试！
二、让电脑硬盘消失－隐藏磁盘方法
愚人节电脑整人使无端端地电脑磁盘的某个分区消失
了，钻进地缝里面去了吗，给外星人抓走了？？非也！是某
些人使坏将其隐藏起来了！
步骤
1.新建一个记事本
2.将记事本的后缀改为.reg，就是将“新建文件.txt”
改为“新建文件.reg”
2 20
3.将下面的代码复制到记事本当中：
windowsRegistryeditorVersion5.00
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]"noDrives"=hex:08,00,00
,00
解释
（1）"noDrives"=hex:08,00,00,00这个键值是隐藏D
盘的
图中的D盘已经神秘消失了。
（2）
A=01000000b=02000000c=04000000D=08000000e=10000000
F=20000000g=40000000h=80000000I=00010000J=00020000K
=00040000
原理介绍：二进制值“noDrives”的缺省值均是
00,00,00,00，表示不隐藏任何驱动器。键值由四个字节组
成，每个字节的每一位(bit)对应从A:到Z:的一个盘，当相
应位为1时，
“我的电脑”中相应的驱动器就被隐藏了。第一个字节
代表从A到h的8个盘，即01为A，02为b，04为c??依次
类推，第二个字节代表I到p，第三个字节代表Q到x，第
3 20
四个字节代表Y和Z。比如要关闭c盘，将键值改为
04,00,00,00;要关闭D盘，则改为08,00,00,00，若要关闭
c盘和D盘，则改为0c,00,00,00(c是十六进制，转成十进
制就是12)。
理解了原理后，下面以笔者的电脑为例说明如何操作：
笔者的电脑有一个软驱、一个硬盘(5个分区)、一个光驱，
盘符分布是这样的：A:(3.5软盘)、c:、D:、e:、F:、g:、
h:(光盘)，所以我的“noDrives”值为“02ffffff”，隐藏
了b、I到Z盘。
还原方法
1.点击开始--运行，如图，在运行对话框中输入
“regedit”，打开注册表编辑器。2.依次打开
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]，将右侧窗口中"noDrives"
这个子键删除。
3.重新启动电脑。
三、空空的桌面
电脑桌面是用户最熟悉不过的了，电脑整人方法电脑启
动之后首先呈现的就是桌面了，如果在愚人节你把你朋友的
桌面给hack掉了话，你的朋友是不是会发疯啊？
桌面是用户操作电脑首先进入的界面，电脑桌面空空如
4 20
也，一望无垠的时候，你是否很无奈？原来这一切都是它在
作怪！
如图整人后桌面清清爽爽，什么都没有！
方法步骤
1.新建一个记事本
2.将记事本的后缀改为.reg，就是将“新建文件.txt”
改为“桌面.reg”
3.将下面的代码复制到记事本当中：
windowsRegistryeditorVersion5.00
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]"noDesktop"=dword:00000
001
"nosetTaskbar"=dword:00000001
解释：(1)"noDesktop"=dword:00000001这个键值是屏
蔽桌面的；
(2)"nosetTaskbar"=dword:00000001这个键值是禁用
“任务栏属性”功能。
将信息导入到注册表之后，桌面图标、桌面右键、桌面
属性的功能都被禁用了。
还原方法：
1.点击开始--运行，如图，在运行对话框中输入
5 20
“regedit”，打开注册表编辑器。2依次打开
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]，将右侧窗口中
“noDesktop”、“nosetTaskbar”这两个子键删除。
四、让天使替我说我爱你
createobject("e").speak"iloveyou"
送给你女朋友她会高兴地，保存为.vbs格式
五、打开无数个计算器
setwsh=createobject("")
do
"calc"
loop
这段代码是打开无数个计算器，直到死机,也是保存
为.vbs格式
六、你被耍了
while(1)
msgbox"哈哈你被耍了！"
loop
这段代码就比较坏了,一直弹出窗口显示"哈哈,你被刷
了!"要是你不会结束它,只好重启电脑了,也是保存为.vbs
格式
6 20
七、甩不掉的魔鬼
("嘿，谢谢你打开我哦，我等你很久拉！
"打开记事本
ivate("无标题-记事本")=false
1000
loop
str="wokao1!ni1youmeiyou1gaocuo1!"这一行是演示
中文输入。定义要打字的字符串。只能是英文或数字或符号。
如果想输入中文请把下2行的注释去掉。否则就在前面
加上注释符号“”(不带引号)并在str中输入按键的过程如：
想输入“气死我了”就写qisiwole1
ys"^"
解释上一行：呼唤中文输入法
fori=0tolen(str)-1
a=mid(str,i+1,1)
ysa发送虚拟按键
500打字速度。数值越小越快。
next
save=1如想保存则写1
ifsave=1then
ys"^"
解释上一行：关闭中文输入法。如果是中文，则必须去
7 20
掉上一行的注释。
ys"^s"
300
ys"c:"文件名(可写路径)，必须是
英文。如果是中文模式，则必须将其关闭
篇二：整人“病毒”代码(一)
发表于20XX-10-2310:33
前段时间看到大家对这种整人的代码兴趣还挺浓厚的，
我最近就收集了一些和大家分享。
ps：由于精力问题没有对代码的可用性进行一一验证，
所以不保证全部可用，大家如果发现有不可用的或者需要改
进的地方请提出来，以下代码仅供娱乐，请勿用于非法用途。
一、怎么点都没反应的桌面
如果同事的电脑开着，他离开电脑前一会，嘿嘿，机会
来了。
把他的电脑桌面按print键截屏截下来，（当然QQ截屏
也可以，不过效果不太逼真！）建议大家用print截屏，设
置为桌面。
然后把原来在桌面上的文件统统移到一个盘的文件夹
里，这样桌面看上去和平时一个样。他回来后狂点鼠标，却
怎么都没有反应！现在还在关机,开机,关机,开机,关机,开
机中
8 20
附带：print键截屏方法：
键盘右上方的“printscreensysRq”键的作用是屏幕抓
图！
用法一，按“printscreensysRq”一下，对当前屏幕进
行抓图，就是整个显示屏的内容。
用法二，先按住“Alt”键，再按“printscreensysRq”
键，则是对当前窗口进行抓图。如你打开“我的电脑”后，
用此法就抓取“我的电脑”窗口的内容。
用上诉两种方法抓图后，再打开“开始”、“附件”里的
“画图”程序，点“编辑”、“粘贴”就把抓取的图片贴出来
了，可以保存为自己需要的格式。哈哈，简单吧，这方法真
挺搞的，有兴趣的童鞋可以试试！
二、让电脑硬盘消失－隐藏磁盘方法
愚人节电脑整人使无端端地电脑磁盘的某个分区消失
了，钻进地缝里面去了吗，给外星人抓走了？？非也！是某
些人使坏将其隐藏起来了！
步骤
1.新建一个记事本
2.将记事本的后缀改为.reg，就是将“新建文件.txt”
改为“新建文件.reg”
3.将下面的代码复制到记事本当中：
windowsRegistryeditorVersion5.00
9 20
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]
"noDrives"=hex:08,00,00,00
解释
（1）"noDrives"=hex:08,00,00,00这个键值是隐藏D
盘的
图中的D盘已经神秘消失了。
（2）
A=01000000b=02000000c=04000000D=08000000e=10000000F
=20000000g=40000000h=80000000I=00010000J=00020000K=
00040000原理介绍：二进制值“noDrives”的缺省值均是
00,00,00,00，表示不隐藏任何驱动器。键值由四个字节组
成，每个字节的每一位(bit)对应从A:到Z:的一个盘，当相
应位为1时，“我的电脑”中相应的驱动器就被隐藏了。第
一个字节代表从A到h的8个盘，即01为A，02为b，04
为c??依次类推，第二个字节代表I到p，第三个字节代表Q
到x，第四个字节代表Y和Z。比如要关闭c盘，将键值改
为04,00,00,00;要关闭D盘，则改为08,00,00,00，若要关
闭c盘和D盘，则改为0c,00,00,00(c是十六进制，转成十
进制就是12)。
理解了原理后，下面以笔者的电脑为例说明如何操作：
10 20
笔者的电脑有一个软驱、一个硬盘(5个分区)、一个光驱，
盘符分布是这样的：A:(3.5软盘)、c:、D:、e:、F:、g:、
h:(光盘)，所以我的“noDrives”值为“02ffffff”，隐藏
了b、I到Z盘。
还原方法
1.点击开始--运行，如图，在运行对话框中输入
“regedit”，打开注册表编辑器。
2.依次打开
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]，将右侧窗口中"noDrives"
这个子键删除。
3.重新启动电脑。
三、空空的桌面
电脑桌面是用户最熟悉不过的了，电脑整人方法电脑启
动之后首先呈现的就是桌面了，如果在愚人节你把你朋友的
桌面给hack掉了话，你的朋友是不是会发疯啊？
桌面是用户操作电脑首先进入的界面，电脑桌面空空如
也，一望无垠的时候，你是否很无奈？原来这一切都是它在
作怪！
如图整人后桌面清清爽爽，什么都没有！
方法步骤
11 20
1.新建一个记事本
2.将记事本的后缀改为.reg，就是将“新建文件.txt”
改为“桌面.reg”
3.将下面的代码复制到记事本当中：
windowsRegistryeditorVersion5.00
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpolicies
explorer]
"noDesktop"=dword:00000001
"nosetTaskbar"=dword:00000001
解释：(1)"noDesktop"=dword:00000001这个键值是屏
蔽桌面的；
(2)"nosetTaskbar"=dword:00000001这个键值是禁用
“任务栏属性”功能。将信息导入到注册表之后，桌面图标、
桌面右键、桌面属性的功能都被禁用了。还原方法：
1.点击开始--运行，如图，在运行对话框中输入
“regedit”，打开注册表编辑器。
2依次打开
[hKeY_cuRRenT_useRsoftwaremicrosoftwindowscurre
ntVersionpoliciesexplorer]，将右侧窗口中
12 20
“noDesktop”、“nosetTaskbar”这两个子键删除。
四、让天使替我说我爱你
createobject("e").speak"iloveyou"
送给你女朋友她会高兴地，保存为.vbs格式
五、打开无数个计算器
setwsh=createobject("")
do
"calc"
loop
这段代码是打开无数个计算器，直到死机,也是保存
为.vbs格式
六、你被耍了
while(1)
msgbox"哈哈你被耍了！"
loop
这段代码就比较坏了,一直弹出窗口显示"哈哈,你被刷
了!"要是你不会结束它,只好重启电脑了,也是保存为.vbs
格式
七、甩不掉的魔鬼
("嘿，谢谢你打开我哦，我等你很久拉！
"打开记事本
ivate("无标题-记事本")=false
13 20
1000
loop
str="wokao1!ni1youmeiyou1gaocuo1!"这一行是演示
中文输入。定义要打字的字符串。只能是英文或数字或符号。
如果想输入中文请把下2行的注释去掉。否则就在前面
加上注释符号“”(不
篇三：愚人节捉弄人小程序
第一个:让别人内存oVeR(逼他重启)
@echooff
startcmd
%0
就这3行了
打开“开始→程序→附件→记事本”，把代码部分复制
进去，点“另存为”，路径选“你想要放的地方”，保存类型
为“所有文件”，文件名为“你想要的名字.bat”，你的批量
处理器就完成了。
第二个:让对方重启指定次数(害人专用)
@echooff
ifnotexistc:o.>c:&gotoerr1
ifnotexistc:o.>c:&gotoerr1
ifnotexistc:o.>c:&gotoerr1
ifnotexistc:o.>c:&gotoerr1
14 20
ifnotexistc:o.>c:&goto(转载自：博旭
范文网:愚人节整人代码)err1
gotoerr2
:err1
shutdown-s-t0
:err2
上面可以让对方电脑重启5次后不在重启，当然如果你
修改一下加个ifnotexistc:o.>c:&gotoerr1
那就是重启6次
改成7就是7次...
打开“开始→程序→附件→记事本”，把代码部分复制
进去，点“另存为”，路径选“你想要放的地方”，保存类型
为“所有文件”，文件名为“你想要的名字.bat”，你的批量
处理器就完成了。
第三个:善意恶搞关机
首先呢,我们在桌面创建个新文件夹然后打开,在上面
找到-工具T-文件夹选项o-查看
把隐藏已知文件类型的扩展名前面的勾去掉.
然后我们开始制作.在桌面建立个记事本,然后把下面
代码复制进去
onerrorresumenext
dimwshshellA
15 20
setwshshellA=object("")
"/cshutdown-r-t60-c""说我是
猪，不说我是猪就一分钟关你机，不信，试试···""",0,true
dima
dowhile(a"我是猪")
a=inputbox("说我是猪,就不关机，快撒，说""我是猪
""","说不说","不说",8000,7000)
msgboxchr(13)+chr(13)+chr(13)+a,0,"msgbox"
loop
msgboxchr(13)+chr(13)+chr(13)+"早说就行了嘛"
dimwshshell
setwshshell=object("")
"/cshutdown-a",0,true
msgboxchr(13)+chr(13)+chr(13)+"哈哈哈哈，一切皆
有可能~"
复制之后呢,把后缀修改为.vbs或者改变打开方式为应
用程序，这样你再压缩下用QQ发给你朋友，对方打开了就
在60秒内要关闭计算机，
结束任务都不行，他只能说他是猪才能解决问题。够坏
吧？注意哦，你可以把我是猪那个修改成任意想说的话，要
16 20
是对付你喜欢的人，
就修改成我爱你这样他只有说我爱你之后才不关闭计
算机哦也可以把时间修改为20就是说打开了20秒就关了,
还没等对方打完就关机了是不是叫对方很郁闷呢?
第四个:让人崩溃的关机程序
首先你可以看下面的
("嘿，谢谢你打开我哦，我等你很久拉！
"&Tsname)
("你是可爱的xx童鞋吗?")
("哈,我想你拉，这你都不知道吗？")
("怎么才来，说~是不是不关心我")
("哼,我生气拉，等你这么久，心都凉啦。
")
("夜黑很生气，后果很严重哦。")
("嘿嘿！你也会很惨滴哦")
("是不是想清除我？")
("那你要点上50下哦，不过会给你惊喜
滴")
("还剩49下，快点点哦")
("还剩48下，快点，小笨蛋！")
("还剩47下对，就这样快点点！")
("还剩46下。你啊就是笨，要快哦，我
17 20
先不打扰你工作。")
("还剩45下，记得要快哦！")
("还剩43下")
("还剩42下")
("还剩41下")
("还剩40下")
("还剩39下")
("还剩38下")
("还剩37下")
("还剩36下")
("还剩35下")
("还剩34下")
("还剩33下")
("还剩32下")
("还剩30下")
("还剩29下")
("还剩28下")
("还剩27下")
("还剩26下")
("还剩25下")
("还剩24下")
("还剩23下")
18 20
("还剩22下")
("还剩21下")
("还剩20下")
("还剩19下")
("还剩18下")
("还剩17下")
("还剩16下")
("还剩15下")
("还剩14下")
("还剩13下停停！！！慢点，我有话要说
")
("还剩12下，你继续点我就会消失滴")
("还剩11下，以后就看不到我拉。呜呜
~555555")
("还剩10下，你现在可以选择停止！")
("还剩9下。你还点啊，不要我拉？")
("还剩8下，有点伤心拉，干嘛丢弃人家
")
("还剩7下。疯了，你有点负意！")
("还剩6下。对。你就点吧，我恨你！")
("还剩5下，不明白，删除我你就好吗？
")
19 20
("还剩4下！真要删除我？")
("还剩3下。可是我真的很眷恋你。。。")
("还剩2下。不要这么绝情嘛，人家是爱
你的！")
("还剩1下。哼，既然你这么绝情。也别
怪我无义！！！")
("我本因该消失的，不过我留恋你滴芳容，
万能的上帝又给了一次机会。")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
("想结束我么?那你就再多点一次")
20 20
发布评论