【打包教程】0vertrue/Gu1tar Pro6软件打包技术分享
# 简介
0verture5 和 Gu1tar Pro6 是一款音乐爱好者和编曲者常用的简单的编曲和制谱软件。0verture4/Gu1tar Pro5 版的破解版满天飞,但是 0verture5 版以上和 Gu1tar Pro6 以上却被思杰马克丁公司购买了版权。
那么我们今天来借这个软件了解一下如何进行两款软件的打包。
# 软件截图
# 技术分享
这次主要讲解的是 BAT 文件实现安装包在安装过程中的一些自动部署操作的代码。
不同于一般软件,两个软件的部署过程包含了解压文件,创建多个快捷方式,安装字体,建立文件关联,清理安装时产生的临时文件等操作。
我们借助了 3 个文件来完成这些操作:
Install.vbs
Install.bat
InstallFonts.vbs
代码如下所示:
Install.vbs
1 2
| Set shell = Wscript.createobject("wscript.shell") a = shell.run ("Install.bat",0)
|
Install.bat
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
| @echo off color 4f
title 仅用于打包代码测试
set "exe=GuitarPro.exe" set "lnk=GuitarPro 6 Lite" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
set "exe=GP5.exe" set "lnk=GuitarPro 5" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
set "exe=吉他谱阅览器.exe" set "lnk=吉他谱阅览器(收费)" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
assoc .gpx=GuitarPro6Files assoc .gp5=GuitarProFiles assoc .gp4=GuitarProFiles assoc .gp3=GuitarProFiles assoc .xml=GuitarProFiles assoc .mid=GuitarProFiles ftype GuitarPro6Files="%~dp0\GuitarPro.exe" %1 ftype GuitarProFiles="%~dp0\GP5.exe" %1
regedit /s ./Install.reg
start wscript "%~dp0fonts\InstallFonts.vbs" start /d "%~dp0" vcredist_x86.exe /q start /d "%~dp0crack\" KeyGen.exe" del "%~dp0Fonts\InstallFonts.vbs" del Install.reg del %
|
InstallFonts.vbs
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35
| @echo off color 4f
title 仅用于打包代码测试
set "exe=GuitarPro.exe" set "lnk=GuitarPro 6 Lite" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
set "exe=GP5.exe" set "lnk=GuitarPro 5" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
set "exe=吉他谱阅览器.exe" set "lnk=吉他谱阅览器(收费)" mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\%lnk%.lnk""):b.TargetPath=""%~dp0%exe%"":b.WorkingDirectory=""%~dp0"":b.Save:close")
assoc .gpx=GuitarPro6Files assoc .gp5=GuitarProFiles assoc .gp4=GuitarProFiles assoc .gp3=GuitarProFiles assoc .xml=GuitarProFiles assoc .mid=GuitarProFiles ftype GuitarPro6Files="%~dp0\GuitarPro.exe" %1 ftype GuitarProFiles="%~dp0\GP5.exe" %1
regedit /s ./Install.reg
start wscript "%~dp0fonts\InstallFonts.vbs" start /d "%~dp0" vcredist_x86.exe /q start /d "%~dp0crack\" KeyGen.exe" del "%~dp0Fonts\InstallFonts.vbs" del Install.reg del %
|
安装过程中,Install.vbs 启动 Install.bat 实现窗口隐藏,然后在 Install.bat 中实现创建图标、关联文件、调用 InstallFonts 安装字体、清理安装时产生的临时文件。
软件打包使用的是兮米安装包制作工具。
在本版本打包过程中,还集成了 0verture5/Gu1tar Pro 6 的汉化补丁。
# 注意事项
本软件仅供学习交流软件打包代码使用,请于下载后 24 小时或学习交流结束后删除。
由于初琴使用的打包工具的 BUG,不能在卸载时自动清理注册表,所以推荐卸载后使用 Wise Care 365 清理注册表。
# 下载地址
0verture 5:蓝奏云
Gu1tar Pro 6 x86:蓝奏云
Gu1tar Pro 6 x64:蓝奏云