Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Быстрая настройка Windows (рабочее место)

Модерирует : KLASS, IFkO

 Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

Открыть новую тему     Написать ответ в эту тему

virjokk

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Создаем батник в кодировке OEM 866 с нижеследующим содержимым и кладем в папку RepackWIM
Код:
 
@echo off
set ch="DISM\cecho.exe"
for /f "delims=" %%I in ('dir /b /o:d _Auto_Repack_*.bat 2^>nul') do (
copy /y %%I %%~nI-edited.bat
set "file=%%~nI-edited.bat"
set "file_size=%%~zI"
)
if not defined file echo Not found file _Auto_Repack_*.bat & exit
:Menu
cls
echo.
echo.
echo     Запрет удаления компонентов, соответствующие строки в батнике комментируются, создается новый файл *-edited.bat
echo     Выбор компонентов:  
echo.
echo.
%ch% {0b}    [1]{#} = Отключить удаление телеметрии и слежения {\n #}
%ch% {0b}    [2]{#} = Отключить удаление кортаны и ее поиска из таскбара {\n #}
%ch% {0b}    [3]{#} = Отключить удаление OneDrive {\n #}
%ch% {0b}    [4]{#} = Отключить удаление компонента "Иинформация на экране блокировки - Windows Spotlight" {\n #}
%ch% {0b}    [5]{#} = Отключить удаление компонента "Средства удаления вредоносных программ" {\n #}
%ch% {0b}    [6]{#} = Отключить удаление компонента "Управления финансами" {\n #}
%ch% {0b}    [7]{#} = Отключить удаление компонентов для получения Биометрии {\n #}
%ch% {0b}    [8]{#} = Отключить удаление компонента родительского контроля {\n #}
%ch% {0b}    [9]{#} = Отключить удаление компонентов Xbox {\n #}
%ch% {0b}    [10]{#} = Отключить удаление компонента управления мобильными сенсорами {\n #}
%ch% {0b}    [11]{#} = Отключить удаление компонента для управления мобильными устройствами через комп {\n #}
%ch% {0b}    [12]{#} = Отключить удаление компонентов API для использования мобильного интернета {\n #}
%ch% {0b}    [13]{#} = Отключить удаление Skype ORTC-API для взаимодействия с WebRTC-протоколом {\n #}
%ch% {0b}    [14]{#} = Отключить удаление компонента для сбора набираемого текста для "предугадывания набора" {\n #}
%ch% {0b}    [15]{#} = Отключить удаление компонента "Распознование и анализ рукописного и обычного текста в файлах, сообщениях и др." {\n #}
%ch% {0b}    [16]{#} = Отключить удаление компонента "Фрейм Сервера" {\n #}
%ch% {0b}    [17]{#} = Отключить удаление компонента "Обнаружение и отслеживание лиц на видеокадрах" {\n #}
%ch% {0b}    [18]{#} = Отключить удаление компонента "Получение текста с изображений (Optical character recognition)": {\n #}
%ch% {0b}    [19]{#} = Отключить удаление компонента "Индексирование текста с изображений" {\n #}
%ch% {0b}    [20]{#} = Отключить удаление компонента Голоса, для озвучивания текста с файлов или экрана и др. {\n #}
%ch% {0b}    [21]{#} = Отключить удаление возможности распознования речи для Кортаны и др. {\n #}
%ch% {0b}    [22]{#} = Отключить удаление возможности преобразования текста в речь для Кортаны, экранного диктора и др. {\n #}
%ch% {0b}    [23]{#} = Отключить удаление возможности для рукописного ввода и пера {\n #}
%ch% {0b}    [24]{#} = Отключить удаление возможности для распознавания текста {\n #}
%ch% {0b}    [25]{#} = Отключить удаление возможности для проверки орфографии, прогнозирование текста и поиска в документах {\n #}
%ch% {0b}    [26]{#} = Отключить удаление компонентов Защитника {\n #}
%ch% {0b}    [27]{#} = Отключить удаление компонентов Геозоны {\n #}
%ch% {0b}    [28]{#} = Отключить удаление компонентов Hyper-V и связанных с ним компонентов {\n #}
%ch% {0b}    [Без ввода]{#} = Выйти {\n #}
echo.
set "input="
set /p input=*   Ваш выбор:  
if not defined input goto :exit
if "%input%"=="1" ( call :AddRem "Telemetry" & call :AddRem "TroubleShooting" & goto :Menu )
if "%input%"=="2" ( call :AddRem "Cortana" & call :AddRem "Search2" & goto :Menu )
if "%input%"=="3" ( call :AddRem "OneDrive" & goto :Menu )
if "%input%"=="4" ( call :AddRem "ContentDeliveryManager" & goto :Menu )
if "%input%"=="5" ( call :AddRem "MRT10" & goto :Menu )
if "%input%"=="6" ( call :AddRem "Wallet" & goto :Menu )
if "%input%"=="7" ( call :AddRem "Bio" & goto :Menu )
if "%input%"=="8" ( call :AddRem "Parental" & goto :Menu )
if "%input%"=="9" ( call :AddRem "Gam" & goto :Menu )
if "%input%"=="10" ( call :AddRem "Mobile-Sensors" & goto :Menu )
if "%input%"=="11" ( call :AddRem "MobilePC" & goto :Menu )
if "%input%"=="12" ( call :AddRem "MobileBroadband" & goto :Menu )
if "%input%"=="13" ( call :AddRem "-Skype" & goto :Menu )
if "%input%"=="14" ( call :AddRem "TextPrediction" & goto :Menu )
if "%input%"=="15" ( call :AddRem "InkPlatform" & goto :Menu )
if "%input%"=="16" ( call :AddRem "FrameServer" & goto :Menu )
if "%input%"=="17" ( call :AddRem "FaceAnalysis" & goto :Menu )
if "%input%"=="18" ( call :AddRem "Media-Ocr" & goto :Menu )
if "%input%"=="19" ( call :AddRem "WinOcr" & goto :Menu )
if "%input%"=="20" ( call :AddRem "SpeechComponents" & goto :Menu )
if "%input%"=="21" ( call :AddRem "Language.Speech" & goto :Menu )
if "%input%"=="22" ( call :AddRem "Language.TextToSpeech" & goto :Menu )
if "%input%"=="23" ( call :AddRem "Language.Handwriting" & goto :Menu )
if "%input%"=="24" ( call :AddRem "Language.Ocr" & goto :Menu )
if "%input%"=="25" ( call :AddRem "Language.Basic" & goto :Menu )
if "%input%"=="26" ( call :AddRem "SenseClient" & call :AddRem "Defender" & goto :Menu )
if "%input%"=="27" ( call :AddRem "Geolocation" & goto :Menu )
if "%input%"=="28" ( goto :HyperV  
 ) else ( echo.&%ch%    {0e}Не правильный выбор {\n #} & echo.
      TIMEOUT /T 2 >nul & goto :Menu )
 
:HyperV
call :AddRem "HyperV"
call :AddRem "emoteFX"
call :AddRem "VirtualizationBasedSecurity"
call :AddRem "Client-Interop"
call :AddRem "Hyper-V"
goto :Menu  
 
:exit
echo.&%ch%     {0e} - Выход - {\n #} & TIMEOUT /T 2 >nul
for /f "delims=" %%I in ('dir /b /o:d *-edited.bat 2^>nul') do (
if "%%~zI"=="%file_size%" del /f /q %%~fI >nul
)
exit
 
:AddRem
<%file% (
for /f "delims=" %%a in ('more') do (
 set "s=%%a"
 setlocal enabledelayedexpansion
 set "s=!s:^!=^^!!"
 if !s!==!s:%~1=! (echo !s!) else (echo rem !s!)
 endlocal
 )
)>%file%.tmp
move /y %file%.tmp %file% >nul
 


Всего записей: 289 | Зарегистр. 19-05-2006 | Отправлено: 15:49 15-08-2017 | Исправлено: virjokk, 16:02 15-08-2017
Открыть новую тему     Написать ответ в эту тему

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Быстрая настройка Windows (рабочее место)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru