Pause? in GUI

Achilles · September 28, 2006

Tryed ur method of the URl but doesnt work...
also i dont get how to incoperate ur pause witht he starts of scripts....

I really think you should post some script. Or at least a example or something 'cause then we can look (or rather people who know lots about Autoit) can look at it and fix it. Then you can see what they fixed and you should be able to learn how they fixed it. And then we don't have to sit here posting vague things about "it's not working".

Nezoic · September 28, 2006

I think he's basically saying that he has a GUI with several buttons each starting/stopping different scripts(functions). If this is the case I would bet his problem lies in the sctructure of his code i.e. not calling different scripts from different functions outside of the main loop.

i542s should work perfectly for you.

Post at least some of your code to clarify.

Hyflex · September 28, 2006

THe following is the whole script.

i want the link as a hyper link. and i want the close function to work on the actual GUI cos it doesnt close.

Also when u start one part i want to be able to click it again and it to stop.

Once stoped i wana be able to click a differnt one and that one to start doing its stuff.

Lasty can someone do me a script what runs with them all when it sees Pure black it pauses all scripts untill the black disapears just put any coodinates.

Thanks in advance

#cs ----------------------------------------------------------------------------
    
    Script Version: V1
    Author: XxXGoD
    Created For: myself lol
    
    Script Function: All In 1
    
#ce ----------------------------------------------------------------------------


; All In 1 Bot Start


#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\XUnleashedTest\AForm4.kxf
Opt("GUIOnEventMode", 1)
$Form4 = GUICreate("U WAT", 620, 328, 327, 219)
GUISetIcon("")
$GroupBox1 = GUICtrlCreateGroup("", 8, 8, 605, 281)
$TaultUnleashed = GUICtrlCreatePic(@ScriptDir & "\TrainerPic.JPG", 16, 16, 589, 121, BitOR($SS_NOTIFY,$WS_GROUP))
$Label1 = GUICtrlCreateLabel("By XxXGoD", 18, 136, 520, 25, $WS_GROUP)
GUICtrlSetFont(-1, 16, 800, 0, "MS Mincho")
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Version: 2.0", 488, 264, 60, 17, $WS_GROUP)
$Label4 = GUICtrlCreateLabel("", 8, 144, 4, 4, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Eat this.", 16, 176, 370, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
$Label3 = GUICtrlCreateLabel("http://www.google.com", 16, 232, 353, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Booa", 16, 216, 408, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
$Label4 = GUICtrlCreateLabel("OWNED.", 14, 266, 107, 17, $WS_GROUP)
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button1 = GUICtrlCreateButton("&Start Foot+Combat Pet", 2, 296, 120, 25)
GUICtrlSetOnEvent(-1, "StartFCP")

$Button2 = GUICtrlCreateButton("&Start Mount", 122, 296, 75, 25)
GUICtrlSetOnEvent(-1, "StartM")

$Button3 = GUICtrlCreateButton("&Start Foot", 197, 296, 75, 25)
GUICtrlSetOnEvent(-1, "StartF")

$Button4 = GUICtrlCreateButton("&Auto Pickup", 272, 296, 75, 25)
GUICtrlSetOnEvent(-1, "AutoPickup")

$Button5 = GUICtrlCreateButton("&Mount Healer", 347, 296, 75, 25)
GUICtrlSetOnEvent(-1, "AutoHeal")

$Button6 = GUICtrlCreateButton("&Pet Heal+Pickup", 423, 296, 100, 25)
GUICtrlSetOnEvent(-1, "AutoBoth")

$Button7 = GUICtrlCreateButton("&Close", 545, 296, 75, 25)
GUICtrlSetOnEvent(-1, "Close")

GUISetState(@SW_SHOW)
    
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
WEnd




; Automatic Pickup
Func AutoBoth()
    
    While 1
        
; Key Delay Options
Opt("SendKeyDownDelay", 1)
Opt("SendKeyDelay", 1)
; Key Delay Options End

; Main Settings / Constants
$Health = 0XC60000
$CheckHP = 1
$ChiPot = 3
$PetLife = 0x0B10000
$PetCharmOfReturn = 0x191418
$PetHunger = 0xADAB61
$CharacterLifeHeal = 0x9B0100
$CharacterChiHeal = 0x000051
$ChiCharmOfReturn = 0x101010
$LifeCharmOfReturn = 0x101010
; Main Settings / Constants End

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


; Pet/Mount Hunger Checker
        $coord = PixelSearch( 196, 116, 199, 121, $PetHunger, 1 )
    If @error Then
        Send("{8 down}")
        Sleep("100")
        Send("{8 up}")
        Sleep("100")
    EndIf
; Pet/Mount Hunger Checker End

    ; Automatic Pickup
        For $i = 1 To 99999999999999999999999999999999999999999999999999999999
            Send("s")
            Sleep(1000)
        Next
        ; Automatic Pickup End
WEnd
EndFunc
; Automatic Heal + Pickup End



; Automatic Pickup
Func AutoPickup()
    While 1
        For $i = 1 To 99999999999999999999999999999999999999999999999999999999
            Send("s")
            Sleep(1000)
        Next
WEnd

EndFunc
; Automatic Pickup End






; Automatic Healer
Func AutoHeal()
    
    While 1

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




; Main Settings / Constants
$Health = 0XC60000
$CheckHP = 1
$ChiPot = 3
$PetLife = 0x0B10000
$PetCharmOfReturn = 0x191418
$PetHunger = 0xADAB61
$CharacterLifeHeal = 0x9B0100
$CharacterChiHeal = 0x000051
$ChiCharmOfReturn = 0x101010
$LifeCharmOfReturn = 0x101010
; Main Settings / Constants End

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


; Pet/Mount Hunger Checker
        $coord = PixelSearch( 196, 116, 199, 121, $PetHunger, 1 )
    If @error Then
        Send("{8 down}")
        Sleep("100")
        Send("{8 up}")
        Sleep("100")    
        Send("{8 down}")
        Sleep("100")
        Send("{8 up}")
        Sleep("100")
    EndIf
; Pet/Mount Hunger Checker End
    WEnd
EndFunc
; Automatic Healer End






Func StartF()

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




; Main Settings / Constants
$Health = 0XC60000
$CheckHP = 1
$ChiPot = 3
$PetLife = 0x0B10000
$PetCharmOfReturn = 0x191418
$PetHunger = 0xADAB61
$CharacterLifeHeal = 0x9B0100
$CharacterChiHeal = 0x000051
$ChiCharmOfReturn = 0x101010
$LifeCharmOfReturn = 0x101010
; Main Settings / Constants End


; Character Life Heal
    $coord = PixelSearch( 180, 46, 185, 53, $CharacterLifeHeal, 1 )
    If @error Then
        Send("{4 down}")
        Sleep("100")
        Send("{4 up}")
        Sleep("100")
    EndIf
; Character Life Heal End.


; Character Chi Heal
    $coord = PixelSearch( 180, 57, 184, 63, $CharacterChiHeal, 1 )
    If @error Then
        Send("{3 down}")
        Sleep("100")
        Send("{3 up}")
        Sleep("100")
    EndIf
; Character Chi Heal End.


; Character Out of Chi Heal
    $coord = PixelSearch( 439, 746, 441, 749, $ChiCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
    
; Character Out of Chi Heal End.


; Character Out of Life Heal
    $coord = PixelSearch( 478, 747, 483, 753, $LifeCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
    
; Character Out of Life Chi 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}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
    EndIf
    
    Sleep("1000")
WEnd
; Characters Attack/Pickup End
EndFunc





Func StartFCP()

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


; Main Settings / Constants
$Health = 0XC60000
$CheckHP = 1
$ChiPot = 3
$PetLife = 0x0B10000
$PetCharmOfReturn = 0x191418
$PetHunger = 0xADAB61
$CharacterLifeHeal = 0x9B0100
$CharacterChiHeal = 0x000051
$ChiCharmOfReturn = 0x101010
$LifeCharmOfReturn = 0x101010
; Main Settings / Constants End


; Character Life Heal
    $coord = PixelSearch( 180, 46, 185, 53, $CharacterLifeHeal, 1 )
    If @error Then
        Send("{4 down}")
        Sleep("100")
        Send("{4 up}")
        Sleep("100")
    EndIf
; Character Life Heal End.


; Character Chi Heal
    $coord = PixelSearch( 180, 57, 184, 63, $CharacterChiHeal, 1 )
    If @error Then
        Send("{3 down}")
        Sleep("100")
        Send("{3 up}")
        Sleep("100")
    EndIf
; Character Chi Heal End.


; Character Out of Chi Heal
    $coord = PixelSearch( 439, 746, 441, 749, $ChiCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
; Character Out of Chi Heal End.


; Character Out of Life Heal
    $coord = PixelSearch( 478, 747, 483, 753, $LifeCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
; Character Out of Life Chi End.

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


; Pet/Mount Hunger Checker
        $coord = PixelSearch( 196, 116, 199, 121, $PetHunger, 1 )
    If @error Then
        Send("{8 down}")
        Sleep("100")
        Send("{8 up}")
        Sleep("100")
    EndIf
; Pet/Mount Hunger Checker End
    
    
; Pet/Mount Out of Heal - Charm of Return
    $coord = PixelSearch( 676, 736, 678, 737, $PetCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
    
; Pet/Mount Out of Heal - Charm of Return 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}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
    EndIf

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




Func StartM()


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




; Main Settings / Constants
$Health = 0XC60000
$CheckHP = 1
$ChiPot = 3
$PetLife = 0x0B10000
$PetCharmOfReturn = 0x191418
$PetHunger = 0xADAB61
$CharacterLifeHeal = 0x9B0100
$CharacterChiHeal = 0x000051
$ChiCharmOfReturn = 0x101010
$LifeCharmOfReturn = 0x101010
; Main Settings / Constants End



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


; Pet/Mount Hunger Checker
        $coord = PixelSearch( 196, 116, 199, 121, $PetHunger, 1 )
    If @error Then
        Send("{8 down}")
        Sleep("100")
        Send("{8 up}")
        Sleep("100")
    EndIf
; Pet/Mount Hunger Checker End
    
    
; Pet/Mount Out of Heal - Charm of Return
    $coord = PixelSearch( 676, 736, 678, 737, $PetCharmOfReturn, 1 )
    If Not @error Then
        Send("{7 down}")
        Sleep("100")
        Send("{7 up}")
        Sleep("100")
        Exit
    EndIf
; Pet/Mount Out of Heal - Charm of Return 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}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
        Sleep("100")
        Send("{a down}")
        Sleep("100")
        Send("{a up}")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
                Sleep("100")
        Send("{s down}")
                Sleep("100")
        Send("{s up}")
    EndIf

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



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

i542 · September 28, 2006

i542 thats very interesting...

but i want the close/exit/pause to work with my scripts/gui

WHen i click a script on the .exe i want to be able to click it again and for it to stop and then i can change to another one. Also i wana be able to press close whenever and it to actually close.

Also u seem good with autoit.

How do i get it so when pixelsearch find black in an area for it to pause the script...?

Cos i dun know whos script does that

Uf uf...

Insert this at your GUI loop (don't forget: START and STOP buttons with variables $start and $stop must exist!):

;...
While 1
$msg = GuiGetMsg()
Select
Case $msg = $stop
_pause()
Case $msg = $start
_unpause()
EndSelect
Wend
;My functions goes down

Not tested !

i542

Hyflex · September 28, 2006

I dont understand u...?

Where abouts do i add it??

Also i dont understand "Insert this at your GUI loop (don't forget: START and STOP buttons with variables $start and $stop must exist!):"

Hyflex · September 28, 2006

bah please reply people thanks so far but i dont understand it much, if u explain it to me i will then try and do things...

teach to me and then i do. Dont do it for me unless i have allready learnt it hehe

Ur code doesnt work m8y

Edited September 28, 2006 by XxXGoD

Hyflex · September 29, 2006

Anyone else??? wana have a try?

Hyflex · September 29, 2006

Bump hehe

jvanegmond · September 29, 2006

You are terribly lazy!! This topic has over 25 posts, in which people have tried really hard to explain this to you. They have given you examples, idea's, suggestions. But you just refuse to open the helpfile, and read what each function does. You just go and post: "I don't understand explain it to me then I will try and do things"? That is lazyness at it's worst! You should try and do things first. Then ask a question! Eventually, it is you who has to be abled to understand new things to become a good programmer. Not everything you do everyday is known to you. If you don't want to learn that ability, it's fine. But..

DON'T FUCKING SPAM THE FORUM!

And I just read some of your posts, all of them contained silly questions like: "I get this error:". So? Try to fix it yourself before you throw it into the forum again. It seems like you don't want to think at all! If you get a undeclared variable error, then declare it! Is that so hard? If something doesn't work, show what you have tried. You may not get the solution immediately, but you are getting closer step by step. When you just stop to think, and try something else, you will get a lot more constructive help, because right now, Noone is waiting to help you with every pety problem you find. So do it yourself.

Edited September 29, 2006 by Manadar

Hyflex · September 29, 2006

Manadar

There not working........ i cant find out how to do it... This is the Support forum....

jvanegmond · September 29, 2006

You say you can't, yet from your posts I do not see that you have attempted anything. You have even explicitely said you didn't try anything, and I quote:

i dont understand it much, if u explain it to me i will then try and do things...
teach to me and then i do. Dont do it for me unless i have allready learnt it

You just want everything to be told to you, and put the least possible effort into it yourself. It should be the otherway around!! The support forum is there if you are stuck and you have tried other resources (helpfile!!) to figure out, but still don't understand it. You just ask questions without looking up the answer first.

Hyflex · September 29, 2006

Dude i have used them, look in most of my posts out side of this topic i link to them....

I cant honestly get it working.

Hyflex · September 29, 2006

U obvisoly dont understand me.

jvanegmond · September 30, 2006

U obvisoly dont understand me.

Here's another quote to state my point, this is from one of your other topics:

Dont know how to do all that i need it explained or done tfor me, i cant understand the help documents

Do I need to discuss any further? You clearly do not have the intention of doing anything, and will keep on ranting like a moron until the script is done. Either, shut the fuck up, or do something!!

i542 · October 2, 2006

Sorry, but I can not help to you.

Maybe you can find some help in "GUI Reference" and "Keyboard managment" in AutoIt help. Use latest beta.

Try to not make program in ten minutes (because program will be "brljam" :lmao: ). Making program is a difficult work.

i542

Pause? in GUI

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members