Код чего? Этой сборки?
Код:
![Выделить весь код](images/misc/selectcode.png)
!define PRODUCT_NAME "K-Lite Mega Codec Pack"
!define PRODUCT_VERSION "7.2.0"
!define MUI_WELCOMEFINISHPAGE_BITMAP "KLCodecP.bmp"
; MUI 1.67 compatible ------
!include "MUI.nsh"
SetCompressor /SOLID lzma
SetCompressorDictSize 32
!define MUI_ABORTWARNING
!define MUI_ICON "KLCodecP.ico"
!define BRANDING "Svetonosny Angel"
; MUI Settings
!insertmacro MUI_PAGE_WELCOME
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_PAGE_FINISH
!insertmacro MUI_LANGUAGE "Russian"
Name "${PRODUCT_NAME}"
Caption "Установка ${PRODUCT_NAME} ${PRODUCT_VERSION}"
OutFile KLCodecP.exe
VIProductVersion "7.2.0.0"
!define /date date "%H:%M %d %b, %Y"
VIAddVersionKey /LANG=1049 "LegalCopyright" "CodecGuid"
VIAddVersionKey /LANG=1049 "Comments" "Built on ${date}"
VIAddVersionKey /LANG=1049 "CompanyName" "wolkow70"
VIAddVersionKey /LANG=1049 "FileVersion" "30110318052756"
VIAddVersionKey /LANG=1049 "FileDescription" "KLMCP"
SubCaption 3 " "
ShowInstDetails show
!include IsUserAdmin.nsh
!include FileFunc.nsh
!insertmacro GetRoot
!insertmacro DriveSpace
Function .onInit
System::Call 'kernel32::CreateMutexA(i 0, i 0, t "KLCodecSetup") i .r1 ?e'
Pop $R0
StrCmp $R0 0 +3
MessageBox MB_OK|MB_ICONQUESTION|MB_TOPMOST "Ну чего ты запускаешь меня снова? Уже работаю..."
Abort
ReadRegDWORD $0 HKLM SYSTEM\Setup SystemSetupInProgress
IntCmp $0 1 0 +2
SetSilent silent
${GetRoot} "$WINDIR" $R0
${DriveSpace} "$R0" "/D=F /S=M" $R1
IntCmp $R1 100 +3 0 +3
MessageBox MB_OK|MB_ICONEXCLAMATION|MB_TOPMOST "На системном диске должно быть более$\n100 мегабайт свободного места.$\nУстановка K-Lite Mega Codec Pack отменена!"
Abort
!insertmacro IsUserAdmin $R0
StrCmp $R0 1 +3
MessageBox MB_OK|MB_ICONEXCLAMATION|MB_TOPMOST "Для установки программы у пользователя$\nдолжны быть права администратора.$\nУстановка K-Lite Mega Codec Pack отменена!"
Abort
FunctionEnd
Section Install
SetOutPath "$TEMP\KLCodecSetup"
File /r "Distrib\*"
ExecWait '"$TEMP\KLCodecSetup\KLCPorig.exe" /verysilent /norestart /LoadInf=".\klcp_mega_unattended.ini'
copyfiles /silent "$TEMP\KLCodecSetup\mpc-hc.exe" "$PROGRAMFILES\K-Lite Codec Pack\Media Player Classic\mpc-hc.exe"
copyfiles /silent "$TEMP\KLCodecSetup\mpcresources.ru.dll" "$PROGRAMFILES\K-Lite Codec Pack\Media Player Classic\mpcresources.ru.dll"
copyfiles /silent "$TEMP\KLCodecSetup\mpcresources.ua.dll" "$PROGRAMFILES\K-Lite Codec Pack\Media Player Classic\mpcresources.ua.dll"
;
copyfiles /silent "$TEMP\KLCodecSetup\ac3filter_intl.dll" "$PROGRAMFILES\K-Lite Codec Pack\Filters\ac3filter_intl.dll"
CreateDirectory "$PROGRAMFILES\K-Lite Codec Pack\Filters"
SetOutPath "$PROGRAMFILES\K-Lite Codec Pack\Filters"
CreateDirectory "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang"
copyfiles /silent "$TEMP\KLCodecSetup\Lang\ac3filter.pot" "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\ac3filter.pot"
copyfiles /silent "$TEMP\KLCodecSetup\Lang\rus.po" "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus.po"
SetOutPath "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang"
CreateDirectory "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus"
SetOutPath "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus"
CreateDirectory "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus\LC_MESSAGES"
SetOutPath "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus\LC_MESSAGES"
copyfiles /silent "$TEMP\KLCodecSetup\Lang\rus\LC_MESSAGES\ac3filter.mo" "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang\rus\LC_MESSAGES\ac3filter.mo"
WriteRegStr HKCU "Software\AC3filter" "offline_warning" ""
WriteRegDWORD HKCU "Software\AC3filter" "tray" 0x1
WriteRegDWORD HKCU "Software\AC3filter" "auto_gain" 0x0
WriteRegDWORD HKCU "Software\AC3filter" "formats" 0x5400
WriteRegDWORD HKCU "Software\AC3filter" "normalize" 0x0
WriteRegDWORD HKCU "Software\AC3filter" "normalize_matrix" 0x0
WriteRegDWORD HKCU "Software\AC3filter" "spdif_pt" 0x0
WriteRegDWORD HKCU "Software\AC3filter" "use_spdif" 0x0
WriteRegStr HKCU "Software\AC3filter" "Install_Dir" ""
WriteRegStr HKCU "Software\AC3filter" "Language" "rus"
WriteRegStr HKCU "Software\AC3filter" "Lang_Dir" "$PROGRAMFILES\K-Lite Codec Pack\Filters\Lang"
WriteRegStr HKCU "Software\GNU\ffdshow" "lang" "RU"
WriteRegStr HKLM "SOFTWARE\GNU\ffdshow" "lang" "1049"
WriteRegDWORD HKCU "Software\Gabest\Media Player Classic\Settings" "MenuLang" 0x419
WriteRegDWORD HKCU "Software\Gabest\Media Player Classic\Settings" "SubtitlesLang" 0x419
WriteRegDWORD HKCU "Software\Gabest\Media Player Classic\Settings" "InterfaceLanguage" 0x3
HideWindow
SetOutPath "$TEMP"
RMDir /r /REBOOTOK "$TEMP\KLCodecSetup"
Quit
SectionEnd
Цитата XXXler:
просто к сведению - мне ваше "творчество" принципиально безразлично, но раз вы так болезнено реагируете на конструктивную критику - впредь обещаю молча смотреть как вы топчитесь по своим граблям »
|
Благодарствую, покорнейше...
Цитата XXXler:
просто к сведению - мне ваше "творчество" принципиально безразлично, но раз вы так болезнено реагируете на конструктивную критику - впредь обещаю молча смотреть как вы топчитесь по своим граблям »
|
Без комментариев, даже...