Jump to content

Runner v2


Shides
 Share

Recommended Posts

Hello!,

I've finished the script the second version of Runner (but isn't Completely finished)

Download It:

Runner_2.rar

Script:

;~ Author: Antonio
;~ Program Name: Runner
;~ Version: 2.0
;~ Home Page: http:\\shides.altervista.org
#include <GUIConstants.au3>
;finestra

$start = GUICreate("Runner",400,300)
GUICtrlCreatePic ("Runner.gif", 75, 25,245,62)
$scritta1 = GUICtrlCreateLabel("Benvenuto in Runner!", 145, 95, 150)
$scritta2 = GUICtrlCreateLabel("Questo programma ti farà aprire facilmente alcuni programmi", 55,115, 500)
;menù alto
$filemenu = GuiCtrlCreateMenu ("File")
$exititem = GuiCtrlCreateMenuitem ("Exit",$filemenu)
$helpmenu = GuiCtrlCreateMenu ("?")
$aboutitem = GuiCtrlCreateMenuitem ("About",$helpmenu)
$upgrade = Guictrlcreatemenuitem ("Check Upgrade", $helpmenu)
;bottone esci
$cancelbutton = GuiCtrlCreateButton ("Esci",230,230,100,30)
;bottone avanti
$Okbutton = GuictrlCreateButton ("Avanti",60,230,100,30)
GUISetState()
Func _GUIUpdate() 
     GUICtrlsetstate($Okbutton,$GUI_Disable)
     GUICtrlDelete($aboutitem)
     GUICtrlDelete($scritta2)
     GUICtrlDelete($scritta1)
        $paint =  GUICtrlCreateButton ("1", 80,85,48,48,$BS_ICON)
            GUICtrlSetImage (-1, "icone.Dll","1")
        $ie = GUICtrlCreateButton ("2", 185,85,48,48,$BS_ICON)
            GUICtrlSetImage (-1, "icone.Dll","2")
        $Ms_Dos = GUICtrlCreateButton ("3", 290,85,48,48,$BS_ICON)
            GUICtrlSetImage (-1, "icone.Dll","3")
        $Magnify = GUICtrlCreateButton ("4", 80,140,48,48,$BS_ICON) 
            GUICtrlSetImage (-1, "icone.Dll","4")
        $WinHelp = GUICtrlCreateButton ("5", 185,140,48,48,$BS_ICON)
            GUICtrlSetImage (-1, "icone.Dll","5")
        $Calc = GUICtrlCreateButton ("close", 290,140,48,48,$BS_ICON)
                GUICtrlSetImage (-1, "icone.Dll","6")
        $WMP =  GUICtrlCreateButton ("1", 345,115,48,48,$BS_ICON)
            GUICtrlSetImage (-1, "icone.Dll","7")
                While 1
    $iMsg = GUIGetMsg()
    Select
                
        Case $imsg = $paint
            Run ("mspaint.exe")     
        Case $imsg = $ie
            ShellExecute ("iexplore.exe")
        Case $imsg = $Ms_Dos
            Run ("cmd.exe")
        Case $imsg = $Magnify
            Run ("magnify.exe")
        Case $imsg = $WinHelp
            Run ("winhelp.exe")
        Case $imsg = $Calc
            Run ("Calc.exe")
        Case $imsg = $WMP
            ShellExecute ("wmplayer.exe")
        Case $imsg = $cancelbutton
            Exit
            
        Case $imsg = $Gui_event_close
            Exit

        Case $imsg = $exititem
            Exit
        Case $imsg = $upgrade
            ShellExecute ("iexplore.exe", "http://shides.altervista.org/ver_his.htm")
    EndSelect
WEnd
EndFunc
While 1
    $iMsg = GUIGetMsg()
    Select

        Case $imsg = $Okbutton
            _GUIUpdate()

        Case $imsg = $cancelbutton
            Exit
            
        Case $imsg = $Gui_event_close
            Exit

        Case $imsg = $exititem
            Exit

        Case $imsg = $aboutitem
            GUICtrlDelete($scritta2)
            GUICtrlDelete($scritta1)
            GUICtrlCreateLabel("Ideatore del Programma:", 10, 20, 500)
GUICtrlCreateLabel("Shides", 10,40, 500)
GUICtrlCreateLabel("Contatti:", 10,60, 500)
GUICtrlCreateLabel("Msn:     matrix2192@hotmail.it", 10,75, 500)
GUICtrlCreateLabel("E-mail:  matrix2192@supereva.it", 10,90, 500)
        Case $imsg = $upgrade
            ShellExecute ("iexplore.exe", "http://shides.altervista.org/ver_his.htm")
    EndSelect
WEnd
Edited by Shides
I'm a Italian a AutoIterMy scriptTxTediTor -->TxTediTor is a simple program similar notepad[center]Please vote me with five star ;)Antonio Caragliano for Nokia Nseries[/center]
Link to comment
Share on other sites

  • Moderators

:whistle: did you mean to post this in the Example script forum? :P

If you reply yes, I'm sure the mods will move it for you so you don't have to repost.

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Link to comment
Share on other sites

  • Moderators

it has like 8 butttons, and if you click one, it simply just opens up that program...all programs that are included with windows, it's extremly basic, and i don't see why it's in the example scripts section.

If it belonged in "a" forum at all, which would you want it to be in? In all seriousness, doesn't matter how relevant you personally think it is or if you think it belongs at all. I don't think 80% of the scripts in the Example Scripts forum belong here, but that's not for me to say either (sure would make for easier surfing if they weren't :whistle: ).

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Link to comment
Share on other sites

If it belonged in "a" forum at all, which would you want it to be in? In all seriousness, doesn't matter how relevant you personally think it is or if you think it belongs at all. I don't think 80% of the scripts in the Example Scripts forum belong here, but that's not for me to say either (sure would make for easier surfing if they weren't :whistle: ).

Agreed, when you make something for the first time, and you like it.. You think other people will like it too, lol. :P So you want to share it.
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...