Nuker Kalidratorma

[codebox]@echo off

rem ================================
rem - Автор Nuker Kalidratorma -
rem - Специально для The Huckster -
rem ================================
rem В файле необходимо исправить
rem некоторые пути к директориям,
rem например "m_eve_tranquility"
rem и "M:\eve"!
rem ================================


setlocal

rem Здесь после "tab=" идет табуляция (символ 0x09), а не пустое место!
set tab=
set dt=%date%
set tm=%time%

for /F "usebackq skip=4 tokens=3 delims=%tab%" %%j in (`reg query "HKCU\Control Panel\International" /v sDate`) do set sDate=%%j
for /F "usebackq skip=4 tokens=3 delims=%tab%" %%i in (`reg query "HKCU\Control Panel\International" /v sShortDate`) do set sShortDate=%%i
for /F "usebackq skip=4 tokens=3 delims=%tab%" %%j in (`reg query "HKCU\Control Panel\International" /v iDate`) do set iDate=%%j

call :sub2 %dt%

set year0=%year%
set month0=%month%
set day0=%day%

for /F "usebackq skip=4 tokens=3 delims=%tab%" %%j in (`reg query "HKCU\Control Panel\International" /v sTime`) do set sTime=%%j
for /F "usebackq skip=4 tokens=3 delims=%tab%" %%i in (`reg query "HKCU\Control Panel\International" /v sTimeFormat`) do set sTimeFormat=%%i
for /F "usebackq skip=4 tokens=3 delims=%tab%" %%j in (`reg query "HKCU\Control Panel\International" /v iTime`) do set iTime=%%j

call :sub3 %tm%

set Hour0=%Hour%
set Minute0=%Minute%
set Second0=%Second%

set /A dts=(%year0%-2000)*365+(1%month0%-100)*30+(1%day0%-100)
if not exist "%USERPROFILE%\Local Settings\Application Data\CCP\EVE\m_eve_tranquility\backup" (
md "%USERPROFILE%\Local Settings\Application Data\CCP\EVE\m_eve_tranquility\backup"
)

rem Создаем бэкап перед запуском Евы
"%ProgramFiles%\WinRAR\rar.exe" a -r -m5 -k -rr "%USERPROFILE%\Local Settings\Application Data\CCP\EVE\m_eve_tranquility\backup\settings%year0%%month0%%day0%%Hour0%%Minute0%%Second0%.rar" "%USERPROFILE%\Local Settings\Application Data\CCP\EVE\m_eve_tranquility\settings"

rem Проверяем актуальность бэкапов
for /R "%USERPROFILE%\Local Settings\Application Data\CCP\EVE\m_eve_tranquility\backup" %%j in (*.rar) do (call :sub %%~tj %%~fj)

endlocal

rem Запускаем Еву
rem ЗДЕСЬ ОБЯЗАТЕЛЬНО НАДО СМЕНИТЬ ПУТЬ К ИСПОЛНЯЕМОМУ ФАЙЛУ Евы!!!
start "M:\eve\eve.exe"
exit

rem Подпрограмма проверки актуальности и удаления устаревших версий
:sub
set fdt=%~1

call :sub2 %fdt%
set year1=%year%
set month1=%month%
set day1=%day%

set fl =%~3
set /A dts2=(%year1%-2000)*365+(1%month1%-100)*30+(1%day1%-100)
set /A res =%dts%-%dts2%

rem Тут указано кол-во дней хранения (30 дней, после этого срока бэкапы удаляются)
if %res% GTR 30 do (del /Q /F %fl%)

goto q:

rem Подпрограмма преобразования даты
:sub2
IF %iDate%==0 FOR /F "TOKENS=1-4* DELIMS=%sDate%" %%A IN ("%~1") DO (
SET Year=%%C
SET Month=%%A
SET Day=%%B
)
IF %iDate%==1 FOR /F "TOKENS=1-4* DELIMS=%sDate%" %%A IN ("%~1") DO (
SET Year=%%C
SET Month=%%B
SET Day=%%A
)
IF %iDate%==2 FOR /F "TOKENS=1-4* DELIMS=%sDate%" %%A IN ("%~1") DO (
SET Year=%%A
SET Month=%%B
SET Day=%%C
)

FOR %%A IN (%Year%) DO SET Year=%%A
FOR %%A IN (%Month%) DO SET Month=%%A
FOR %%A IN (%Day%) DO SET Day=%%A

if not %year:~-4,1%==2 (set year=20%year%)
goto q:


rem Подпрограмма преобразования времени
:sub3
IF %iDate%==0 FOR /F "TOKENS=1-4* DELIMS=%sTime%" %%A IN ("%~1") DO (
SET Hour=%%C
SET Minute=%%A
SET Second=%%B
)
IF %iDate%==1 FOR /F "TOKENS=1-4* DELIMS=%sTime%" %%A IN ("%~1") DO (
SET Hour=%%C
SET Minute=%%B
SET Second=%%A
)
IF %iDate%==2 FOR /F "TOKENS=1-4* DELIMS=%sTime%" %%A IN ("%~1") DO (
SET Hour=%%A
SET Minute=%%B
SET Second=%%C
)

FOR %%A IN (%Hour%) DO SET Hour=%%A
FOR %%A IN (%Minute%) DO SET Minute=%%A
FOR %%A IN (%Second%) DO SET Second=%%A

if %Hour% LSS 10 (set Hour=0%Hour%)


:q[/codebox]

вот безнаказанное убийство: http://dl.eve-files....SDG_round_1.avi
http://kb.sotzone.ru...ated&btl_id=103
http://kb.sotzone.ru...ated&btl_id=107
интересно почему Тамер есть в ролике и нет на кб? так и не стрельнул ни в кого? зайчик

Какое отношение к этой теме имеет дуэль с заранее оговорёнными условиями между SoT и SDG?
Никакого безнаказанного убийства не было. Все было по чести.
А то что Тамер не попал в килмыла, так ничего удивительного. У СоТ было убито 2 из 25 шипа в килы которых успели вписаться 7 из 25 пилотов СДГ. Тамеру просто не повезло - он не вошел в эту семерку. Но при этом и сам не слился, хотя, было дело его фокусили. Так что Тамеру в том бою только зачет.

1. СП спланировала, организовала и провела не тривиальное и достаточно сложное мероприятие.
2. ВН не дали довести мероприятие до конца(их право и это не оспаривалось).
3. СП в этой теме(связанной с данным мероприятием) к ВН никаких существенных притензий не предъявляло!
4. Тема стала ОЧЕНЬ популярной за последние 2 суток(~4+-1к посещений).
5. Посты от ВН продолжаются, причем, далеко не в конструктивном ключе.

Выводы:
Что в этой теме делает ВН?
Ответ: Пиарится.
Ожидаемые действия: еще больше неконструктивных постов от ВН.


ПС: Привет Крэзи Мама. Очень не приятно тебя выдеть в этом ...

Эвент в 52G был неприкрытой демонстрацией боевого флота, там не халки стояли.

http://stella-polari...mp;kll_id=41293
http://stella-polari...il&kll_id=41293
http://stella-polari...il&kll_id=41292

У нас не было иного выбора кроме как нанести превентивный удар.

http://forum.eve-ru....i...st&p=544036

Но имхо вам надо уволить своего начальника службы безопасности %).

Нам не доложили, что у ребят праздник в нулях (типо хардкор зона) и съемки фильма.

...сами же влетев к нам сразу же поздравили и пожелали нам снять видео удачное.

В локал чате конечно было много грязи, как и в вашем али чате, наверняка.