Script won't close

[the_OG]

Sorry, script stripped because I found someone trying to sell it... no changes to the program at all. (lamers need to die -.-)

I made this so I would not go AFK from being away for more than 5 minutes while playing World of Warcraft since there is no way to prevent it.

It works down to exiting the program AFTER clicking "start"... There is will not close.

Anyway, I am new to AutoIt and the forum, Hi.

Edited March 1, 2006 by the_OG

[Valuater]

maybe

Case $scr1 = $start
        MsgBox(0,"Anti-AFK", "Running nAnti-AFK, please switch over to WoW.")
        While WinWaitActive("World of Warcraft") <> 1
        sleep(5000)
        Send ( "{SPACE}", 0)
        WEnd    
        ExitLoop

8)

BTW

Welcome to Autoit Forums

Edited February 12, 2006 by Valuater

[Jos]

different approach:

expandcollapse popup

; Anti Away from Keyboard.
;      v.01
; by Nitu

#include <GuiConstants.au3>

GUICreate("nAnti AFK", 250, 100)
GUISetBkColor(0xaaaaaa)
Opt("TrayIconHide", 1)
;WinSetOnTop("nAnti AFK", "", 1)

GUISetState()

$file = GUICtrlCreateMenu("File")
$exit = GUICtrlCreateMenuItem("Exit", $file)
$info1 = GUICtrlCreateMenu("Info")
$info = GUICtrlCreateMenuItem("About", $info1)
$start = GUICtrlCreateButton("Start", 13, 30, 70, 20)
$stop = GUICtrlCreateButton("Close", 86, 30, 70, 20)

GUICtrlCreateGroup("Options", 5, 7, 160, 60)

While 1
    
    $scr1 = GUIGetMsg()
    Select
        Case $scr1 = $GUI_EVENT_CLOSE
            Exit
            
        Case $scr1 = $exit
            Exit
            
        Case $scr1 = $info
            MsgBox(0, "About", "World of Warcraft Anti-AFK.")
            
        Case $scr1 = $start
            MsgBox(0, "Anti-AFK", "Running nAnti-AFK, please switch over to WoW.")
            AdlibEnable("sendspace", 5000)
            
        Case $scr1 = $stop
            MsgBox(0, "Anti-AFK", "Exiting Anti-AFK loop.")
            AdlibDisable()
    EndSelect
WEnd

Func sendspace()
    Send("{SPACE}", 0)
EndFunc ;==>sendspace

Edited February 12, 2006 by JdeB

[the_OG]

Wow you guys rock!

Posted the thread and walked to the store for breakfast and already have two replies!

I'll try them both right away!

[the_OG]

Hmm, neither seemed to work quite as wanted.

I am trying to get the script to exit after the user presses "Start", right now, if Start is pressed, the user cannot exit the program without the help of ctrl alt delete, When I first tested the script in a friends msn window, the thing almost forced me to shut the computer down.

Got rid of that problem by adding "while 2 = 2" before "WinWaitActive("World of Warcraft")".

This closing has been the plague though. And I do not know how to fix it...

I'll try solving it, for learning, but help is very much appreciated.

Oh one more thing, the function of this was to make the player jump while they were away, to restart the away from they keyboard timer. Jumping in World of Warcraft is done by pressing the space bar, hence the "Send ("{SPACE}", 0)".

Edited February 12, 2006 by the_OG

[the_OG]

I do not have use for this program anymore, however, I am still interested in solving the problem as I have never fixed it. So.. In other words, this is a bump.