@echo off
set size=500k
set BBSpath=c:\bbsup

if {%1}=={} goto readme

echo:: --------------------------------------------------------------------
echo::              定位 rar.exe 目录位置，请确认已经安装了Winrar
echo:: --------------------------------------------------------------------
reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.rar\ShellNew" /v "FileName">%temp%\$cd$.txt
for /f "skip=4 tokens=3 delims=        " %%i in (%temp%\$cd$.txt) do set rarpath=%%~dpi
del %temp%\$cd$.txt

if exist "%rarpath%rar.exe" goto rarfile
if exist "%ProgramFiles%\winrar\rar.exe" set rarpath=%ProgramFiles%\winrar\
if not exist "%ProgramFiles%\winrar\rar.exe" goto exit

echo:: --------------------------------------------------------------------
echo::           开始使用 rar.exe 分卷压缩目标文件
echo:: --------------------------------------------------------------------
:rarfile
FOR /F "delims=" %%i IN ('echo %*') DO set name=%%~ni
md %BBSpath%
md %BBSpath%\%name%
set ext=%~x1
echo:: -----------------------------------------------------------------
echo::     -m<n>   设置压缩模式:
echo::   -m0 存储；-m1 最快；-m2 较快； -m3 标准； -m4   较好； -m5 最好
echo:: ------------------------------------------------------------------
set level=5
if {%ext%}=={.7z} set level=0
if {%ext%}=={.7Z} set level=0
if {%ext%}=={.rar} set level=0
if {%ext%}=={.RAR} set level=0
if {%ext%}=={.jpg} set level=0
if {%ext%}=={.JPG} set level=0

echo:: --------------------
echo::     压缩开始了！
echo:: --------------------
[color=Red]"%rarpath%rar.exe" a  -ep1 -m%level% -v%size% %BBSpath%\%name%\%name%.rar %1[/color]

:end
set size=
set BBSpath=
set name=
set rarpath=
set level=