@echo off
rem ****************************
rem Сценарий: rardir.bat
rem Дата создания 7/5/2008
rem Последнее изменение: 7/12/2008
rem Автор: Шашкин Н. С. kolan klmn
rem E-mail: xalava@bk.ru
rem ****************************
rem Описание: синхронизирует (создаёт при
rem необходимости) архив с выбранной
rem директорией. Если директория задана
rem параметром, то архив создаётся в текущей
rem директории, иначе - в родительской.
rem ****************************
rem Файлы: требует rar любой версии
rem и доступа к временной директории, 
rem определённой в переменной TMP
rem ****************************

if '%1'=='' (
	cd > "%TMP%\rardir.tmp"
	for /f "usebackq tokens=1-31 delims==\" %%A in (`type "%TMP%\rardir.tmp"`) do (
		cd ..
		del /s/q/f "%TMP%\rardir.tmp"
		rardir_proc.bat %%A "%%B" "%%C" "%%D" "%%E" "%%F" "%%G" "%%H" "%%I" "%%J" "%%K" "%%L" "%%M" "%%N" "%%O" "%%P" "%%Q" "%%R" "%%S" "%%T" "%%U" "%%V" "%%W" "%%X" "%%Y" "%%Z"
		goto :EOF
	)
)
else (
	rar a -as %1.rar %1
)