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

Reply
 
Thread Tools Display Modes
  #76  
Old 05-11-2014, 01:47
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
Quote:
Originally Posted by minh_k43sj View Post
great
you can add music background to scrip ?
Code:
[Files]
Source: File\Bass.dll; DestDir: {tmp}; Flags: dontcopy deleteafterinstall noencryption nocompression
Source: File\music.mp3; DestDir: {tmp}; Flags: dontcopy deleteafterinstall noencryption nocompression

[ Code]
type
HSTREAM = DWORD;

function BASS_Init(device: Integer; freq, flags: DWORD; win: hwnd; CLSID: Integer): Boolean;
external 'BASS_Init@files:BASS.dll stdcall delayload';
function BASS_StreamCreateFile(mem: BOOL; f: PAnsiChar; offset: DWORD; length: DWORD; flags: DWORD): HSTREAM;
external 'BASS_StreamCreateFile@files:BASS.dll stdcall delayload';
function BASS_Start(): Boolean;
external 'BASS_Start@files:BASS.dll stdcall delayload';
function BASS_Pause(): Boolean;
external 'BASS_Pause@files:BASS.dll stdcall delayload';
function BASS_ChannelPlay(handle: DWORD; restart: BOOL): Boolean;
external 'BASS_ChannelPlay@files:BASS.dll stdcall delayload';
function BASS_Stop(): Boolean;
external 'BASS_Stop@files:BASS.dll stdcall delayload';
function BASS_Free(): Boolean;
external 'BASS_Free@files:BASS.dll stdcall delayload';


const
BASS_SAMPLE_LOOP = 4;

var
MusicButton: TButton;
Name: string;
i : Integer;

procedure MusicButtonOnClick(Sender: TObject);
begin
if MusicButton.Caption = 'Music On' then
begin
MusicButton.Caption := 'Music Off';
BASS_Pause;
end else 
begin                                                
MusicButton.Caption := 'Music On';
BASS_Start;
end;
end;

procedure InitializeWizard();
begin
ExtractTemporaryFile('BASS.dll');
ExtractTemporaryFile('music.mp3');
if BASS_Init(-1, 44100, 0, 0, 0) then
begin
BASS_Start;
Name:=ExpandConstant('{tmp}\music.mp3');
i:=BASS_StreamCreateFile(FALSE, PAnsiChar(Name), 0, 0, 4);
if i <> 0 then
begin
BASS_ChannelPlay(i, True);
end;

MusicButton := TNewButton.Create(WizardForm);
MusicButton.Parent := WizardForm;
MusicButton.SetBounds(4,337,131,20);
MusicButton.Caption := 'Music On';
MusicButton.OnClick:=@MusicButtonOnClick;
end;
end;

procedure DeinitializeSetup();
begin
BASS_Stop;
BASS_Free;
end;
Reply With Quote
The Following 2 Users Say Thank You to Dante1995 For This Useful Post:
Andrey167 (05-11-2014), minh_k43sj (05-11-2014)
Sponsored Links
  #77  
Old 05-11-2014, 05:30
minh_k43sj minh_k43sj is offline
Registered User
 
Join Date: Oct 2014
Location: ho chi minh
Posts: 23
Thanks: 14
Thanked 1 Time in 1 Post
minh_k43sj is on a distinguished road
Quote:
Originally Posted by Dante1995 View Post
BBoxScript is test
working 100%
lang english
How to add skin.cjstyles to scrip, please help me
Reply With Quote
  #78  
Old 05-11-2014, 05:39
punchao's Avatar
punchao punchao is offline
Registered User
 
Join Date: Apr 2014
Location: Barcelona
Posts: 156
Thanks: 112
Thanked 44 Times in 36 Posts
punchao is on a distinguished road
Bro,where I put data1.bin, before compiling?
Reply With Quote
  #79  
Old 05-11-2014, 19:54
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
Quote:
Originally Posted by minh_k43sj View Post
How to add skin.cjstyles to scrip, please help me
Simply enter the code under the following headings in blue and if there is no paste all the code

ex: only
Code:
UnloadSkin;
or
all
Code:
procedure DeinitializeUninstall;
begin
UnloadSkin;
end;


Simply enter the isSkin.dll files and Tiger.cjstyles in the folder style

#define SkinDll "isSkin.dll"
#define StyleName "Tiger.cjstyles"

[Setup]

[Files]
Source: "style\{#SkinDll}"; DestDir: "{app}"; Flags: ignoreversion; Attribs: hidden system;
Source: "style\{#StyleName}"; DestDir: "{app}"; Flags: ignoreversion; Attribs: hidden system;

[ Code]
procedure LoadSkin(lpszPath: PAnsiChar; lpszIniFileName: PAnsiChar); external 'LoadSkin@{tmp}\{#SkinDll} stdcall delayload';
procedure UnloadSkin; external 'UnloadSkin@{tmp}\{#SkinDll} stdcall delayload';
function ShowWindow(hWnd: Integer; uType: Integer): Integer; external '[email protected] stdcall';

function InitializeSetup: Boolean;
begin

ExtractTemporaryFile('{#SkinDll}');
ExtractTemporaryFile('{#StyleName}');
LoadSkin(ExpandConstant('{tmp}\{#StyleName}'), '');

Result:=True;
end;

procedure DeinitializeSetup;
begin

ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}') ), 0);
UnloadSkin;
end;

function InitializeUninstall: Boolean;
begin

FileCopy(ExpandConstant('{app}\{#SkinDll}'), ExpandConstant('{tmp}\{#SkinDll}'), False);
FileCopy(ExpandConstant('{app}\{#StyleName}'), ExpandConstant('{tmp}\{#StyleName}'), False);
LoadSkin(ExpandConstant('{tmp}\{#StyleName}'), '');
Result:=True;
end;

procedure DeinitializeUninstall;
begin

UnloadSkin;
end;

Last edited by Dante1995; 05-11-2014 at 20:00.
Reply With Quote
The Following User Says Thank You to Dante1995 For This Useful Post:
minh_k43sj (05-11-2014)
  #80  
Old 06-11-2014, 18:25
Souvik Giri's Avatar
Souvik Giri Souvik Giri is offline
Registered User
 
Join Date: Jun 2014
Location: Zero Time
Posts: 7
Thanks: 100
Thanked 1 Time in 1 Post
Souvik Giri is on a distinguished road
Another request. Please, give metro.cjstyles.
Reply With Quote
  #81  
Old 06-11-2014, 18:54
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
metro no is .cjstyles is vcl styles

Last edited by Dante1995; 28-12-2014 at 21:54.
Reply With Quote
The Following 4 Users Say Thank You to Dante1995 For This Useful Post:
ChronoCross (07-11-2014), mausschieber (07-11-2014), Razor12911 (17-12-2014), Souvik Giri (06-11-2014)
  #82  
Old 08-11-2014, 06:41
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
MetroRun

AutoRun

Last edited by Dante1995; 28-12-2014 at 21:54.
Reply With Quote
The Following User Says Thank You to Dante1995 For This Useful Post:
Razor12911 (11-11-2014)
  #83  
Old 11-11-2014, 04:42
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
isdoneex

isdoneex

Last edited by Dante1995; 28-12-2014 at 21:54.
Reply With Quote
The Following 4 Users Say Thank You to Dante1995 For This Useful Post:
Andrey167 (11-11-2014), ChronoCross (11-11-2014), mausschieber (11-11-2014), Razor12911 (11-11-2014)
  #84  
Old 18-11-2014, 17:59
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
ISDone_Final_Dante1995-Slide+Music

Simply Script ISDone

is the script that I use for my games
I do not respond to comments on changes

Last edited by Dante1995; 28-12-2014 at 21:54.
Reply With Quote
The Following 3 Users Say Thank You to Dante1995 For This Useful Post:
Andrey167 (19-11-2014), Carldric Clement (16-12-2014), oltjon (16-12-2014)
  #85  
Old 16-12-2014, 13:43
felice2011's Avatar
felice2011 felice2011 is offline
Registered User
 
Join Date: Feb 2011
Location: italy
Posts: 836
Thanks: 354
Thanked 1,152 Times in 388 Posts
felice2011 is on a distinguished road
Hi Dante, I know you're competent in compiling installations with Inno Setup.

I would like to ask you if you are able to complete an installation on a single page containing the trailer, the choice of components and the installation of the game.

I send you an example:

Attachment 10659

Thanks Bro!!!!

Last edited by felice2011; 02-01-2015 at 01:30.
Reply With Quote
  #86  
Old 16-12-2014, 15:43
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
if you need to throw with inno setup no problem (Single or not), but understand from this program on what to do, then that's problem .... the best thing to do, is to create a screenshot with photoshop detailed. you should also take care of the program you've zipped, simple things, you can enrich and treat in detail as the other, the designe, options and extras in short, know how to give a touch of magic is fine, but you can never forget elegance or lose the originality of the product

ita
se ti serve lanciare con inno setup non c'è problema (sigola o non ), ma capire da questo programma il cosa fare, allora si che c'è problema.... la meglio cosa da fare, è creare uno screenshot con photoshop dettagliato. ti consiglio anche di curare il programma che hai zippato, le cose semplici, si possono arricchire e curare nel dettaglio come le altre, il designe,le opzioni e gli extra insomma, sai? dare un tocco di magia va bene, ma non bisogna mai trascurare l'eleganza o si perde l'originalità del prodotto

Last edited by Dante1995; 16-12-2014 at 15:47.
Reply With Quote
  #87  
Old 17-12-2014, 06:46
felice2011's Avatar
felice2011 felice2011 is offline
Registered User
 
Join Date: Feb 2011
Location: italy
Posts: 836
Thanks: 354
Thanked 1,152 Times in 388 Posts
felice2011 is on a distinguished road
The zip I posted is just an example to understand,it's just an old installation created by me compiled in HTA.
Simply a setup with a video trailer superimposed, with the possibility of choice in the same page of the components and the installation folder of the game.
Ex:
Attachment 10660

Attachment 10661


Lo zip postato è solo una mia vecchia installazione di giochi, che usavo precedentemente.
In un unica pagina ho la possibilità di scelta dei componenti e dell'installazione del gioco, in piu' il trailer sovraimpresso del gioco, che l'utente puo' guardare nel tempo dell'installazione, per non rompersi le ballette, e rendersi conto del tipo di gioco.
Logicamente puoi sbizzarrirti come vuoi le immagini postate rimangono solo un esempio.
Grazie Fratello.

Last edited by felice2011; 25-09-2018 at 15:53.
Reply With Quote
  #88  
Old 17-12-2014, 07:22
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
you need more in the trailer right?


ti serve in più il trailer giusto?

Last edited by Dante1995; 17-12-2014 at 07:32.
Reply With Quote
  #89  
Old 17-12-2014, 07:27
felice2011's Avatar
felice2011 felice2011 is offline
Registered User
 
Join Date: Feb 2011
Location: italy
Posts: 836
Thanks: 354
Thanked 1,152 Times in 388 Posts
felice2011 is on a distinguished road
Quote:
Originally Posted by Dante1995 View Post
ti serve in più il trailer giusto?
That's Right
Se si può ringrandire anche la schermata dell'installazione in modo che la dimensione del video non resti troppo piccola.
Sai...!!!...per quelli come me che portano gli occhiali...

Last edited by felice2011; 17-12-2014 at 07:50.
Reply With Quote
  #90  
Old 17-12-2014, 08:33
Dante1995 Dante1995 is offline
Banned
 
Join Date: Feb 2014
Location: Black Hole
Posts: 297
Thanks: 116
Thanked 479 Times in 162 Posts
Dante1995 is on a distinguished road
done

spero di avere capito..
i jpg per lo slideshow, devono essere ingranditi 800x430 per il fullscreen, poi vedi tu...






I hope you understand ..
jpg for the slideshow, should be enlarged to 800x430 fullscreen, then see you

Last edited by Dante1995; 28-12-2014 at 21:54.
Reply With Quote
The Following User Says Thank You to Dante1995 For This Useful Post:
mausschieber (17-12-2014)
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
Inno Setup: Additional Libraries altef_4 Conversion Tutorials 50 21-10-2020 10:59
Blackbox Inno Setup Script Kurutucu Conversion Tutorials 1190 18-08-2019 23:43
INNO TUTORIAL - Using Unicode and ANSI Versions of INNO Setup REV0 Conversion Tutorials 51 26-03-2015 07:57
Copy file with Inno Setup Script emrahcey Software 1 02-07-2010 09:24



All times are GMT -7. The time now is 22:17.


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