NSIS 暴风影音脚本

Share

1. ;暴风影音2去广告补丁
   
2. ;编写：寒星
   
3. 
   
4. !define HAVE_UPX
   
5. !ifdef HAVE_UPX
   
6. !packhdr tmp.dat "upx -9 tmp.dat"
   
7. !endif
   
8. 
   
9. !define PRODUCT_NAME "暴风影音去广告补丁"
   
10. !define PRODUCT_VERSION "v1.6版"
    
11. !define PRODUCT_PUBLISHER "寒星工作室"
    
12. !define PRODUCT_WEB_SITE "http://www.hxlive.cn"
    
13. SetCompressor /solid lzma
    
14. SetCompressorDictSize 32
    
15. 
    
16. ;----------------基础信息--------------------------------------
    
17. Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
    
18. SetDatablockOptimize on
    
19. outfile "Storm3 NoAD v1.6.exe"
    
20. Caption  "暴风影音3去广告补丁 v1.6"
    
21. BrandingText "　寒星工作室　${__DATE__} "
    
22. 
    
23. ;---------------------安装代码使用-------------------------------
    
24. !include "MUI.nsh"
    
25. !include "UsefulLib.nsh"
    
26. !define MUI_ICON "Storm.ico"
    
27. Page custom Storm2
    
28. Page custom do
    
29. !insertmacro MUI_LANGUAGE "SimpChinese"
    
30. ChangeUI all default.exe
    
31. MiscButtonText "" "执行" "" "完成"
    
32. 
    
33. ;---------------------版本信息--------------------------------
    
34. VIProductVersion "1.6.0.0314"
    
35. VIAddVersionKey /LANG=${LANG_SimpChinese} "FileVersion" "1.6.0.0314"
    
36. VIAddVersionKey /LANG=${LANG_SimpChinese} "ProductName" "${PRODUCT_NAME} ${PRODUCT_VERSION}"
    
37. VIAddVersionKey /LANG=${LANG_SimpChinese} "Comments" "${PRODUCT_NAME}"
    
38. VIAddVersionKey /LANG=${LANG_SimpChinese} "CompanyName" "寒星工作室"
    
39. VIAddVersionKey /LANG=${LANG_SimpChinese} "LegalCopyright" "版权所有 (C) 寒星工作室"
    
40. VIAddVersionKey /LANG=${LANG_SimpChinese} "FileDescription" "${PRODUCT_NAME} ${PRODUCT_VERSION}"
    
41. ;---------------------------------------------------------
    
42. 
    
43. Section
    
44. SectionEnd
    
45. 
    
46. ReserveFile "${NSISDIR}\Plugins\InstallOptions.dll"
    
47. ReserveFile "Storm216.ini"
    
48. ReserveFile "TOP.bmp"
    
49. 
    
50. Function Storm2
    
51.   !addplugindir E:\安装制作\NSIS\Plugins
    
52.    FindProcDLL::FindProc "Storm.exe"
    
53.     StrCmp $R0 1 +3 +1
    
54.    FindProcDLL::FindProc "Storm2.exe"
    
55.     StrCmp $R0 1 +1 +4
    
56.      MessageBox MB_ICONINFORMATION|MB_RETRYCANCEL "安装程序检测到 暴风影音 正在运行！请退出程序重试或取消本次安装！"   IDRetry retry IDCANCEL Cancel
    
57.      Retry:
    
58.       Goto -5
    
59.      Cancel:
    
60.       Quit
    
61.       
    
62.   InitPluginsDir
    
63.    File /oname=$PLUGINSDIR\Storm216.ini "Storm216.ini"
    
64.    File /oname=$PLUGINSDIR\top.bmp "top.bmp"
    
65.    WriteINIStr "$PLUGINSDIR\Storm216.ini" "Field 1" "Text" $PLUGINSDIR\top.bmp
    
66.    ReadRegStr $R1 HKLM "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\storm2" "DisplayIcon"
    
67.    StrCpy $R2 $R1 -9
    
68.    WriteINIStr "$PLUGINSDIR\Storm216.ini" "Field 5" "State" $R2
    
69. 
    
70.   InstallOptions::initDialog /NOUNLOAD "$PLUGINSDIR\Storm216.ini"
    
71.   Pop $0
    
72.   InstallOptions::show
    
73.   Pop $0
    
74. 
    
75. FunctionEnd
    
76. 
    
77. 
    
78. Function Do
    
79.   ReadINIStr $R3 "$PLUGINSDIR\Storm216.ini" "Field 5" "State"
    
80.   IfFileExists "$R3\Storm.exe" +3 +1
    
81.   MessageBox MB_ICONINFORMATION|MB_OK " 我很确定您没有安装暴风影音！点击 确定 后退出！"
    
82.    Quit
    
83.   SetOutPath "$R3\Media"
    
84.    IfFileExists "$R3\stcon.ini" +1 +3
    
85.     File /a stcon.ini
    
86.     File /a video_style_list.xml
    
87.   SetOutPath "$R3"
    
88.    IfFileExists "$R3\Media2.dll" +1 +2
    
89.     Delete "$R3\Media2.dll"
    
90.     CreateDirectory "$R3\Media2.dll"
    
91. 
    
92.   ReadINIStr $R4 "$PLUGINSDIR\Storm216.ini" "Field 6" "State"
    
93.   StrCmp $R4 1 +1 +15
    
94.   !addplugindir E:\NSIS\Plugins
    
95.    KillProcDLL::KillProc "stormliv.exe"
    
96.     Rename "$R3\stormliv.exe" "$R3\stormliv.bak"
    
97.     CreateDirectory "$R3\stormliv.exe"
    
98.     SetShellVarContext all
    
99.     SetOutPath "$APPDATA\Storm\Temp"
    
100.     Rename "update.exe" "update.bak"
     
101.     CreateDirectory "$APPDATA\Storm\Temp\update.exe"
     
102.    Services::SendServiceCommand 'Stop' 'ccosm'
     
103.    Services::SendServiceCommand 'Delete' 'ccosm'
     
104. 
     
105.   ReadINIStr $R5 "$PLUGINSDIR\Storm216.ini" "Field 7" "State"
     
106.   StrCmp $R5 1 +1 +2
     
107.   SetOutPath $R3
     
108.    File "restore.exe"
     
109. 
     
110.   MessageBox MB_ICONINFORMATION|MB_OK "去广告和删服务补丁完毕，点击 确定 后退出！"
     
111.    Goto +2
     
112.   MessageBox MB_ICONINFORMATION|MB_OK "补丁应用完毕，点击 确定 后退出！"
     
113. FunctionEnd

复制代码