Metropoli BBS
VIEWER: remarj.bat MODE: TEXT (LATIN1)
@echo off
cls
echo þ REM++ 0.01 batch file started (ARJ version)
echo ÿ
set REM_IT_TEMP=
if .%3==. goto novar
set REM_IT_TEMP=!%3
:novar
echo þ Creating temporary directory
md rem_it
echo þ Unzipping file to temporary directory
arj e -y %1 rem_it >nul
if errorlevel 1 goto errorinarj
echo þ Running REMOVEIT executable
removeit %2 del_list.lst rem_it
echo ÿ

rem ---------- EXTRA! EXTRA! REMLINE IMPLEMENTATION AHEAD ---------------

echo þ Deleting extra lines from FILE_ID.DIZ
remline .\rem_it\file_id.diz phrases.lst
arj %1 \rem_it\file_id.diz >nul
echo ÿ

rem --- NOTE ! Change phrases.lst above to you phrase file filename --

echo þ Deleting extraced files
echo y | del .\rem_it\*.* >nul
echo ÿ
echo þ Removing temporary directory
rd rem_it
echo þ Deleting ARJ file comment
pkzip -zNUL %1 >nul
echo þ Deleting AD files from original ARJ
arj d %1 !del_list.lst %REM_IT_TEMP% >nul
echo þ Deleting AD list file
del del_list.lst >nul
goto end
:errorinarj
echo ÿ
echo ! Error opening ARJ file. Aborting process.
:end
echo ÿ
echo þ Process completed.
[ RETURN TO DIRECTORY ]