142 lines
5.4 KiB
Plaintext
142 lines
5.4 KiB
Plaintext
#define sourcepath "build\exe.win-amd64-3.9\"
|
|
#define MyAppName "Archipelago"
|
|
#define MyAppExeName "ArchipelagoClient.exe"
|
|
#define MyAppIcon "icon.ico"
|
|
|
|
[Setup]
|
|
; NOTE: The value of AppId uniquely identifies this application.
|
|
; Do not use the same AppId value in installers for other applications.
|
|
AppId={{6D826EE0-49BE-4B36-BACE-09C6971CD85C}}
|
|
AppName={#MyAppName}
|
|
AppVerName={#MyAppName}
|
|
DefaultDirName={commonappdata}\{#MyAppName}
|
|
DisableProgramGroupPage=yes
|
|
DefaultGroupName=Archipelago
|
|
OutputDir=setups
|
|
OutputBaseFilename=Setup {#MyAppName}
|
|
Compression=lzma2
|
|
SolidCompression=yes
|
|
LZMANumBlockThreads=8
|
|
ArchitecturesInstallIn64BitMode=x64
|
|
ChangesAssociations=yes
|
|
ArchitecturesAllowed=x64
|
|
AllowNoIcons=yes
|
|
SetupIconFile={#MyAppIcon}
|
|
UninstallDisplayIcon={app}\{#MyAppExeName}
|
|
SignTool= signtool
|
|
LicenseFile= LICENSE
|
|
WizardStyle= modern
|
|
SetupLogging=yes
|
|
|
|
[Languages]
|
|
Name: "english"; MessagesFile: "compiler:Default.isl"
|
|
|
|
[Tasks]
|
|
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}";
|
|
|
|
|
|
[Dirs]
|
|
NAME: "{app}"; Flags: setntfscompression; Permissions: everyone-modify users-modify authusers-modify;
|
|
|
|
[Files]
|
|
Source: "{code:GetROMPath}"; DestDir: "{app}"; DestName: "Zelda no Densetsu - Kamigami no Triforce (Japan).sfc"; Flags: external
|
|
Source: "{#sourcepath}*"; Excludes: "*.sfc, *.log, data\sprites\alttpr"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
|
|
Source: "vc_redist.x64.exe"; DestDir: {tmp}; Flags: deleteafterinstall
|
|
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
|
|
|
|
[Icons]
|
|
Name: "{group}\{#MyAppName} Folder"; Filename: "{app}";
|
|
Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}";
|
|
Name: "{commondesktop}\{#MyAppName} Folder"; Filename: "{app}"; Tasks: desktopicon
|
|
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon
|
|
|
|
[Run]
|
|
Filename: "{tmp}\vc_redist.x64.exe"; Parameters: "/passive /norestart"; Check: IsVCRedist64BitNeeded; StatusMsg: "Installing VC++ redistributable..."
|
|
Filename: "{app}\ArchipelagoCreator"; Parameters: "update_sprites"; StatusMsg: "Updating Sprite Library..."
|
|
|
|
[UninstallDelete]
|
|
Type: dirifempty; Name: "{app}"
|
|
|
|
[Registry]
|
|
|
|
Root: HKCR; Subkey: ".apbp"; ValueData: "{#MyAppName}patch"; Flags: uninsdeletevalue; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}patch"; ValueData: "Archipelago Binary Patch"; Flags: uninsdeletekey; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}patch\DefaultIcon"; ValueData: "{app}\{#MyAppExeName},0"; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}patch\shell\open\command"; ValueData: """{app}\{#MyAppExeName}"" ""%1"""; ValueType: string; ValueName: ""
|
|
|
|
Root: HKCR; Subkey: ".archipelago"; ValueData: "{#MyAppName}multidata"; Flags: uninsdeletevalue; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}multidata"; ValueData: "Archipelago Server Data"; Flags: uninsdeletekey; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}multidata\DefaultIcon"; ValueData: "{app}\ArchipelagoServer.exe,0"; ValueType: string; ValueName: ""
|
|
Root: HKCR; Subkey: "{#MyAppName}multidata\shell\open\command"; ValueData: """{app}\ArchipelagoServer.exe"" --multidata ""%1"""; ValueType: string; ValueName: ""
|
|
|
|
|
|
|
|
[Code]
|
|
// See: https://stackoverflow.com/a/51614652/2287576
|
|
function IsVCRedist64BitNeeded(): boolean;
|
|
var
|
|
strVersion: string;
|
|
begin
|
|
if (RegQueryStringValue(HKEY_LOCAL_MACHINE,
|
|
'SOFTWARE\Microsoft\VisualStudio\14.0\VC\Runtimes\x64', 'Version', strVersion)) then
|
|
begin
|
|
// Is the installed version at least the packaged one ?
|
|
Log('VC Redist x64 Version : found ' + strVersion);
|
|
Result := (CompareStr(strVersion, 'v14.28.29325') < 0);
|
|
end
|
|
else
|
|
begin
|
|
// Not even an old version installed
|
|
Log('VC Redist x64 is not already installed');
|
|
Result := True;
|
|
end;
|
|
end;
|
|
|
|
var ROMFilePage: TInputFileWizardPage;
|
|
var R : longint;
|
|
var rom: string;
|
|
|
|
procedure InitializeWizard();
|
|
begin
|
|
rom := FileSearch('Zelda no Densetsu - Kamigami no Triforce (Japan).sfc', WizardDirValue());
|
|
if Length(rom) > 0 then
|
|
begin
|
|
log('existing ROM found');
|
|
log(IntToStr(CompareStr(GetMD5OfFile(rom), '03a63945398191337e896e5771f77173')));
|
|
if CompareStr(GetMD5OfFile(rom), '03a63945398191337e896e5771f77173') = 0 then
|
|
begin
|
|
log('existing ROM verified');
|
|
exit;
|
|
end;
|
|
log('existing ROM failed verification');
|
|
end;
|
|
rom := ''
|
|
ROMFilePage :=
|
|
CreateInputFilePage(
|
|
wpLicense,
|
|
'Select ROM File',
|
|
'Where is your Zelda no Densetsu - Kamigami no Triforce (Japan).sfc located?',
|
|
'Select the file, then click Next.');
|
|
|
|
ROMFilePage.Add(
|
|
'Location of ROM file:',
|
|
'SNES ROM files|*.sfc|All files|*.*',
|
|
'.sfc');
|
|
end;
|
|
|
|
function GetROMPath(Param: string): string;
|
|
begin
|
|
if Length(rom) > 0 then
|
|
Result := rom
|
|
else if Assigned(RomFilePage) then
|
|
begin
|
|
R := CompareStr(GetMD5OfFile(ROMFilePage.Values[0]), '03a63945398191337e896e5771f77173')
|
|
if R <> 0 then
|
|
MsgBox('ROM validation failed. Very likely wrong file.', mbInformation, MB_OK);
|
|
|
|
Result := ROMFilePage.Values[0]
|
|
end
|
|
else
|
|
Result := '';
|
|
end;
|