Office 2010 like Splashscreen

[GtaSpider]

Hey there,

I just created an new UDF and want to share it with you. With this UDF you can easily create a graphical complex Splashscreen.

Here an Example:

expandcollapse popup

#include "ModernSplash.au3"

;                   $sTitle,            $sBuild = "",               $bProgress = False, $sCallBack_Exit = "",   $iCorners = 20, $sMovieFile = "", $sFont = "Arial"
_ModernSplash_Create(   "ModernSplash", "v1.1 ("&FileGetTime(@ScriptFullPath,0,1)&")",  True,           "_exit",                20);Warning, changed now...

_ModernSplash_Initiate("Load...");First initiate. Stat with Text: "Load..."

;Progress Marquee. As higher the number (10) as slower the marquee!
_ModernSplash_ProgressMarquee(10)
_ModernSplash_TextNext("Loading resources...")
Sleep(100);do smth
_ModernSplash_TextNext("This is a quite long text to test how quite long textes looks like on this splash and i think it looks quite nice, doesn't it?")
Sleep(500);do smth
_ModernSplash_TextNext("Max rox!")
MsgBox(0,"","You can try to exit the Splash by clicking on the X on the right or push esc"&@CRLF&"It will close then after this messagebox dissappears")

;Stop Marquee
_ModernSplash_ProgressMarquee(False)
$ms = 0
For $i = 1 To 10
    _ModernSplash_TextChange("Ping Google"&@CRLF&$i&"/10");Update text without animation
    $ms += Ping("www.google.de")
    _ModernSplash_ProgressUpdate($i*10);Update Progress
    If $i = 6 Then
        _ModernSplash_ProgressColor(3);Make Progress Yellow (only vista/server08 or higher)
        MsgBox(0,"","Yellow Progress Color")
    EndIf
    If $i = 9 Then _ModernSplash_ProgressColor(1);Reset Progress to green
    Sleep(200)
Next
_ModernSplash_ProgressColor(2);Make Progess Red (only vista/server08 or higher)
_ModernSplash_TextNext("Roundtrip: "&Round($ms/10)&"ms")
Sleep(500)
_ModernSplash_TextNext("Mesagebox")
MsgBox(0,"","Click ok to continue or watch this beautiful animation. Hope you have enough time, its endless ;-)")
_ModernSplash_DeInitiate()
MsgBox(0,"","Programm succesfull loaded :)")
Func _exit()
    MsgBox(0,"","You abborted loading...script exit now!")
    Exit
EndFunc

And here a sample Video (Version 1.0)

You can download the file here: http://www.maxreble.de/autoit.html

Changelog

Ah, right. This script is under the creative commons licens:

http://creativecommons.org/licenses/by/3.0/us/

Greetz

Spider

Edit: Version 1.1 Added

Edit: Version 1.2 Added

Edited June 9, 2010 by GtaSpider

[SkellySoul]

Amazing

5 stars definally

Edited June 7, 2010 by SkellySoul

[slayerz]

Awesome awesome awesome...really like the animation part

[Zibit]

Love it !!!

[wakillon]

Bravo !

Chic style and very good looking !

So This script is under the creative commons licens,

I suppose the swf file too ?

Did you create other swf file ?

Edited June 7, 2010 by wakillon

[GtaSpider]

Hey,

Jup - swf file is also under CC. Well, not yet. But I will now create a new Version, without flash and with some extra features.. Is ready for download in next 2 days i hope.

greetz

Spider

[wakillon]

ok !

I'm impatient to see your next post,

It's very nice !

[GtaSpider]

New Version 1.1

Download: www.maxreble.de/autoit.html

Changelog: www.maxreble.de/prgs/ModernSplash/changelog.txt

Greetz

Spider

Edited June 9, 2010 by GtaSpider

[dantay9]

Cool! Very smooth transitioning.

Also, you forgot the ".html" on the end of your link in the last post.

[GtaSpider]

Thanks

Added a fast Hotfix to the first post. Back to Flash but now on a bit different way. (IE occurs problems with compiled scripts)

Download: http://www.maxreble.de/autoit.html

Changelog: http://www.maxreble.de/prgs/ModernSplash/changelog.txt

Greetz Spider

Edited June 9, 2010 by GtaSpider

[mrmacadamia]

I'm lovin it!

[mrmacadamia]

I'm lovin it!

[Baraoic]

That's awesome, thanks.

[ngocs2tron]

i can't download this link: http://www.maxreble.de/autoit.html

[CNCMONKEY]

Too bad the site its down, does anyone have a mirror if available?

It sounds like it's a great splash screen

[Rawox]

Looks awesome, will try if I have time for sure!

[engjcowi]

anyone know another link?

[Rifa]

yeah... the link isn't working.. please upload at another place...

[engjcowi]

did anyone ever find a new link for this?

[UEZ]

Try this link: http://www.maxreble.de/download.php?to=http://www.maxreble.de/prgs/ModernSplash/ModernSplash1.3.zip

Br,

UEZ