1. 1-min-alk-bot

[diavy]

hallo zusammen.
Ich möchte als allererstes sagen dass ich mich erst seit gestern mit autoit beschäftige, und erst 2 Tutorials durchgelesen habe, trotzdem wollte ich mal selbst was ausprobieren (nicht zuletzt zur Motivation, um weiterzu"lernen"...). Ein Alk-Bot kam mir als relativ einfach vor...
Das ganze ist nur für 1-min-alk, ganz wichtig, und ich habe aus Angst meinen schönen Alk zu verschwenden den Bot auch noch nicht ausprobiert, sondern wollte eure Kommentare, Verbesserungen hören.
JA, esgibt kein GUI, da ich mir das noch nicht angeschaut hab.
Und Ja, die die es stört dass ech bereits was ausprobiere ohne autoit wirklich draufzuhaben sollen ihre kommentare doch bitte für sich halten

#Include <GuildWars.au3>

Run "C:\Program Files\GUILD WARS\Gw.exe"
WinActive ("Guild Wars")
sleep (1000)
Global $anzahl = InPutBox("Alkohol", Wie viel ist vorhanden?")
$wartezeit = random(53000,58000,1)
$x = InPutBox("X-Position", "bitte geben sie die x-position ein!")
$y = InPutBox("Y-Position", "bitte geben sie die y-position ein!")
ansaufen()
Next
saufen()
Exit

func ansaufen()
	For $i = 1 to 5
	MouseClick("left",$x,$y,2)
	sleep (500)
	Next
	$anzahl = $anzahl - 5
	sleep(181000)
EndFunc

func saufen()
	Do MouseClick("left",$x,$y,2)
		sleep($wartezeit)
		$anzahl = $anzahl - 1
	Until $anzahl = 0
EndFunc

Freue mich auf produktive Kritik!
diavy

[Garry goes Sheep]

Wie wär's mit Doppelklicks? :P

[diavy]

find den befehl dafür gerade nicht... wie lautet er?

[NANAAA]

MouseClick ( "button" [, x, y [, clicks [, speed ]]] )


Parameters

button The button to click: "left", "right", "middle", "main", "menu", "primary", "secondary".

x, y [optional] The x/y coordinates to move the mouse to. If no x and y coords are given, the current position is used (default).

clicks [optional] The number of times to click the mouse. Default is 1.

speed [optional] the speed to move the mouse in the range 1 (fastest) to 100 (slowest). A speed of 0 will move the mouse instantly. Default speed is 10.

Die Parameter beachten


Mouseclick("left",$x,$y,2)

[diavy]

habs geändert, sollte jetzt richtig sein?
und gibts sonst noch dinge auf die ich achten sollte?

[NANAAA]

MousClick("left",$x,$y,2)
sleep(500)
MouseClick("left",$x,$y,2)
sleep(500)
MouseClick("left",$x,$y,2)
sleep(500)
MouseClick("left",$x,$y,2)
sleep(500)
MouseClick("left",$x,$y,2)

Ist unnötig soviel zu schreiben ... mach das mit Do Next..

MouseMove($x,$y)

MouseMove braucht es nicht unbedingt da die $x und $y ja durch das klick festgelegt sind

[diavy]

Do next?
Hab in der autoit hilfe dazu nichts gefunden... :/

[Gabba2]

Ich vermute er meint For... Next.

For $i = 1 to 5
MousClick("left",$x,$y,2)
sleep(500)
next

damit sollte er 5 mal den Doppelklick ausführen.

[NANAAA]

ja genau ^^ hab mein Kopf halt ned immer bei der Sache xD

[diavy]

danke euch beiden
sonst sollte er klappen?
auf was sollte ich sonst achten?

edit: mit welchem befehl öffne ich eigentlich guild wars,
run <Guildwars.exe/Gw.exe/GW/GuildWars(.au3?)> oder
run "C:\C:\Program Files\GUILD WARS(.exe/.au3?)"

[NANAAA]

run "C:\"Pfad"\Guild Wars.exe"

.au3 ist für das bearbeites des AutoIt Scripts
.exe sind ausführbare Programme

[diavy]

und dann brauch ich kein include oder?

[HardCore.1337]

nein, die exe funktioniert auf jedem rechner

[in MIND]

Run([pfad],"","")
die eckigen klammern natürlich weglassen und stattdessen einfach den pfad zur gw.exe angeben

[diavy]

sollte doch so richtig sein?