NitrogenRuBoard
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: @ECHO off
TITLE Установка патча на изменение смайлов
IF not exist surfaces.pck GOTO NotFound
IF exist surfaces.pck GOTO Start
:NotFound
CLS
ECHO Не найден файл surfaces.pck! Установка патча невозможна!
PAUSE
EXIT
:Cancel
CLS
ECHO Установка патча отменена
PAUSE
EXIT
:Start
CLS
ECHO Установить патч?
ECHO 1. Да
ECHO 2. Нет
SET Right=0
SET /p St=
IF /i "%St%"=="1" GOTO ResetSettings
IF /i "%St%"=="2" GOTO Cancel
IF "%Right%"=="0" GOTO Start
:ResetSettings
CLS
SET Smiles=Null
SET SmilesName=Null
SET ToSmiles=Null
SET ToSmilesName=Null
SET SmilesNum=Null
SET ToSmilesNum=Null
SET AllRight=Null
IF "%Prepaired%"=="1" (
GOTO SetSmiles
) ELSE (
GOTO PrepairFiles
)
:PrepairFiles
ECHO Подготовка необходимых файлов
ECHO ---
pwpack -x surfaces.pck
pwpack -x SmilesPatch.pck
SET Prepaired=1
:SetSmiles
CLS
ECHO Укажите, какие смайлы вы хотели бы заменить?
ECHO 1. Стандартные
ECHO 2. Свиней
ECHO 3. Медведей
ECHO 4. Самураев
ECHO 5. Обезьян
SET Right=0
SET /p SmilesNum=
IF /i "%SmilesNum%"=="1" (
SET Smiles=emotions0
SET SmilesName=Стандартные
SET Right=1
)
IF /i "%SmilesNum%"=="2" (
SET Smiles=emotions1
SET SmilesName=Свиней
SET Right=1
)
IF /i "%SmilesNum%"=="3" (
SET Smiles=emotions2
SET SmilesName=Медведей
SET Right=1
)
IF /i "%SmilesNum%"=="4" (
SET Smiles=emotions3
SET SmilesName=Самураев
SET Right=1
)
IF /i "%SmilesNum%"=="5" (
SET Smiles=emotions4
SET SmilesName=Обезьян
SET Right=1
)
IF "%Right%"=="0" GOTO SetSmiles
GOTO SetToSmiles
:SetToSmiles
CLS
ECHO Вы хотите заменить смайлы %SmilesName% на смайлы...
ECHO 1. Стандартные
ECHO 2. Свиней
ECHO 3. Медведей
ECHO 4. Самураев
ECHO 5. Обезьян
ECHO 6. Зеленых обезьян
ECHO 7. Девчачьих обезьян
ECHO 8. Медуз
ECHO 9. Тигров
ECHO 10. Котов
ECHO 11. Альтернативных котов
ECHO 12. Детей
ECHO 13. Пупсов
ECHO 14. Ворон
SET Right=0
SET /p ToSmilesNum=
IF /i "%ToSmilesNum%"=="1" (
SET ToSmiles=standart
SET ToSmilesName=Стандартные
SET Right=1
)
IF /i "%ToSmilesNum%"=="2" (
SET ToSmiles=pigs
SET ToSmilesName=Свиней
SET Right=1
)
IF /i "%ToSmilesNum%"=="3" (
SET ToSmiles=bears
SET ToSmilesName=Медведей
SET Right=1
)
IF /i "%ToSmilesNum%"=="4" (
SET ToSmiles=samurais
SET ToSmilesName=Самураев
SET Right=1
)
IF /i "%ToSmilesNum%"=="5" (
SET ToSmiles=monkeys
SET ToSmilesName=Обезьян
SET Right=1
)
IF /i "%ToSmilesNum%"=="6" (
SET ToSmiles=greenmonkeys
SET ToSmilesName=Зеленых обезьян
SET Right=1
)
IF /i "%ToSmilesNum%"=="7" (
SET ToSmiles=girlmonkeys
SET ToSmilesName=Девчачьих обезьян
SET Right=1
)
IF /i "%ToSmilesNum%"=="8" (
SET ToSmiles=medusas
SET ToSmilesName=Медуз
SET Right=1
)
IF /i "%ToSmilesNum%"=="9" (
SET ToSmiles=tigers
SET ToSmilesName=Тигров
SET Right=1
)
IF /i "%ToSmilesNum%"=="10" (
SET ToSmiles=cats
SET ToSmilesName=Котов
SET Right=1
)
IF /i "%ToSmilesNum%"=="11" (
SET ToSmiles=cats2
SET ToSmilesName=Альтернативных котов
SET Right=1
)
IF /i "%ToSmilesNum%"=="12" (
SET ToSmiles=childrens
SET ToSmilesName=Детей
SET Right=1
)
IF /i "%ToSmilesNum%"=="13" (
SET ToSmiles=sweeties
SET ToSmilesName=Пупсов
SET Right=1
)
IF /i "%ToSmilesNum%"=="14" (
SET ToSmiles=ravens
SET ToSmilesName=Ворон
SET Right=1
)
IF "%Right%"=="0" GOTO SetToSmiles
GOTO AllRight
:AllRight
CLS
ECHO Итак, вы хотите заменить смайлы %SmilesName% на смайлы %ToSmilesName%.
ECHO Если все верно, введите 1
ECHO Если вы ошиблись, введите 2
ECHO Если вы хотите отменить установку патча, введите 3
SET Right=0
SET /p AllRight=
IF /i "%AllRight%"=="1" GOTO InstallPatch
IF /i "%AllRight%"=="2" GOTO ResetSettings
IF /i "%AllRight%"=="3" GOTO Cancel
IF "%Right%"=="0" GOTO AllRight
:InstallPatch
copy SmilesPatch.pck.files\smiles\%ToSmiles%.dds surfaces.pck.files\surfaces\ingame\%Smiles%.dds
copy SmilesPatch.pck.files\smiles\%ToSmiles%.txt surfaces.pck.files\surfaces\ingame\%Smiles%.txt
GOTO Continue
:Continue
CLS
ECHO Заменить еще какие нибудь смайлы или хватит?
ECHO 1. Еще
ECHO 2. Хватит
SET Right=0
SET /p Cont=
IF /i "%Cont%"=="1" GOTO ResetSettings
IF /i "%Cont%"=="2" GOTO Finish
IF "%Right"=="0" GOTO Continue
:Finish
CLS
DEL SmilesPatch.pck /Q
RMDIR SmilesPatch.pck.files /S /Q
pwpack -c surfaces.pck.files -z 1 surfaces.pck
RMDIR surfaces.pck.files /S /Q
CLS
ECHO Установка патча завершена!
PAUSE
DEL InstallSmilesPatch.bat /Q |
|
