Jump to content
Sign in to follow this  
gamepin126

Exiting GUI and still run script

Recommended Posts

gamepin126

Not sure how to go about this, but this is what I have, and just need to exit the GUI, and still allow the second While loop to run. I was thinking about input windows, but I didn't like the ideas of 4 windows popping up, that could be annoying

#include <misc.au3>
#include <GuiConstants.au3>
;X: 225 Y: 186 top left
;X: 524 Y: 429 bottom right
; 0xFF0000 color

;shoutbox
;X: 1055    Y: 445 left top
;X: 1244    Y: 594 right bottom

;~ ================================
;~ UP ARROW     -   Auto Click w/ no aimbot
;~ RIGHT ARROW -    Aimbot w/ auto click
;~ DOWN ARROW   -   Turn off autoclick or aimbot
;~ LEFT ARROW   -   Exit 
;~ ~gamepin126 "RAWR"
;~ ================================

GuiCreate("Input Coords", 157, 139,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$In_Left_X = GuiCtrlCreateInput("", 10, 30, 60, 20)
$In_Top_Y = GuiCtrlCreateInput("", 90, 30, 60, 20)
$In_Right_X = GuiCtrlCreateInput("", 10, 80, 60, 20)
$In_Bottom_Y= GuiCtrlCreateInput("", 90, 80, 60, 20)
$Left_X_Lbl = GuiCtrlCreateLabel("Left X:", 20, 10, 40, 20)
$Top_Y_Lbl = GuiCtrlCreateLabel("Top Y:", 100, 10, 40, 20)
$Right_X_Lbl = GuiCtrlCreateLabel("Right X:", 20, 60, 40, 20)
$Bottom_X_Lbl = GuiCtrlCreateLabel("Bottom Y:", 100, 60, 50, 20)
$Sub_Btn = GuiCtrlCreateButton("SUBMIT", 40, 110, 80, 20)
$Left_X = ""
$Top_Y = ""
$Right_X = ""
$Bot_Y = ""
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $Sub_Btn
        GUICtrlSetData($Left_X, GUICtrlRead($In_Left_X))
        GUICtrlSetData($Top_Y, GUICtrlRead($In_Top_Y))
        GUICtrlSetData($Right_X, GUICtrlRead($In_Right_X))
        GUICtrlSetData($Bot_Y, GUICtrlRead($In_Bottom_Y))
        ExitLoop
    Case Else
    EndSelect
WEnd

While 1      
    If _IsPressed("25") Then Exit ;LEFT ARROW
    
    If _IsPressed("26") Then ;UP ARROW
        Do
            MouseClick("left")
            Sleep(10)
        Until _IsPressed("28") ; DOWN ARROW
    EndIf
    
    If _IsPressed("27") Then ; RIGHT ARROW
        Do
            WinWaitActive("BWHacks - Powered by vBulletin - Mozilla Firefox")
            $coord = PixelSearch($Left_X, $Top_Y, $Right_X, $Bot_Y, 0xFF0000) ;search coords
            If IsArray($coord) Then
                MouseMove($coord[0], $coord[1] - 10)
                MouseClick("left")
                Sleep(10) 
            EndIf
        Until _IsPressed("28") ; DOWN ARROW
    EndIf
    
Sleep(100) ; This will change the scripts hog on resources
WEnd
Edited by gamepin126

Share this post


Link to post
Share on other sites
eynstyne

guidelete() it, and use return or something

Edited by eynstyne

F@m!ly Guy Fr33k! - Avatar speaks for itself__________________________________________________________________________________________ite quotes... - Is your refrigerator running? If it is, It probably runs like you...very homosexually - Christians don't believe in gravity - Geeze Brian where do you think you are, Payless?- Show me potato Salad!__________________________________________________________________________________________Programs available - Shutdown timer[indent][/indent]

Share this post


Link to post
Share on other sites
gamepin126

I'm not sure how return works, I looked in the helpfile and I don't get it xD

Share this post


Link to post
Share on other sites
Valuater

maybe

#include <misc.au3>
#include <GuiConstants.au3>

HotKeySet("{F9}", "_Start")

Dim $Left_X = "", $Top_Y = "", $Right_X = "", $Bot_Y = ""

;X: 225 Y: 186 top left
;X: 524 Y: 429 bottom right
; 0xFF0000 color

;shoutbox
;X: 1055    Y: 445 left top
;X: 1244    Y: 594 right bottom

;~ ================================
;~ UP ARROW     -   Auto Click w/ no aimbot
;~ RIGHT ARROW -    Aimbot w/ auto click
;~ DOWN ARROW   -     Turn off autoclick or aimbot
;~ LEFT ARROW   -     Exit
;~ ~gamepin126 "RAWR"
;~ ================================

_Start()

Func _Start()

$My_GUI = GuiCreate("Input Coords", 157, 139,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$In_Left_X = GuiCtrlCreateInput("", 10, 30, 60, 20)
$In_Top_Y = GuiCtrlCreateInput("", 90, 30, 60, 20)
$In_Right_X = GuiCtrlCreateInput("", 10, 80, 60, 20)
$In_Bottom_Y= GuiCtrlCreateInput("", 90, 80, 60, 20)
$Left_X_Lbl = GuiCtrlCreateLabel("Left X:", 20, 10, 40, 20)
$Top_Y_Lbl = GuiCtrlCreateLabel("Top Y:", 100, 10, 40, 20)
$Right_X_Lbl = GuiCtrlCreateLabel("Right X:", 20, 60, 40, 20)
$Bottom_X_Lbl = GuiCtrlCreateLabel("Bottom Y:", 100, 60, 50, 20)
$Sub_Btn = GuiCtrlCreateButton("SUBMIT", 40, 110, 80, 20)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $Sub_Btn
        GUICtrlSetData($Left_X, GUICtrlRead($In_Left_X))
        GUICtrlSetData($Top_Y, GUICtrlRead($In_Top_Y))
        GUICtrlSetData($Right_X, GUICtrlRead($In_Right_X))
        GUICtrlSetData($Bot_Y, GUICtrlRead($In_Bottom_Y))
        ExitLoop
    Case Else
    EndSelect
WEnd
GUIDelete($My_GUI)
EndFunc

While 1     
    If _IsPressed("25") Then Exit ;LEFT ARROW
   
    If _IsPressed("26") Then ;UP ARROW
        Do
            MouseClick("left")
            Sleep(10)
        Until _IsPressed("28") ; DOWN ARROW
    EndIf
   
    If _IsPressed("27") Then ; RIGHT ARROW
        Do
            WinWaitActive("BWHacks - Powered by vBulletin - Mozilla Firefox")
            $coord = PixelSearch($Left_X, $Top_Y, $Right_X, $Bot_Y, 0xFF0000) ;search coords
            If IsArray($coord) Then
                MouseMove($coord[0], $coord[1] - 10)
                MouseClick("left")
                Sleep(10)
            EndIf
        Until _IsPressed("28") ; DOWN ARROW
    EndIf
   
Sleep(100) ; This will change the scripts hog on resources
WEnd

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites
gamepin126

Awesome, thanks :P

Share this post


Link to post
Share on other sites
Valuater

Awesome, thanks :P

Welcome

8)


NEWHeader1.png

Share this post


Link to post
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
Sign in to follow this  

×