Klick Bot ?

07/16/2011 16:03 Deguul#1

Hallo liebe Coder,

ich wollte fragen was ich in AutoIt f�r ein Code einf�gen muss, damit ich einen Bot habe der die ganze Zeit einfach auf eine Stelle dr�ckt, und den ich mit F1 Starten und danach wieder Stoppen kann ?

Ich w�hre euch wirklich seeeehr dankbar f�r den Code.

07/17/2011 10:51 Kraizy#2

[Only registered and activated users can see links. Click Here To Register...] + Schleife
[Only registered and activated users can see links. Click Here To Register...]

07/17/2011 20:18 MrSm!th#3

#moved

07/17/2011 20:31 Kronasify#4

Gibt ein programm das nennt sich autoclicker2

Einfach mal googlen

07/18/2011 00:04 butter123#5

Ich w�rds ein bisschen adners l�sen:

PHP Code:


			
HotKeySet("{F1}", "toggle")

$pause = False

Func klick()
    
    While 1

        IF $ende = true Then
            MouseClick("left")

        EndIf

    WEnd

EndFunc



Func toggle()

    If $ende = True then
        $ende = false

    else

        $ende = true

    EndIf

EndFunc

(nur eben ein script von mir n bisschen ge�ndert, nciht getestet^^)

07/18/2011 18:07 Furkan#6

Quote:

Originally Posted by butter123

Ich w�rds ein bisschen adners l�sen:

PHP Code:

HotKeySet("{F1}", "toggle") $pause = False Func klick() While 1 IF $ende = true Then MouseClick("left") EndIf WEnd EndFunc Func toggle() If $ende = True then $ende = false else $ende = true EndIf EndFunc

(nur eben ein script von mir n bisschen ge�ndert, nciht getestet^^)

1. Funktioniert nicht
2. Der Threadersteller will auf bestimmte Koordinaten(hab ich so verstanden)

Ich h�tte noch eine Idee mit 2 Tasten..(mal schauen ob ich Zeit hab das auch noch nur mit 1 Taste zu probieren..)

Code:

HotKeySet ("{F1}","Beginn")
HotKeySet ("{F2}","Ende")

Func Ende()
	While 1
		Sleep(10)
	WEnd
EndFunc

Func Beginn()
	While 1
		MouseClick ("left",0,0)
	WEnd
EndFunc

While 1
	Sleep(10)
WEnd

07/18/2011 18:38 nfswor#7

try that ,,

PHP Code:


			
global $Paused

global $cnt = 1

global $z = 0

HotKeySet("{F1}", "Terminate")

HotKeySet("{F2}", "TogglePause")



    Sleep(3000)



MouseClick("",1271,387,1,0)



    Sleep(5000)











Func TogglePause() ; the pause function

$Paused = NOT $Paused

While $Paused

ToolTip('Please press "F8" to resume!',600,200,"",1,2)

sleep(1000)

WEnd

ToolTip("")

EndFunc



Func Terminate() ; the exit function

Exit 0

EndFunc

and for more one loop copy and paste the mouseclick(.....) in

While 1

Wend

Also you can use the controlclick for invisible bot ,,,

see like thats my bot for a browser game ..

PHP Code:


			
global $Paused

global $cnt = 1

global $z = 0

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

HotKeySet("{F7}", "TogglePause")

ControlGetHandle("[CLASS:MozillaUIWindowClass]","","")





    Sleep(3000)







ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,1271,387)



    Sleep(3000)







While 1

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,254,193)

    Sleep(3000)





ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(3000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(3000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(5000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(5000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(5000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(5000)

ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,536,346)

    Sleep(5000)







    ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,464,156)

    Sleep(1000)









        ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,358,117)

    Sleep(1000)





        ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)

            ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,98,55)

    Sleep(6000)





        ControlClick("[CLASS:MozillaUIWindowClass]","","","Left",1,88,118)

    Sleep(1000)





    WEnd





Func TogglePause() ; the pause function

$Paused = NOT $Paused

While $Paused

ToolTip('Please press "F8" to resume!',600,200,"",1,2)

sleep(1000)

WEnd

ToolTip("")

EndFunc





Func Terminate() ; the exit function

Exit 0

EndFunc

07/18/2011 18:48 lolkop#8

in funktionen sollte man nie endlosschleifen starten...

f�r solch einfache sachen immer einfach mit zustands�nderungen arbeiten...
beispiel:

Code:

Dim $pause
HotKeySet('{F1}', 'Pause')

While Sleep(10)
	If Not $pause Then MouseClick(...)
WEnd

Func Pause()
	$pause = Not $pause
EndFunc

07/18/2011 21:17 butter123#9

@dave: wenn ich shcon schreibe "eben schnell" und "nicht getestet" dann kann man schon davon ausgehen, das da fl�chtigkeitsfehler drin sind...

@lolkop: das hatte ich doch oben auch schon so geschrieben^^

Fertiges Skript (Getestet und l�uft):

Spoiler