REM this is PreSetup
@echo off
if exist %systemroot%\system32\UserMake.exe start /wait %systemroot%\system32\UserMake.exe -s -t 15
if exist %systemroot%\system32\WinntFix.exe start /wait %systemroot%\system32\WinntFix.exe 15 1356
:: ================================== Конструкция для интерактивного выбора программ ==================================
:: --------------------------------------------------- НИЖЕ 1 часть --------------------------------------------------
for %%i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do if exist %%i:\WIN51 Set SrcDosPathTemp=%%i:
if not exist %SrcDosPathTemp%\I386\fSetup.ini Set SrcDosPath=%SrcDosPathTemp%
set DistrDir=%SrcDosPath%\I386\SVCPACK
:: ----- SetupHotfixes
if exist "%DistrDir%" (
copy /y "%DistrDir%\_SetupHotfixes.cmd" "%SystemDrive%\_SetupHotfixes.cmd"
call ::OnlyUpdate
CHGSTR "---------- %SystemDrive%\_SETUPHOTFIXES.CMD" "" "%SystemDrive%\_SetupHotfixes.cmd" /b
)
:OnlyUpdate
MSGBOX.EXE "Хотите установить дополнительные сторонние утилиты?" "MSGBOX" 3 3 10 && cmdow.exe MSGBOX /top
if "%errorlevel%"=="7" (
find "Flash.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "MSXML4.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "ROOTSUPD.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "DNet1140.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "ш т.ф. .......... .exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
move /y "%SystemDrive%\_SetupHotfixes.cmd.tmp" "%SystemDrive%\_SetupHotfixes.cmd"
)
goto :EOF
:: ----- Runss
if exist "%DistrDir%\Runss\Runss.exe" (
copy /y "%DistrDir%\Runss\Run*" "%SystemDrive%\"
for /f "delims=" %%i in (%DistrDir%\Runss\BEGIN.xml) do echo %%i>>%SystemDrive%\1.tmp
if not exist %SystemDrive%\WINDOWS\system32\fSetup.ini (
CHGSTR "%%SrcDosPath%%" "%SrcDosPath%" "%SystemDrive%\_SetupHotfixes.cmd" /b
for /f "skip=1 tokens=1-5,* delims=\. " %%a in (%SystemDrive%\_SetupHotfixes.cmd) do (
echo ^<Item Title="%%d" Program="%%a\%%b\%%c\%%d.%%e" Parameters="%%f"/^>>>%SystemDrive%\1.tmp
)
)
if exist %SystemDrive%\WINDOWS\system32\fSetup.ini (
for /f "tokens=1-5,* delims=\. " %%a in (%SystemDrive%\_SetupHotfixes.cmd) do (
echo ^<Item Title="%%d" Program="%%a\%%b\%%c\%%d.%%e" Parameters="%%f"/^>>>%SystemDrive%\1.tmp
)
)
for /f "delims=" %%i in (%DistrDir%\Runss\END.xml) do echo %%i>>%SystemDrive%\1.tmp
<Nul >%SystemDrive%\Runss.xml Set /P $VAR=яю
%DistrDir%\Runss\recode cp1251..utf16-le <%SystemDrive%\1.tmp >>%SystemDrive%\Runss.xml
del "%SystemDrive%\1.tmp"
echo %%SystemDrive%%\Runss.exe>%SystemDrive%\_SetupHotfixes.cmd
)
:: --------------------------------------------------- ВЫШЕ 1 часть ---------------------------------------------------
:: ================================== Конструкция для интерактивного выбора программ ==================================
:Driver
if exist %SrcDosPath%\OEMDRV\DPsXtrct.exe start /wait %SrcDosPath%\OEMDRV\DPsXtrct.exe
attrib -r -a -s +h "%systemdrive%\D"
::Start /Wait %SrcDosPath%\OEMDRV\BIN\7za.exe x -yo"%SystemDrive%\" "%SrcDosPath%\OEMDRV\DP*.7z"
::un7zip.exe "%SrcDosPath%\OEMDRV\DP*.7z" "%SystemDrive%\"
:Finish
MSGBOX.EXE "Начинается автоматическая установка Windows. Дальнейших ручных действий не требуется. В конце установки получите готовый Windows с установленными программами и измененным интерфейсом. Можете попить кофе

" "MSGBOX" 1 1 10 && cmdow.exe MSGBOX /top
Exit
:: ================================== Конструкция для интерактивного выбора программ ==================================
:: --------------------------------------------------- НИЖЕ 2 часть ---------------------------------------------------
:: --------------------------------------------------- ВЫШЕ 2 часть ---------------------------------------------------
:: ================================== Конструкция для интерактивного выбора программ ==================================