Fivewin SlotMachine

Re: Fivewin SlotMachine

Postby ukoenig » Wed Jan 20, 2016 5:33 pm

Silvio,

You can include any GDI+ object from inside a Title-function.
It will be shown together with the TTitle and destroyed,if hiding the title
It belongs to the MAINWINDOW ( doesn't cover a TTitle and NOT painted on top of a TTitle)
It gives You the possibility, to show some extra effects.

Image
Code: Select all  Expand view

// -----------------

FUNCTION RESULTS(oTitle3,oTitleFont)
LOCAL oImg
LOCAL hDC := oWndMain:GetDC()

LOCAL oGraphics := Graphics():New( hDC )
// nTransparency, nRed, nGreen, nBlue
LOCAL oPen := Pen():New( 255, 0, 0, 255 )  
 // Brush-Object -> nTransparency, nRed, nGreen, nBlue
LOCAL oBrush := Brush():NewSolidBrush( 150, 0, 255, 0 )  

DEFINE IMAGE oImg FILENAME c_path1 + "Exit.bmp"

oTitle3:Show()

@ 15,  15  TITLETEXT OF oTitle3 TEXT "Results" FONT oTitleFont 3d
oTitle3:nShadowTxtClr := 65535
oTitle3:nShadowTxtDis := 10     // Shadow Text Distance

@  55,  45  TITLETEXT OF oTitle3 TEXT "1" COLOR 16777088 FONT oTitleFont
@  80,  45  TITLETEXT OF oTitle3 TEXT "2" COLOR 255 FONT oTitleFont  
@  105,  45  TITLETEXT OF oTitle3 TEXT "3" COLOR 65280 FONT oTitleFont  

@   130,  25 TITLEIMG  OF oTitle3 BITMAP c_path1 + "Exit.bmp" SIZE 50, 50 ;
TRANSPARENT ANIMA ACTION ( oGraphics:destroy(), oTitle3:Hide(), oWndMain:Refresh() )

// oPen, [oBrush], nLeft, nTop, nWidth, nHight
oPen:SetInset( )
oGraphics:DrawRect( oPen,  oBrush , 400, 550, 300, 100 )

DELETEDC( hDC )

Box-drawing
// Left, Top, Right, Bottom. Radius1, Radius2, Color, Pen
//oTitle3:bPainted := < |hDC|
//RoundBox( hDC, 5, 5, 110, 205, 10, 10, 255, 5 )
//RETURN NIL
//>

RETURN NIL
 


best regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Fivewin SlotMachine

Postby Silvio.Falconi » Thu Jan 21, 2016 8:10 am

good Idea
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7004
Joined: Thu Oct 18, 2012 7:17 pm

Re: Fivewin SlotMachine

Postby Silvio.Falconi » Thu Jan 21, 2016 8:45 am

Uwe,
a question....
Look the reels
I use Png file transparent and GBmp function
but I see white background and not transparent
you KnowHow make it ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7004
Joined: Thu Oct 18, 2012 7:17 pm

Re: Fivewin SlotMachine

Postby ukoenig » Tue Jan 26, 2016 10:30 pm

Silvio,

more tests with TTitle showing how to display and change images inside a TTitle

1. creating 5 sections
3. painting 3 images inside each section
4. random - function
5. changing images of the sections with button SPIN with a selected speed and turns
( I noticed < TITLEIMG OF oTitle > only accepts BMP ? )

Download
http://www.pflegeplus.com/DOWNLOAD/Gditest_3.zip

Image

best regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Fivewin SlotMachine

Postby Silvio.Falconi » Thu Jan 28, 2016 9:39 am

Uwe,
Now I am waiting because I am compiling my application s with new fwh and bcc7 and I have some problems
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7004
Joined: Thu Oct 18, 2012 7:17 pm

Re: Fivewin SlotMachine

Postby Silvio.Falconi » Thu Jan 28, 2016 10:28 am

I saw the exe ...good but to make a good animation engine you have to think that each wheel must turn 9 images and you should also implement a system that shows the images more or less times: for example, those who have to go out more and those who have never come out or sometimes (those who are at the top of the standings), then I use the class Gdiplus to view images, generally in the slot you see there are 3 images per wheel (and 5 rings), there are 4 slots in the new images to 5 wheels but line of payment are 100 and not 40/25/10/5

if you wish help me try to create a bonus game type
samples:
1. High card or less Card
2. BlackJack ( small) user->Pc
3. see the slot ( http://www.cartolinefree.eu/santaslot/index.html) when there is the bonus I have on my site 5 box and the use can select only 3 box to have the points . How We can implement it on fwh?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7004
Joined: Thu Oct 18, 2012 7:17 pm

Re: Fivewin SlotMachine

Postby ukoenig » Tue Feb 02, 2016 10:33 am

Silvio,

I tested displaying animated GIF's inside ttitles to simulate turning wheels.
It is possible and works fine.
I will test / create VERTICAL animated GIF's, using some symbols
How can I stop / close the GIF's after some defined turns ?
Maybe the only solution : closing the ttitles and reopen them ?

Image

any idea about to stop / closing the GIF ?

best regards
Uwe :?:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Fivewin SlotMachine

Postby Antonio Linares » Tue Feb 02, 2016 10:44 am

Uwe,

oGif:Stop()
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42048
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Fivewin SlotMachine

Postby ukoenig » Tue Feb 02, 2016 2:34 pm

Antonio,

thank You very much.
I finished my test to display animated Gif's inside TTitles with VERTICAL-movements like a turning wheel

It is just the basics, to test and show how it works
5 Gifs are running the same time, they stop after a defined time / turns
and the end-result-images are shown.
To make it perfect, You need 5 Gif-files. Each gif must start with a different image.
For my test Ii used only 3 GIF-files

Animated gifs are included : a complete working-set with different start-images and size adjusted.
1 animated gif includes 3 images with 3 subimages each
The logic :

Image

The best FREE Anigifcreator and easy to use You can find at
http://www.photoscape.org

Downlod my complete test
http://www.pflegeplus.com/DOWNLOADS/Anigif1.zip

1. the start-images are shown
2. the button < SPIN > creates and runs 5 animated GIF-files
3. the spinning stops after a defined time
4. a random-generator defines the end-result images


Image

From the download-page select the language

the usage :

Image

Add the images and select movement to top ( wheel-effect )

Image

best regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Fivewin SlotMachine

Postby Antonio Linares » Tue Feb 02, 2016 6:47 pm

Uwe,

great work! :-)

What screen resolution are you using ?

Here I am testing with 1400 x 1050 and the spin and pay table buttons are not properly placed in the right location
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42048
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Fivewin SlotMachine

Postby ukoenig » Thu Feb 04, 2016 10:13 am

Antonio,

the screen resolution I'm using is 1024 x 768
That is the lowest used with modern monitors

I tested TRANSPARENT, but it seems not to be supported ?

There is a great tool to make animated gif's transparent < gifsicle >
As well it is FREE of charge !
Download from :
https://eternallybored.org/misc/gifsicle/

gifsicle is a powerful command-line program for creating, editing, manipulating, and getting information about GIF images and animations.
Gifsicle normally processes input GIF files according to its command line options and writes the result to the standard output. The −i option, for example, tells gifsicle to interlace its inputs:
gifsicle −i < pic.gif > interlaced-pic.gif
Gifsicle is good at creating and manipulating GIF animations. By default, it combines two or more input files into a “flipbook” animation:
gifsicle pic1.gif pic2.gif pic3.gif > animation.gif
Use options like −−delay, −−loopcount, and −−optimize to tune your animations.
To modify GIF files in place, use the −−batch option. With −−batch, gifsicle will modify the files you specify instead of writing a new file to the standard output. To interlace all the GIFs in the current directory, you could say:
gifsicle −−batch −i *.gif


To explode ‘Halo.gif’ into its component frames:

gifsicle −−explode Haloanim.gif
ls Halo.gif*

Results
Halo.gif Halo.gif.000 Halo.gif.001 Halo.gif.002 Halo.gif.003 ......


Image


I will do some more tests with animated Gif's

best regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Fivewin SlotMachine

Postby albeiroval » Wed Mar 02, 2016 3:15 pm

Buen dia,

Silvio algun avance para mostrar con SlotMachine ?

Puedes contactarme por albeiroval [arroba] gmail[.]com
Saludos,
Regards,

Albeiro Valencia
www.avcsistemas.com
User avatar
albeiroval
 
Posts: 365
Joined: Tue Oct 16, 2007 5:51 pm
Location: Barquisimeto - Venezuela

Re: Fivewin SlotMachine

Postby Silvio.Falconi » Wed Mar 02, 2016 8:59 pm

sent ademo 5 reels.
U can found a slot at my site http://www.eoeo.it
for the 5reels i made a roller class but I'n working on it to make others features
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7004
Joined: Thu Oct 18, 2012 7:17 pm

Re: Fivewin SlotMachine

Postby joseluisysturiz » Mon Sep 18, 2017 11:29 pm

ukoenig wrote:Silvio,

I can make the rounded walls with adjusted vertical lines if You like
adjusting the optical distortion ( see the difference )
I think that looks better

Image

best regards
Uwe :?:


Saludos Mr.Uwe, estoy diseñando el sistema de ruleta de la suerte y me gustaria usar un fondo en 3D de un casino o parecido al que tienes aca, puede recomendarme alguna pagina web para ver algunos fondos haber si alguno me sirve para mi proyecto.? saludos, gracias... :shock:

Greetings Mr.Uwe, I am designing the roulette system of luck and I would like to use a 3D background of a casino or similar to the one you have here, you can recommend me some website to see some funds if any one serves me for my project. ? greetings thank you... :shock:
Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela

Previous

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: byron.hopp, Lailton and 41 guests