GUI/Script Merging.

[Hyflex]

See the below, i need to incoperate the GUI so the start button starts the script and the close closes the script. And maybe add a button in the bottom right What says "Home" and when u click it it will load a site. say for instance Google

expandcollapse popup

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\X\AForm4.kxf
$Form4 = GUICreate("Woza Woza BOO", 566, 328, 303, 219)
GUISetIcon("")
$GroupBox1 = GUICtrlCreateGroup("", 8, 8, 545, 281)
$TaultUnleashed = GUICtrlCreatePic("C:\Documents and Settings\The Dyes\Desktop\trainer1.JPG", 16, 16, 529, 121, BitOR($SS_NOTIFY,$WS_GROUP))
$Label1 = GUICtrlCreateLabel("wtf u on", 18, 136, 520, 25, $WS_GROUP)
GUICtrlSetFont(-1, 16, 800, 0, "MS Mincho")
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Version: 1.1", 488, 264, 60, 17, $WS_GROUP)
$Label4 = GUICtrlCreateLabel("", 8, 144, 4, 4, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("MAHHHHHHHHH.", 16, 176, 370, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
$Label3 = GUICtrlCreateLabel("ComeHere", 16, 232, 353, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Boo", 16, 216, 408, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
$Label4 = GUICtrlCreateLabel("Copyright to XxXGoD.", 14, 266, 107, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("&Start", 176, 296, 75, 25)
$Button2 = GUICtrlCreateButton("&Close", 304, 296, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

EndSwitch
WEnd



; Key Delay Options
Opt("SendKeyDownDelay", 1)
Opt("SendKeyDelay", 1)
; Key Delay Options End


; Hotkey Settings
HotKeySet("{END}","Escape")
; Hotkey Settings End


; Main Settings / Constants
$Petrot = 0x0B10000
; Main Settings / Constants End

; Pet/Mount Life Checker
While 1
   
      $coord = PixelSearch( 176, 100, 178, 105, $Petrot, 1 )
        If @error Then
    Send("{8 down}")
       Sleep("100")
      Send("{8 up}")
      Sleep("100")
  EndIf
; Pet/Mount Life Checker End


; Characters Attack/Pickup
  $coord = PixelSearch( 426, 59, 429, 63, 0X000000, 1 )
        If @error Then
    Send("{v down}")
        Sleep("100")
    Send("{v up}")
                    Send("{s down}")
                    Send("{s up}")
                    Send("{s down}")
                    Send("{s up}")
        Sleep("100")
    Send("{a down}")
        Sleep("100")
    Send("{a up}")
                    Send("{s down}")
                    Send("{s up}")
                    Send("{s down}")
                    Send("{s up}")
        Sleep("100")
    Send("{a down}")
        Sleep("100")
    Send("{a up}")
                    Send("{s down}")
                    Send("{s up}")
                    Send("{s down}")
                    Send("{s up}")
        Sleep("100")
    Send("{a down}")
        Sleep("100")
    Send("{a up}")
                    Send("{s down}")
                    Send("{s up}")
                    Send("{s down}")
                    Send("{s up}")
        EndIf

Sleep("1000")
WEnd
; Characters Attack/Pickup End

; Exit Program
Func Escape()
Exit
EndFunc
; Exit Program End

[AzKay]

The second half of your script will never be called. Because, theres the loop at the start.

[Hyflex]

The second half of your script will never be called. Because, theres the loop at the start.

What exactly u mean....?

Can u help me get round that???

Edited September 25, 2006 by XxXGoD

[AzKay]

What exactly u mean....?

Nevermind, I didnt read your post properly.

[Hyflex]

Nevermind, I didnt read your post properly.

Cant u help then??? u confused me now lol