Banjos Picup bot :)

09/20/2009 22:38 repins94#1
Hey Leute, ich Fange Langsamm an mit Autoit habe mich an einem Picup bot versucht der nun leuft zwar langsamm aber immerhin ich poste mal script:


(mein anreiz der "Picupbott" von Banjo1)

Quote:
#include <GUIConstants.au3>

$GUI = GUICreate("Picup Bot:)",300,300)
$Label = GUICtrlCreateLabel("Push f7 to Start",0,200,300,25)
$Label = GUICtrlCreateLabel("Push f8 to End",0,250,300,25)
$Label = GUICtrlCreateLabel("(c) by Fabi 2oo9",0,100,300,25)
GUISetState(@SW_SHOW)


HotKeySet ( "{F7}" , "Start" )
HotKeySet ( "{F8}" , "Ende" )

while 1
sleep(200)
wend;

Func Start ()
While (1)
Send("y")
Sleep (200)
Wend

EndFunc
Func Ende ()
Exit
EndFunc
und da wo bei mir die Labels sind hätte ich gerne knöpfe :) die mit der funktion Puase,stop und start verbunden sind und bitte den HotKeySet code für pause :).



Falls es nicht gleich zuviel für einen neuling ist bitte noch ein Guide/tut kurzanleitung für verschieden speed stufen ! danke :)
09/20/2009 23:27 Crrrespo#2
Ähm ja und was willst du jetzt?
09/21/2009 12:51 repins94#3
Quote:
Originally Posted by Crrrespo View Post
Ähm ja und was willst du jetzt?
eine Erklärung wie ich knöpfe bzw Buttens die man ankliken kann mit meinem script verbinden kann und was der Key code für pause ist und eventuell mehrere geschwindigkeits stufen :)
09/21/2009 15:59 MrCrackR#4
Benutz doch [Only registered and activated users can see links. Click Here To Register...], um dir ein GUI zu erstellen.
Ich benutze AutoIt schon seit 3 jahren, bin aber
auch erst seit 3 monaten drauf gekommen ;).
09/21/2009 17:20 X0R0N#5
Verschiedene geschwindigkeiten machst du indem du weitere Funktionen reinmachst mit anderem Sleepwert also:
Code:
Func langsam ()
While (1)
Send("y")
Sleep (200)
Wend

Func mittel ()
While (1)
Send("y")
Sleep (50)
Wend

Func schnell ()
While (1)
Send("y")
Sleep (1)
Wend
Und ne pausefunktion is ja wohl das leichteste ;)

Code:
Func pause ()
While (1)
Sleep (999)
Wend
€:
Achja als kleiner Tipp es ist keine gute Idee den Bot mit Buttons zu versähen da man erstmal ins Metin fenster gehen sollte bevor er wild auf y losdrückt xD
Mit druck auf den Button fängt er ja sofort an (außer du machst ne verzögerung was ja auch doof wäre)

Ansonsten (falls du doch nen Button willst):

$Label = GUICtrlCreateButton("Button 1",0,0,100,40)
09/21/2009 18:28 repins94#6
Quote:
Originally Posted by mreddy93 View Post
Verschiedene geschwindigkeiten machst du indem du weitere Funktionen reinmachst mit anderem Sleepwert also:
Code:
Func langsam ()
While (1)
Send("y")
Sleep (200)
Wend

Func mittel ()
While (1)
Send("y")
Sleep (50)
Wend

Func schnell ()
While (1)
Send("y")
Sleep (1)
Wend
Und ne pausefunktion is ja wohl das leichteste ;)

Code:
Func pause ()
While (1)
Sleep (999)
Wend
€:
Achja als kleiner Tipp es ist keine gute Idee den Bot mit Buttons zu versähen da man erstmal ins Metin fenster gehen sollte bevor er wild auf y losdrückt xD
Mit druck auf den Button fängt er ja sofort an (außer du machst ne verzögerung was ja auch doof wäre)

Ansonsten (falls du doch nen Button willst):

$Label = GUICtrlCreateButton("Button 1",0,0,100,40)
okay, ty nur wie mach ich das der butten zb bei "Pause" macht das der btt stehenbleibt ^^?



Mein script <.> ps: funzt net.

Quote:
#include <GUIConstants.au3>

$GUI = GUICreate("Picup Bot :)",300,300)
$Label = GUICtrlCreateLabel("Push f7 to Start",0,200,300,25)
$Label = GUICtrlCreateLabel("Push f8 to End",0,250,300,25)
$Label = GUICtrlCreateLabel("(c) by Fabi 2oo9",0,100,300,25)
GUISetState(@SW_SHOW)


HotKeySet ( "{F7}" , "schnell" )
HotKeySet ( "{F8}" , "mittel" )
HotKeySet ( "{F9}" , "langsam" )

while 1
sleep(200)
wend;

Func langsam ()
While (1)
Send("y")
Sleep (200)
Wend

Func mittel ()
While (1)
Send("y")
Sleep (50)
Wend

Func schnell ()
While (1)
Send("y")
Sleep (1)
Wend