Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 19:26

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



All in one

Discussion on All in one within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Jul 2009
Posts: 79
Received Thanks: 8
All in one

Hallo liebe e*pvpers
ich hätte da mal eine frage ich habe mir aus langerweile mal 4 kleinere Bots geschrieben also so simple klickbots aber ich würde die gerne in einem Pack haben so das man vor dem start aussuchen kann/muss welchen man benutzen will.
Also mir ist klar das man das in irgendeiner art mit der GUI verbinden muss oder hmmm.... naja vllt gibt es ja irgendwen der das selbe Problem schonmal hatte.

Freue mich über jede antwort
Führer is offline  
Old 11/08/2009, 21:58   #2
 
elite*gold: 0
Join Date: Oct 2009
Posts: 141
Received Thanks: 26
Holl dir koda_1.7.0.1
damit kannst du ein Fenster Design wie du es willst
Dann muss du nur noch den Einzelen Buttons ihre Funktion zufügen
z.b. $1Bot
Run("Bot1.exe")

i-wie so halt
bin noch Anfänger:P
-MARKS- is offline  
Thanks
1 User
Old 11/09/2009, 15:03   #3
 
SCORNI's Avatar
 
elite*gold: 26
Join Date: Jun 2009
Posts: 972
Received Thanks: 228
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 200, 116, 192, 124)
$Button1 = GUICtrlCreateButton("Anthopleura", 16, 24, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Dubeni", 96, 24, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Seepferde", 16, 56, 75, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Tibia", 96, 56, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$a=""
do
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
             
		 Case $Button1
			 GUIDelete()
			Anthopleura ()
			$a="fertig"
		Case $Button2
			guidelete ()
			 Dubeni()
			 $a="fertig"
		 Case $Button3
			 guidelete ()
			 seepferde()
			 $a="fertig"
		 Case $Button4
			 guidelete ()
			 tibia()
			 $a="fertig"
	EndSwitch
until $a="fertig"
func Anthopleura()
While 1=1
Sleep (2000)
MouseMove (713, 308)
Sleep (1500)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (51, 463)
MouseClick ("left", 51, 463)
Sleep (1000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (8500)
MouseMove (700, 322)
MouseClick ("left", 700, 322)
Sleep (8000)
MouseMove (51, 464)
MouseClick ("left", 51, 464)
Sleep (4000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (100000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
MouseMove (713, 308)
Sleep (4000)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
WEnd
endfunc
func Dubeni()
While 1=1
Sleep (2000)
MouseMove (713, 308)
Sleep (1500)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (165, 463)
MouseClick ("left", 165, 463)
Sleep (1000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (8500)
MouseMove (700, 322)
MouseClick ("left", 700, 322)
Sleep (8000)
MouseMove (165, 464)
MouseClick ("left", 165, 464)
Sleep (4000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (180000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
MouseMove (713, 308)
Sleep (4000)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
WEnd
endfunc
func seepferde()
	While 1=1
Sleep (2000)
MouseMove (713, 308)
Sleep (1500)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (109, 463)
MouseClick ("left", 109, 463)
Sleep (1000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (8500)
MouseMove (700, 322)
MouseClick ("left", 700, 322)
Sleep (8000)
MouseMove (109, 464)
MouseClick ("left", 109, 464)
Sleep (4000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (95000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
MouseMove (713, 308)
Sleep (4000)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
WEnd
endfunc
func tibia()
While 1=1
Sleep (2000)
MouseMove (713, 308)
Sleep (1500)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (51, 523)
MouseClick ("left", 51, 523)
Sleep (1000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (8500)
MouseMove (700, 322)
MouseClick ("left", 700, 322)
Sleep (8000)
MouseMove (51, 523)
MouseClick ("left", 51, 523)
Sleep (4000)
MouseMove (57, 812)
MouseClick ("left", 57, 812)
Sleep (4000)
Send ("{Enter}")
Sleep (5000)
MouseMove (598, 323)
MouseClick ("left", 598, 323)
Sleep (200000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
MouseMove (713, 308)
Sleep (4000)
MouseClick ("left", 713, 308)
Sleep (8000)
MouseMove (400, 326)
MouseClick ("left", 400, 326)
Sleep (8000)
WEnd
endfunc
musst du testen ob es klappt
SCORNI is offline  
Thanks
1 User
Old 11/09/2009, 15:40   #4
 
elite*gold: 0
Join Date: Jul 2009
Posts: 79
Received Thanks: 8
Top funtioniert alles!!!
Dickes Thanks an alle die soo schnell geantwortet haben!

kann closed werden
Führer is offline  
Old 11/09/2009, 16:14   #5
 
SCORNI's Avatar
 
elite*gold: 26
Join Date: Jun 2009
Posts: 972
Received Thanks: 228
an alle ? sind doch nur 2. Ich war mir nicht sicher ob es klappt aber wenn es klappt bin ich froh
SCORNI is offline  
Thanks
1 User
Reply




All times are GMT +1. The time now is 19:27.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.