Quote:
#Include <GuiConstants.au3>
Opt("WinTitleMatchMode", 3)
Opt("MouseClickDownDelay", 55)
Opt("MouseClickDelay", 1)
Opt("SendKeyDownDelay", 10)
Opt("SendKeyDelay", 1)
Opt("CaretCoordMode", 2)
HotKeySet("{F10**","Stop")
GUICreate( "scripts name", 200, 150)
GUICtrlCreateGroup("Options", 5, 5, 195, 145)
$AutoPicker = GUICtrlCreateCheckbox("AutoPicker While Afk", 10, 20)
GUICtrlCreateLabel("None Safe Zone", 10, 40)
$x = GUICtrlCreateInput("X", 10, 55, 40)
GUICtrlCreateUpdown($x)
GUICtrlSetLimit($x, 255, 0)
$Y = GUICtrlCreateInput("Y", 60, 55, 40)
GUICtrlCreateUpdown($Y)
GUICtrlCreateLabel("Safe Zone", 100, 40)
$x2 = GUICtrlCreateInput("X", 110, 55, 40)
GUICtrlCreateUpdown($x2)
GUICtrlSetLimit($x2, 255, 0)
$Y2 = GUICtrlCreateInput("Y", 150, 55, 40)
GUICtrlCreateUpdown($Y2)
GUICtrlSetLimit($Y2, 255, 0)
$Delay = GUICtrlCreateInput("30", 10, 80, 75)
GUICtrlCreateLabel("Delay in Min", 90, 85)
$startbutton = GUICtrlCreateButton("START", 10, 110, 180)
GUISetState()
$TimerDiff = $Delay * 60000 + 1
Func Stop()
While 1
Sleep(1)
WEnd
EndFunc
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $startbutton
If GUICtrlRead($startbutton) = "START" Then
$StartingTime = TimerInit()
While 1
; Need a ExitLoop condition to get out of this loop somewhere?
If $TimerDiff > $Delay * 60000 And GUICtrlRead($startbutton) = "START" Then
MouseMove(GUICtrlRead($x), GUICtrlRead($Y))
MouseClick("left")
Sleep(3000)
MouseClick("Right")
Sleep(3000)
MouseMove(GUICtrlRead($x2), GUICtrlRead($Y2))
Sleep(3000)
MouseClick("left")
$TimerDiff = TimerDiff($StartingTime)
ElseIf $TimerDiff <= $Delay * 60000 Then
$TimerDiff = TimerDiff($StartingTime);?
If GUICtrlRead($AutoPicker) = $GUI_CHECKED Then
Send(" ")
EndIf
Sleep(1000)
EndIf
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd
EndIf
EndSelect
WEnd
i have this script someone called Misha made for me it's supposed to do the following