Go Back   FileForums > Game Backup > PC Games > PC Games - CD/DVD Conversions > Conversion Tutorials

Reply
 
Thread Tools Display Modes
  #16  
Old 17-01-2022, 16:32
ScOOt3r ScOOt3r is offline
Registered User
 
Join Date: Jun 2019
Location: Canada
Posts: 75
Thanks: 604
Thanked 37 Times in 32 Posts
ScOOt3r is on a distinguished road
Is there anyway to add Install Time, how long it took to install, to this.

thanks

ScOOt3r
Reply With Quote
Sponsored Links
  #17  
Old 19-02-2022, 22:24
kuyhaa's Avatar
kuyhaa kuyhaa is offline
Registered User
 
Join Date: Jun 2019
Location: metro
Posts: 54
Thanks: 88
Thanked 8 Times in 4 Posts
kuyhaa is on a distinguished road
how to add password in this installer (support text and number password)

i try change this pass: ka321

*{#MyExtension}'), ExpandConstant('{app}'), '', False, 'ka321'

but still error
Reply With Quote
  #18  
Old 23-02-2022, 20:57
Behnam2018 Behnam2018 is offline
Registered User
 
Join Date: Jun 2018
Location: IRAN
Posts: 56
Thanks: 928
Thanked 24 Times in 20 Posts
Behnam2018 is on a distinguished road
Unhappy

Please FIX ERROR
Attached Images
File Type: jpg 111111.JPG (179.2 KB, 195 views)
Reply With Quote
  #19  
Old 23-02-2022, 22:05
:( Sad8669 :( Sad8669 is offline
Registered User
 
Join Date: Oct 2020
Location: -
Posts: 203
Thanks: 97
Thanked 187 Times in 101 Posts
:( Sad8669 is on a distinguished road
Try removing one "l" letter from the word "fille"
Reply With Quote
  #20  
Old 10-07-2022, 02:19
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Bass.dll

Hey all, brilliant script but I cannot seem to get music playing during the install process, maybe its just me but could someone have a look at my script image or post a working script please.

Many Thanks

Wiki

https://imgur.com/a/KTop1Mi



[Files]
Source: Script\ISDONE.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\ENGLISH.INI; DestDir: {tmp}; Flags: dontcopy
Source: Script\LOGOIMAGE.BMP; DestDir: {tmp}; Flags: dontcopy
#ifdef enablevclstyles
Source: Script\VCLSTYLESINNO.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\STYLE.VSF; DestDir: {tmp}; Flags: dontcopy
#endif
#ifdef enablemusic
Source: Script\BASS.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\MUSIC.MP3; DestDir: {tmp}; Flags: dontcopy
#endif
Source: {#Resources}; DestDir: {tmp}; Flags: dontcop
Reply With Quote
  #21  
Old 10-07-2022, 13:06
Masquerade's Avatar
Masquerade Masquerade is offline
Registered User
 
Join Date: Jan 2020
Location: Monte d'Or
Posts: 1,167
Thanks: 284
Thanked 1,358 Times in 615 Posts
Masquerade is on a distinguished road
Quote:
Originally Posted by Wikinoob View Post
Hey all, brilliant script but I cannot seem to get music playing during the install process
Did you enable music in the config at the top of the script?

Code:
//#define enablemusic
//Remove // to enable music support
Reply With Quote
The Following User Says Thank You to Masquerade For This Useful Post:
Wikinoob (11-07-2022)
  #22  
Old 11-07-2022, 09:49
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Quote:
Originally Posted by Masquerade View Post
Did you enable music in the config at the top of the script?

Code:
//#define enablemusic
//Remove // to enable music support
This is what I have so far...

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////// Simple Script - Thanks KaktoR, Cesar82, DiCaPrIo
////////// Uses ISDONE library v0.6 final thanks to ProFrager (https://krinkels.org/resources/isdone.67/)
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

#define Name "The Sims 4" ;; Insert Name of Program Here
#define AppVersion "1.89.214.1030" ;; Program Version
#define Size "51GB" ;; This is just a string, type size in MB or GB, it's up to you!
#define Binary "TS4_x64.exe" ;; Type full path to EXE file
#define myextension "data.bin" ;; You can edit this to be whatever you want

#define EnableVclStyles
//Remove // to enable VCL styles support

#define Enablemusic
//Remove // to enable music support

//// You do not need to change anything below this line! ////
#define Resources "Include\*"

[Setup]
AllowCancelDuringInstall=yes
AllowNetworkDrive=no
AllowRootDirectory=no
AppName={#Name}
AppVersion={#AppVersion}
DefaultDirName={sd}\Games\{#Name}
DisableDirPage=yes
DisableFinishedPage=yes
DisableProgramGroupPage=yes
DisableReadyMemo=yes
DisableReadyPage=yes
DisableWelcomePage=yes
OutputDir=.
OutputBaseFilename=Setup
SetupIconFile=Script\icon.ico
UninstallFilesDir={app}
UnInstallable=yes
Reply With Quote
  #23  
Old 11-07-2022, 09:56
KaktoR's Avatar
KaktoR KaktoR is offline
Lame User
 
Join Date: Jan 2012
Location: From outer space
Posts: 4,412
Thanks: 1,078
Thanked 7,017 Times in 2,658 Posts
KaktoR is on a distinguished road
It works here
__________________
Haters gonna hate
Reply With Quote
The Following User Says Thank You to KaktoR For This Useful Post:
Wikinoob (11-07-2022)
  #24  
Old 11-07-2022, 09:58
ScOOt3r ScOOt3r is offline
Registered User
 
Join Date: Jun 2019
Location: Canada
Posts: 75
Thanks: 604
Thanked 37 Times in 32 Posts
ScOOt3r is on a distinguished road
it works for me too as this is my goto installer

ScOOt3r
Reply With Quote
The Following User Says Thank You to ScOOt3r For This Useful Post:
Wikinoob (11-07-2022)
  #25  
Old 11-07-2022, 10:02
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Does my script look ok then?
Reply With Quote
  #26  
Old 11-07-2022, 10:04
ScOOt3r ScOOt3r is offline
Registered User
 
Join Date: Jun 2019
Location: Canada
Posts: 75
Thanks: 604
Thanked 37 Times in 32 Posts
ScOOt3r is on a distinguished road
yes it does if you want to add music to your installer

also this line
#define myextension "data.bin" ;; You can edit this to be whatever you want (your script) is fine but if there is more then one .bin file which is common then you need or can change it to

#define myextension ".bin" /* You can edit this to be whatever you want */ (and it will automatically read anything with a.bin extension great when you have selective stuff or optional stuff like language files etc.


ScOOt3r

Last edited by ScOOt3r; 11-07-2022 at 10:07.
Reply With Quote
The Following User Says Thank You to ScOOt3r For This Useful Post:
Wikinoob (11-07-2022)
  #27  
Old 11-07-2022, 10:09
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Quote:
Originally Posted by ScOOt3r View Post
yes it does if you want to add music to your installer

also this line
#define myextension "data.bin" ;; You can edit this to be whatever you want (your script) is fine but if there is more then one .bin file which is common then you need or can change it to

#define myextension ".bin" /* You can edit this to be whatever you want */ (and it will automatically read anything with a.bin extension great when you have selective stuff or optional stuff like language files etc.


ScOOt3r
Its weird then, I must be doing something wrong as the MUSIC.MP3 is in the "Script" folder but not playing once compiled and running installer?
Reply With Quote
  #28  
Old 11-07-2022, 10:13
ScOOt3r ScOOt3r is offline
Registered User
 
Join Date: Jun 2019
Location: Canada
Posts: 75
Thanks: 604
Thanked 37 Times in 32 Posts
ScOOt3r is on a distinguished road
make a backup of your current script.iss and then re copy a clean script with no changes from the one from the site again and just edit the music only to see if it works.. dont change anything else.

from this:
//#define enablemusic /* Remove ; to enable music support */

to this
#define enablemusic /* Remove ; to enable music support */
Reply With Quote
The Following User Says Thank You to ScOOt3r For This Useful Post:
Wikinoob (11-07-2022)
  #29  
Old 11-07-2022, 10:16
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Quote:
Originally Posted by ScOOt3r View Post
make a backup of your current script.iss and then re copy a clean script with no changes from the one from the site again and just edit the music only to see if it works.. dont change anything else.

from this:
//#define enablemusic /* Remove ; to enable music support */

to this
#define enablemusic /* Remove ; to enable music support */
Still no music playing??? Very strange
Reply With Quote
  #30  
Old 11-07-2022, 10:17
Wikinoob Wikinoob is offline
Registered User
 
Join Date: Apr 2018
Location: UK
Posts: 41
Thanks: 24
Thanked 10 Times in 7 Posts
Wikinoob is on a distinguished road
Below is the FULL Script

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////// Simple Script - Thanks KaktoR, Cesar82, DiCaPrIo
////////// Uses ISDONE library v0.6 final thanks to ProFrager (https://krinkels.org/resources/isdone.67/)
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

#define Name "The Sims 4" ;; Insert Name of Program Here
#define AppVersion "1.89.214.1030" ;; Program Version
#define Size "51GB" ;; This is just a string, type size in MB or GB, it's up to you!
#define Binary "Game\Bin\TS4_x64.exe" ;; Type full path to EXE file
#define myextension "data.bin" ;; You can edit this to be whatever you want

#define EnableVclStyles
//Remove // to enable VCL styles support

#define enablemusic /* Remove ; to enable music support */

//// You do not need to change anything below this line! ////
#define Resources "Include\*"

[Setup]
AllowCancelDuringInstall=yes
AllowNetworkDrive=no
AllowRootDirectory=no
AppName={#Name}
AppVersion={#AppVersion}
DefaultDirName={sd}\Games\{#Name}
DisableDirPage=yes
DisableFinishedPage=yes
DisableProgramGroupPage=yes
DisableReadyMemo=yes
DisableReadyPage=yes
DisableWelcomePage=yes
OutputDir=.
OutputBaseFilename=Setup
SetupIconFile=Script\icon.ico
UninstallFilesDir={app}
UnInstallable=yes

[Files]
Source: Script\ISDONE.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\ENGLISH.INI; DestDir: {tmp}; Flags: dontcopy
Source: Script\LOGOIMAGE.BMP; DestDir: {tmp}; Flags: dontcopy
#ifdef enablevclstyles
Source: Script\VCLSTYLESINNO.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\STYLE.VSF; DestDir: {tmp}; Flags: dontcopy
#endif
#ifdef enablemusic
Source: Script\BASS.DLL; DestDir: {tmp}; Flags: dontcopy
Source: Script\MUSIC.MP3; DestDir: {tmp}; Flags: dontcopy
#endif
Source: {#Resources}; DestDir: {tmp}; Flags: dontcopy

[Icons]
Name: "{commondesktop}\{#Name}"; Filename: "{app}\{#Binary}"; Check: CreateADesktopIcon

[Code]
type
TCallback = function (OveralPct, CurrentPct: Integer; CurrentFile, TimeStr1, TimeStr2, TimeStr3: PAnsiChar): LongWord;

var
DesktopIconCheckBox: TNewCheckBox;
Progress: TNewProgressBar;
RequiredLabel: TLabel;
ISDoneCancel: Integer;
ISDoneError: Boolean;
LogoImage: TBitmapImage;

#ifdef EnableVclStyles
procedure LoadVCLStyle(VClStyleFile: String);
external 'LoadVCLStyleW@{tmp}\VclStylesInno.dll stdcall delayload';
procedure UnLoadVCLStyles;
external 'UnLoadVCLStyles@{tmp}\VclStylesInno.dll stdcall delayload';
#endif
function FileSearchInit(RecursiveSubDir: Boolean): Boolean; external 'FileSearchInit@files:ISDone.dll stdcall delayload';
function ISArcExtract(CurComponent: Cardinal; PctOfTotal: Double; InName, OutPath, ExtractedPath: AnsiString; DeleteInFile: Boolean; Password, CfgFile, WorkPath: AnsiString; ExtractPCF: Boolean): Boolean; external 'ISArcExtract@files:ISDone.dll stdcall delayload';
function Exec2 (FileName, Param: PAnsiChar;Show: Boolean): Boolean; external 'Exec2@files:ISDone.dll stdcall delayload';
function ISDoneInit(RecordFileName: AnsiString; TimeType, Comp1, Comp2, Comp3: Cardinal; WinHandle, NeededMem: Longint; Callback: TCallback): Boolean; external 'ISDoneInit@files:ISDone.dll stdcall';
function ISDoneStop: Boolean; external 'ISDoneStop@files:ISDone.dll stdcall';
function ChangeLanguage(Language:AnsiString): Boolean; external 'ChangeLanguage@files:ISDone.dll stdcall delayload';

function ProgressCallback(OveralPct,CurrentPct: Integer;CurrentFile,TimeStr1,TimeStr2,TimeStr3:PAn siChar): LongWord;
begin
if OveralPct <= 1000 then
Progress.Position := OveralPct;
Result := ISDoneCancel;
end;

function CreateADesktopIcon: Boolean;
begin
Result := DesktopIconCheckBox.Checked and (not ISDoneError);
end;


///// Code by DiCaPrIo /////
function InitializeSetup:boolean;
begin
#define FHandle
#define FRst
#define Mask Resources
#sub ProcessFiles
#define FileName FindGetFileName(FHandle)
ExtractTemporaryFile('{#FileName}');
#endsub
#for {FHandle = FRst = FindFirst(Mask, 0); FRst; FRst = FindNext(FHandle)} ProcessFiles
Result:=True;
end;
/////////////////////////////

procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
ISDoneCancel := 1;
Cancel := True;
Confirm := False;
end;

procedure InitializeWizard();
begin
with WizardForm do
begin
#ifdef EnableVclStyles
ExtractTemporaryFile('VCLSTYLESINNO.DLL');
ExtractTemporaryFile('STYLE.VSF');
LoadVCLStyle(ExpandConstant('{tmp}\STYLE.VSF'));
#endif
Bevel.Hide;
Caption := '{#Name} | Setup';
InnerNotebook.Hide;
OuterNotebook.Hide;
Position := poScreenCenter;
WizardBitmapImage.Show;
WizardForm.ClientWidth := ScaleX(345);
WizardForm.ClientHeight := ScaleY(200);
end;

with WizardForm.DirBrowseButton do
begin
Parent := WizardForm;
SetBounds(ScaleX(305), ScaleY(120), ScaleX(30), ScaleY(25));
Caption := '...'
end;

with WizardForm.DirEdit do
begin
Parent := WizardForm;
SetBounds(ScaleX(10), ScaleY(122), ScaleX(285), ScaleY(25));
end;

Requiredlabel := TLabel.Create(WizardForm);
with Requiredlabel do
begin
Parent := WizardForm;
SetBounds(ScaleX(10), ScaleY(152), ScaleX(390), ScaleY(25));
RequiredLabel.Caption := ExpandConstant('Required Space: {#Size}');
Font.Style := [fsBold];
end;

DesktopIconCheckBox := TNewCheckBox.Create(WizardForm);
with DesktopIconCheckBox do
begin
Parent := WizardForm;
SetBounds(ScaleX(10), ScaleY(170), ScaleX(150), ScaleY(20));
Caption := ExpandConstant('Create a Desktop Icon');
Checked := False;
Font.Style := [fsBold];
end;

Progress:= TNewProgressBar.Create(WizardForm);
with Progress do
begin
Parent := WizardForm;
SetBounds(ScaleX(10), ScaleY(122), ScaleX(325), ScaleY(25));
Max := 1000;
end;

ExtractTemporaryFile('logoimage.bmp');
LogoImage := TBitmapImage.Create(WizardForm);
with LogoImage do
begin
Name := 'LogoImage';
Parent := WizardForm;
Stretch := True;
Bitmap.AlphaFormat := afDefined;
SetBounds(ScaleX(10), ScaleY(10), ScaleX(325), ScaleY(100));
Bitmap.LoadFromFile(ExpandConstant('{tmp}\logoimag e.bmp'));
end;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID = wpWelcome then
begin
LogoImage.Show;
Progress.Hide;
RequiredLabel.Show;
WizardForm.CancelButton.Show;
end;

if CurPageID = wpInstalling then
begin
Progress.Show;
DesktopIconCheckBox.Enabled := False;
WizardForm.DirEdit.Hide;
WizardForm.DirBrowseButton.Hide;
end;
end;

procedure CurStepChanged(CurStep: TSetupStep);
begin
if CurStep = ssInstall then
begin
ISDoneCancel := 0;
ISDoneError := True;
if ISDoneInit(ExpandConstant('{tmp}\records.inf'), $F777, 0, 0, 0, MainForm.Handle, 512, @ProgressCallback) and FileSearchInit(True) then
begin
ExtractTemporaryFile('ENGLISH.INI');
ChangeLanguage('English');
if FileExists(ExpandConstant('{tmp}\CLS-SREP.dll')) and (not IsIniSectionEmpty('SREP', ExpandConstant('{tmp}\CLS.ini'))) then
SetIniString('SREP', 'TempPath', ExpandConstant('{app}'), ExpandConstant('{tmp}\CLS.ini'));
if FileExists(ExpandConstant('{tmp}\CLS-SREP_NEW.dll')) and (not IsIniSectionEmpty('SREP_NEW', ExpandConstant('{tmp}\CLS.ini'))) then
SetIniString('SREP_NEW', 'TempPath', ExpandConstant('{app}'), ExpandConstant('{tmp}\CLS.ini'));
if FileExists(ExpandConstant('{tmp}\CLS-SREP_OLD.dll')) and (not IsIniSectionEmpty('SREP_OLD', ExpandConstant('{tmp}\CLS.ini'))) then
SetIniString('SREP_OLD', 'TempPath', ExpandConstant('{app}'), ExpandConstant('{tmp}\CLS.ini'));
if FileExists(ExpandConstant('{tmp}\CLS-PRECOMP.dll')) and (not IsIniSectionEmpty('PRECOMP', ExpandConstant('{tmp}\CLS.ini'))) then
SetIniString('PRECOMP', 'TempPath', ExpandConstant('{app}'), ExpandConstant('{tmp}\CLS.ini'));
repeat
if not ISArcExtract(0, 0, ExpandConstant('{src}\*{#MyExtension}'), ExpandConstant('{app}'), '', False, '', ExpandConstant('{tmp}\Arc.ini'), ExpandConstant('{app}'), False) then Break;
ISDoneError := False;
until True;
ISDoneStop;
end;
end;

if (CurStep = ssPostInstall) and ISDoneError then
begin
Exec2(ExpandConstant('{uninstallexe}'), '/VERYSILENT', False);
end;

if CurStep = ssDone then
begin
if not ISDoneError then
MsgBox('Installation Success.', mbInformation, MB_OK)
else
MsgBox('Installation Fail.', mbInformation, MB_OK);
end;
end;

procedure DeinitializeSetup();
begin
#ifdef EnableVclStyles
UnLoadVCLStyles(); //Unload the VCL Style if it was enabled.
#endif

end;

[UninstallDelete]
Type: filesandordirs; Name: {app}
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Light Installer Script (LIS) - DiskSpan_GUI Cesar82 Conversion Tutorials 203 04-10-2024 11:48
Ultimate Conversion Compressor (UCC) vollachr Conversion Tutorials 55 26-04-2021 10:27
INDEX - Conversion Tutorial Index Razor12911 Conversion Tutorials 5 11-06-2020 03:05



All times are GMT -7. The time now is 10:39.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions Inc.
Copyright 2000-2020, FileForums @ https://fileforums.com