Boot menu is now here!

Swift · January 31, 2008

Ok, Its Here! Read The Readme...Only Run Bootmenu.exe dont run the expclosed.exe (it closes explorer.exe)

EDIT: sorry everyone...Too many users have downloaded from here...so I have exceeded my bandwith...after 24 hours it can return...if anyone could host this .zip for it...i'd be very greatful

*NOTE* THIS PROGRAM DOES NOT MOFIFY THE REGISTRY

I Will Put the sources in here only! Source to BootMenu.exe

#include <A2D.au3>;Include the A2D header
#include <GUIConstants.au3>
Dim $sWidth = 720
Dim $sHeight = 400
FileCreateShortcut(@ScriptDir & "\bootmenuloadup.exe", @StartupDir & "\BootMenu")
Run(@ScriptDir & "\expclosed.exe")
Dim $sTitle="Old-Style Boot Menu", $sHomepage = "Esc Exits Boot Menu"
Dim $sMenuOptions[5] = ["Load Desktop","Restart","Shutdown","About","Close Boot Menu"]
Dim $sSelected = 0

$hWnd = GUICreate("Bootup Menu", $sWidth, $sHeight,-1,-1,$WS_POPUP)
GUISetState()
_A2DStartup("a2d.dll")

;Create the device.. with error checking.
if (_A2DFailed(_A2DCreateDevice($hWnd, $sWidth, $sHeight, $A2DFORMAT_A8R8G8B8))) Then
    MsgBox(0, "Error", "An error occurred while created the A2D Device!")
    _A2DShutdown("a2d.dll")
    Exit
EndIf

GUIRegisterMsg(0x001C, "_ToggleHotkeys"); Register the keys to toggle when something activates or deactives the app..; WM_ACTIVATEAPP = 0x001C
_ToggleHotkeys(); Initialise the hotkeys this way

$sTitleFont = _A2DCreateFont(20,11,600,False,"MS Sans Serif")
$sOptionFont = _A2DCreateFont(20,11,450,False,"MS Sans Serif")
WinSetOnTop($hWnd,"",1)

While GUIGetMsg() <> -3
    _A2DClear(0xFF0000A8);Clear the screen to blue. (AARRGGBB)
    _A2DBeginScene()
        _A2DDrawLine(10,15,$sWidth-10,15,0xFFA8A8A8); Top Line
        _A2DDrawLine(10,48,$sWidth-10,48,0xFFA8A8A8); Line below title
        _A2DDrawLine(10,$sHeight-15,$sWidth-10,$sHeight-15,0xFFA8A8A8); Bottom line
        
        _A2DDrawLine(10,15,10,$sHeight-14,0xFFA8A8A8); Left lines
        _A2DDrawLine(9,15,9,$sHeight-14,0xFFA8A8A8); Left lines
        
        _A2DDrawText($sTitleFont, $sTitle, 20,22, 300, 33, 0xFFFFFF57)
        _A2DDrawText($sTitleFont, $sHomepage, 485,22, 300, 33, 0xFFFFFF57) 
        
        For $i = 0 to UBound($sMenuOptions)-1
            If $i = $sSelected Then
                _A2DDrawRectangle(20,55+($i*18),$sWidth-40,20,0xFFA8A8A8)
                _A2DDrawText($sOptionFont, $sMenuOptions[$i], 20,55+($i*18), 300, 33, 0xFF000000)
            Else
                _A2DDrawText($sOptionFont, $sMenuOptions[$i], 20,55+($i*18), 300, 33, 0xFFA8A8A8)
            EndIf
        Next
        
        _A2DDrawLine($sWidth-10,15,$sWidth-10,$sHeight-14,0xFFA8A8A8); Right lines
        _A2DDrawLine($sWidth-9,15,$sWidth-9,$sHeight-14,0xFFA8A8A8); Right lines
        
    _A2DEndScene()
    _A2DPresentScene()
WEnd

_A2DReleaseDevice()
_A2DShutdown("a2d.dll")

Func _ToggleHotkeys($lHwnd = 0, $lMsg = 0, $wParam = 0, $lParam = 0)
    If WinActive($hWnd) Then
        HotKeySet("{UP}", "_Up")
        HotKeySet("{DOWN}", "_Down")
        HotKeySet("{ENTER}", "_Select")
    Else
        HotKeySet("{UP}")
        HotKeySet("{DOWN}")
        HotKeySet("{ENTER}")
    EndIf
EndFunc

Func _Up()
    If $sSelected > 0 Then
        $sSelected -= 1
    EndIf
EndFunc

Func _Down()
    If $sSelected < UBound($sMenuOptions)-1 Then
        $sSelected += 1
    EndIf
EndFunc

Func _Select()
    WinSetOnTop($hWnd,"",0)
    If $sSelected = 0 Then checkifdesktopisactive()
    If $sSelected = 1 Then Shutdown(2)
    If $sSelected = 2 Then Shutdown(9)
    If $sSelected = 3 Then MsgBox(0, "About", "Simple Boot Menu By Manadar!")
    If $sSelected = 4 Then Exit
EndFunc


Func checkifdesktopisactive()
    If ProcessExists("explorer.exe") Then MsgBox(0, "Desktop", "Your Desktop Is Already Loaded!")
    If ProcessExists("expclosed.exe") Then ProcessClose("expclosed.exe")
If Not ProcessExists("explorer.exe") Then Run("explorer.exe")
Exit

EndFunc

Hope you guys like it...Thank Manadar for the actual BootMenu! I just added some really cool features!

Edited January 31, 2008 by Swift

jvanegmond · January 31, 2008

How about showing off some of your Print Screen techniques and uploading a print screen of the application here?

One image says a thousand words.

Zedna · January 31, 2008

Post screenshot like you did in your previous post - for new users.

Swift · January 31, 2008

Since it wouldnt let me upload it...heres the link:

http://h1.ripway.com/Swiftz/untitled.bmp http://h1.ripway.com/Swiftz/untitled.bmp

jvanegmond · January 31, 2008

Since it wouldnt let me upload it...heres the link:
http://h1.ripway.com/Swiftz/untitled.bmp http://h1.ripway.com/Swiftz/untitled.bmp

Cool.

Nice job.

Next time upload it as JPEG, so the file together is not 2,4 MB!

BillLuvsU · January 31, 2008

Exceeded your bandwidth

Swift · January 31, 2008

Ehh? I have not very many files...and they add up to 10mb...my max is 30mb...? Hmm...

Holy cow! wow...alot of people downloaded that screenshot...because...I have used over 160mb of download space..(users downloading stuff) just today...so...i gotta wait until it drops below 150 before I can allow uploads again >.>

Edited January 31, 2008 by Swift

Skrip · January 31, 2008

...use http://imageshack.us

Swift · January 31, 2008

I dont like imageshack...but whatever i guess

jvanegmond · January 31, 2008

I dont like imageshack...but whatever i guess

Just use your ripway account!! I do it all the time.

BillLuvsU · January 31, 2008

Exceeded your bandwidth

*cough* *cough*

tomtomtom · January 31, 2008

I am trying to learn: what the hell is a boot menu? What can it do for me?

GEOSoft · January 31, 2008

I am trying to learn: what the hell is a boot menu? What can it do for me?

Not much

Swift · January 31, 2008

Its a blue menu that starts up when your computer does...and allows you to restart shutdown...load desktop...simple stuff like that...but its cool

@Manadar...my ripway account's bandwith is exceeded...i cant do anything for 24 hours

Edited January 31, 2008 by Swift

HeffeD · January 31, 2008

Ehh? I have not very many files...and they add up to 10mb...my max is 30mb...? Hmm...
Holy cow! wow...alot of people downloaded that screenshot...because...I have used over 160mb of download space..(users downloading stuff) just today...so...i gotta wait until it drops below 150 before I can allow uploads again >.>

If you would have made the screenshot a reasonable sized .jpg to start with, you wouldn't have had the problem. You could have uploaded to the forum. I agree with Firestorm. Imageshack is the way to go. Easy, always works, etc...

Swift · January 31, 2008

Its not the size boy.... its how many people download it over 24 hours...I have exceeded my 160mbs of download space....

Pascal257 · January 31, 2008

And of course the size has nothing to do with download space or traffic

NEVER!

Swift · January 31, 2008

Well it does...but not with this...I have a limit of 30mb...to UPLOAD...but only 150mb total DOWNLOAD per day.... >.>

GEOSoft · January 31, 2008

Well it does...but not with this...I have a limit of 30mb...to UPLOAD...but only 150mb total DOWNLOAD per day.... >.>

Sure and with a file size of 2.4 Mb you reach your limit at 66.66 views. Some people may be going back and looking at it a few times so that's not an indication of how many people have actually viewed the file. You should set your compression pretty much to maximum when it's only a screenshot. You don't need high quality.

Swift · January 31, 2008

Ehh...it was 2.4mb? hmm..didnt know that

Sign In

Boot menu is now here!

Recommended Posts

Swift

jvanegmond

Zedna

Swift

jvanegmond

BillLuvsU

Swift

Skrip

Swift

jvanegmond

BillLuvsU

tomtomtom

GEOSoft

Swift

HeffeD

Swift

Pascal257

Swift

GEOSoft

Swift

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

AutoIt Resources

Release

Beta