|
| 1 | +; Script generated by the Inno Setup Script Wizard. |
| 2 | +; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES! |
| 3 | + |
| 4 | +#define MyAppName "EAFC25_CrackByRimisiusDev" |
| 5 | +#define MyAppVersion "1.0" |
| 6 | +#define MyAppPublisher "RimisiusDEV" |
| 7 | +#define MyAppExeName "EAFC25-CrackPatcher.exe" |
| 8 | + |
| 9 | +[Setup] |
| 10 | +; NOTE: The value of AppId uniquely identifies this application. Do not use the same AppId value in installers for other applications. |
| 11 | +; (To generate a new GUID, click Tools | Generate GUID inside the IDE.) |
| 12 | +AppId={{CF4F0501-81E3-4E3F-B6BB-599E3BDDC5E4} |
| 13 | +AppName={#MyAppName} |
| 14 | +AppVersion={#MyAppVersion} |
| 15 | +;AppVerName={#MyAppName} {#MyAppVersion} |
| 16 | +AppPublisher={#MyAppPublisher} |
| 17 | +DefaultDirName=C:\MyCrack\{#MyAppName} |
| 18 | +UninstallDisplayIcon={app}\{#MyAppExeName} |
| 19 | +DefaultGroupName={#MyAppName} |
| 20 | +AllowNoIcons=yes |
| 21 | +LicenseFile=C:\Users\ikop\Documents\MITByRIMISIUSDEV.txt |
| 22 | +; Uncomment the following line to run in non administrative install mode (install for current user only). |
| 23 | +;PrivilegesRequired=lowest |
| 24 | +OutputBaseFilename=eafc25crackbyrimisiusdev_setup |
| 25 | +SetupIconFile=C:\Users\ikop\Documents\EAFC25.ico |
| 26 | +SolidCompression=yes |
| 27 | +WizardStyle=modern |
| 28 | + |
| 29 | +[Languages] |
| 30 | +Name: "english"; MessagesFile: "compiler:Default.isl" |
| 31 | +Name: "bulgarian"; MessagesFile: "compiler:Languages\Bulgarian.isl" |
| 32 | +Name: "danish"; MessagesFile: "compiler:Languages\Danish.isl" |
| 33 | +Name: "dutch"; MessagesFile: "compiler:Languages\Dutch.isl" |
| 34 | +Name: "french"; MessagesFile: "compiler:Languages\French.isl" |
| 35 | +Name: "german"; MessagesFile: "compiler:Languages\German.isl" |
| 36 | +Name: "hebrew"; MessagesFile: "compiler:Languages\Hebrew.isl" |
| 37 | +Name: "hungarian"; MessagesFile: "compiler:Languages\Hungarian.isl" |
| 38 | +Name: "italian"; MessagesFile: "compiler:Languages\Italian.isl" |
| 39 | +Name: "japanese"; MessagesFile: "compiler:Languages\Japanese.isl" |
| 40 | +Name: "korean"; MessagesFile: "compiler:Languages\Korean.isl" |
| 41 | +Name: "norwegian"; MessagesFile: "compiler:Languages\Norwegian.isl" |
| 42 | +Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl" |
| 43 | +Name: "slovak"; MessagesFile: "compiler:Languages\Slovak.isl" |
| 44 | +Name: "slovenian"; MessagesFile: "compiler:Languages\Slovenian.isl" |
| 45 | +Name: "spanish"; MessagesFile: "compiler:Languages\Spanish.isl" |
| 46 | +Name: "ukrainian"; MessagesFile: "compiler:Languages\Ukrainian.isl" |
| 47 | + |
| 48 | +[Code] |
| 49 | +function BASS_Init(device: Integer; freq, flags: DWORD; win: hwnd; CLSID: Integer): Boolean; |
| 50 | +external 'BASS_Init@files:bass.dll stdcall'; |
| 51 | + |
| 52 | +function BASS_StreamCreateFile(mem: BOOL; f: PAnsiChar; offset1: DWORD; offset2: DWORD; length1: DWORD; length2: DWORD; flags: DWORD): DWORD; |
| 53 | +external 'BASS_StreamCreateFile@files:bass.dll stdcall'; |
| 54 | + |
| 55 | +function BASS_Start(): Boolean; |
| 56 | +external 'BASS_Start@files:bass.dll stdcall'; |
| 57 | + |
| 58 | +function BASS_ChannelPlay(handle: DWORD; restart: BOOL): Boolean; |
| 59 | +external 'BASS_ChannelPlay@files:bass.dll stdcall'; |
| 60 | +
|
| 61 | +function BASS_Stop(): Boolean; |
| 62 | +external 'BASS_Stop@files:bass.dll stdcall'; |
| 63 | + |
| 64 | +function BASS_Free(): Boolean; |
| 65 | +external 'BASS_Free@files:bass.dll stdcall'; |
| 66 | +const |
| 67 | + BASS_SAMPLE_LOOP = 4; |
| 68 | +var |
| 69 | + mp3Handle: HWND; |
| 70 | + mp3Name: string; |
| 71 | +procedure InitializeWizard(); |
| 72 | +begin |
| 73 | + ExtractTemporaryFile('AnnoDominiBeatsWARZONE.mp3'); |
| 74 | + mp3Name := ExpandConstant('{tmp}\AnnoDominiBeatsWARZONE.mp3'); |
| 75 | + BASS_Init(-1, 48000, 0, 0, 0); |
| 76 | + mp3Handle := BASS_StreamCreateFile(FALSE, PAnsiChar(mp3Name), 0, 0, 0, 0, BASS_SAMPLE_LOOP); |
| 77 | + BASS_Start(); |
| 78 | + BASS_ChannelPlay(mp3Handle, False); |
| 79 | +end; |
| 80 | +procedure DeinitializeSetup(); |
| 81 | +begin |
| 82 | + BASS_Free(); |
| 83 | + BASS_Stop(); |
| 84 | +end; |
| 85 | +
|
| 86 | +[Tasks] |
| 87 | +Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked |
| 88 | + |
| 89 | +[Files] |
| 90 | +Source: "AnnoDominiBeatsWARZONE.mp3"; DestDir: "{tmp}"; Flags: dontcopy ignoreversion |
| 91 | +Source: "C:\Include_DLLInnoSetup\bass.dll"; DestDir: {tmp}; Flags: dontcopy ignoreversion |
| 92 | +Source: "E:\EAFC25_CrackPatcher\{#MyAppExeName}"; DestDir: "{app}"; Flags: ignoreversion |
| 93 | +Source: "E:\EAFC25_CrackPatcher\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs |
| 94 | +; NOTE: Don't use "Flags: ignoreversion" on any shared system files |
| 95 | + |
| 96 | +[Icons] |
| 97 | +Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}" |
| 98 | +Name: "{autodesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon |
| 99 | + |
| 100 | +[Run] |
| 101 | +Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent |
| 102 | + |
0 commit comments