;暴风影音去广告补丁
;编写：寒星
!define PRODUCT_NAME "暴风影音去广告补丁"
!define PRODUCT_VERSION "v1.6版"
!define PRODUCT_PUBLISHER "寒星工作室"
!define PRODUCT_WEB_SITE "http://www.hxlive.cn"
SetCompressor /solid lzma
SetCompressorDictSize 32
;----------------基础信息--------------------------------------
Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
SetDatablockOptimize on
outfile "Storm3 NoAD v1.6.exe"
Caption "暴风影音3去广告补丁 v1.6"
BrandingText " 寒星工作室 ${__DATE__} "
;---------------------安装代码使用-------------------------------
!include "MUI.nsh"
!include "UsefulLib.nsh"
!define MUI_ICON "Storm.ico"
Page custom Storm2
Page custom do
!insertmacro MUI_LANGUAGE "SimpChinese"
ChangeUI all default.exe
MiscButtonText "" "执行" "" "完成"
;---------------------版本信息--------------------------------
VIProductVersion "1.6.0.0314"
VIAddVersionKey /LANG=${LANG_SimpChinese} "FileVersion" "1.6.0.0314"
VIAddVersionKey /LANG=${LANG_SimpChinese} "ProductName" "${PRODUCT_NAME} ${PRODUCT_VERSION}"
VIAddVersionKey /LANG=${LANG_SimpChinese} "Comments" "${PRODUCT_NAME}"
VIAddVersionKey /LANG=${LANG_SimpChinese} "CompanyName" "寒星工作室"
VIAddVersionKey /LANG=${LANG_SimpChinese} "LegalCopyright" "版权所有 (C) 寒星工作室"
VIAddVersionKey /LANG=${LANG_SimpChinese} "FileDescription" "${PRODUCT_NAME} ${PRODUCT_VERSION}"
;---------------------------------------------------------
Section
SectionEnd
ReserveFile "${NSISDIR}PluginsInstallOptions.dll"
ReserveFile "Storm216.ini"
ReserveFile "TOP.bmp"
Function Storm2
!addplugindir E:安装制作NSISPlugins
FindProcDLL::FindProc "Storm.exe"
StrCmp $R0 1 +3 +1
FindProcDLL::FindProc "Storm2.exe"
StrCmp $R0 1 +1 +4
MessageBox MB_ICONINFORMATION|MB_RETRYCANCEL "安装程序检测到 暴风影音 正在运行！请退出程序重试或取消本次安装！" IDRetry retry IDCANCEL Cancel
Retry:
Goto -5
Cancel:
Quit
InitPluginsDir
File /oname=$PLUGINSDIRStorm216.ini "Storm216.ini"
File /oname=$PLUGINSDIR op.bmp "top.bmp"
WriteINIStr "$PLUGINSDIRStorm216.ini" "Field 1" "Text" $PLUGINSDIR op.bmp
ReadRegStr $R1 HKLM "SOFTWAREMicrosoftWindowsCurrentVersionUninstallstorm2" "DisplayIcon"
StrCpy $R2 $R1 -9
WriteINIStr "$PLUGINSDIRStorm216.ini" "Field 5" "State" $R2
InstallOptions::initDialog /NOUNLOAD "$PLUGINSDIRStorm216.ini"
Pop $0
InstallOptions::show
Pop $0
FunctionEnd
Function Do
ReadINIStr $R3 "$PLUGINSDIRStorm216.ini" "Field 5" "State"
IfFileExists "$R3Storm.exe" +3 +1
MessageBox MB_ICONINFORMATION|MB_OK " 我很确定您没有安装暴风影音！点击 确定 后退出！"
Quit
SetOutPath "$R3Media"
IfFileExists "$R3stcon.ini" +1 +3
File /a stcon.ini
File /a video_style_list.xml
SetOutPath "$R3"
IfFileExists "$R3Media2.dll" +1 +2
Delete "$R3Media2.dll"
CreateDirectory "$R3Media2.dll"
ReadINIStr $R4 "$PLUGINSDIRStorm216.ini" "Field 6" "State"
StrCmp $R4 1 +1 +15
!addplugindir E:NSISPlugins
KillProcDLL::KillProc "stormliv.exe"
Rename "$R3stormliv.exe" "$R3stormliv.bak"
CreateDirectory "$R3stormliv.exe"
SetShellVarContext all
SetOutPath "$APPDATAStormTemp"
Rename "update.exe" "update.bak"
CreateDirectory "$APPDATAStormTempupdate.exe"
Services::SendServiceCommand 'Stop' 'ccosm'
Services::SendServiceCommand 'Delete' 'ccosm'
ReadINIStr $R5 "$PLUGINSDIRStorm216.ini" "Field 7" "State"
StrCmp $R5 1 +1 +2
SetOutPath $R3
File "restore.exe"
MessageBox MB_ICONINFORMATION|MB_OK "去广告和删服务补丁完毕，点击 确定 后退出！"
Goto +2
MessageBox MB_ICONINFORMATION|MB_OK "补丁应用完毕，点击 确定 后退出！"
FunctionEnd