BETA Test - Para Stygier Bot

02/28/2009 18:13 NBA#1
Hi der P/E Stygier Bot ist soweit gesehen zu 99.8% fertig!
Zeit zum Betatesten :)
WICHTIG: Jeder muss den Bot für sich selbst anpassen.
Ich danke vorallem tt6 für seine - überragende (vote4sticky :D ) - moveto, den damit haben wir ziemlich viel vorangetrieben.

Dies ist der für mich angepasste bot. Ich habe r3 bei Norn und r6 bei Lichtbringer:
Code:
#include "tt6.au3"

Func Deathcheck()
	$PID = WinGetProcess("Guild Wars")
	$hprocess = _MemoryOpen($PID)
	$ReadMemDeath = _MemoryRead(0xa056d4, $hprocess)
	If $ReadMemDeath = 1 Then
		ControlClick("Guild Wars", "", "", "left", 1, 511, 376)
		Sleep(6000)
		AdlibDisable()
		WayOut()
	EndIf
EndFunc   ;==>Deathcheck


Func wayout()
	If CheckArea(4746, -13929) Then ;Spawenpoint bei Truhe
		PrepMoveTo()
		MoveTo(1, 4833 + (Random(-2, 1)), -13863 + (Random(-2, 1)))
		MoveTo(1, 5189 + (Random(-2, 1)), -13873 + (Random(-2, 1)))
		MoveTo(1, 5659 + (Random(-2, 1)), -13946 + (Random(-2, 1)))
		MoveTo(1, 6059 + (Random(-2, 1)), -14217 + (Random(-2, 1)))
		MoveTo(1, 6576 + (Random(-2, 1)), -14710 + (Random(-2, 1)))
		MoveTo(1, 6779 + (Random(-2, 1)), -14972 + (Random(-2, 1)))
		MoveTo(1, 6881 + (Random(-2, 1)), -15207 + (Random(-2, 1)))
		MoveTo(1, 6914 + (Random(-2, 1)), -15556 + (Random(-2, 1)))
		MoveTo(1, 6801 + (Random(-2, 1)), -15903 + (Random(-2, 1)))
		MoveTo(1, 6603 + (Random(-2, 1)), -16149 + (Random(-2, 1)))
		MoveTo(1, 6356 + (Random(-2, 1)), -16302 + (Random(-2, 1)))
		MoveTo(1, 6042 + (Random(-2, 1)), -16363 + (Random(-2, 1)))
		MoveTo(1, 5694 + (Random(-2, 1)), -16296 + (Random(-2, 1)))
		MoveTo(1, 5250 + (Random(-2, 1)), -16137 + (Random(-2, 1)))
		MoveTo(1, 4904 + (Random(-2, 1)), -15980 + (Random(-2, 1)))
		MoveTo(1, 4132 + (Random(-2, 1)), -15573 + (Random(-2, 1)))
		MoveTo(1, 3686 + (Random(-2, 1)), -15338 + (Random(-2, 1)))
		MoveTo(1, 3315 + (Random(-2, 1)), -15160 + (Random(-2, 1)))
		MoveTo(1, 3034 + (Random(-2, 1)), -15091 + (Random(-2, 1)))
		MoveTo(1, 2723 + (Random(-2, 1)), -15075 + (Random(-2, 1)))
		MoveTo(1, 2388 + (Random(-2, 1)), -15103 + (Random(-2, 1)))
		MoveTo(1, 2044 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
		MoveTo(1, 1561 + (Random(-2, 1)), -15404 + (Random(-2, 1)))
		MoveTo(1, 1257 + (Random(-2, 1)), -15636 + (Random(-2, 1)))
		MoveTo(1, 1047 + (Random(-2, 1)), -15879 + (Random(-2, 1)))
		MoveTo(1, 861 + (Random(-2, 1)), -16204 + (Random(-2, 1)))
		MoveTo(1, 762 + (Random(-2, 1)), -16482 + (Random(-2, 1)))
		MoveTo(1, 703 + (Random(-2, 1)), -16747 + (Random(-2, 1)))
		MoveTo(1, 667 + (Random(-2, 1)), -17203 + (Random(-2, 1)))
		MoveTo(1, 550 + (Random(-2, 1)), -17508 + (Random(-2, 1)))
		MoveTo(1, 267 + (Random(-2, 1)), -17850 + (Random(-2, 1)))
		MoveTo(1, -113 + (Random(-2, 1)), -18181 + (Random(-2, 1)))
		MoveTo(1, -379 + (Random(-2, 1)), -18315 + (Random(-2, 1)))
		MoveTo(1, -555 + (Random(-2, 1)), -18417 + (Random(-2, 1)))
		MoveTo(1, -691 + (Random(-2, 1)), -18564 + (Random(-2, 1)))
		MoveTo(1, -783 + (Random(-2, 1)), -18741 + (Random(-2, 1)))
		MoveTo(1, -846 + (Random(-2, 1)), -18992 + (Random(-2, 1)))
		MoveTo(1, -926 + (Random(-2, 1)), -19300 + (Random(-2, 1)))
		MoveTo(1, -1017 + (Random(-2, 1)), -19559 + (Random(-2, 1)))
		MoveTo(1, -1103 + (Random(-2, 1)), -19825 + (Random(-2, 1)))
		MoveTo(1, -1177, -20051)
		StopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	ElseIf CheckArea(5810, -16857) Then ;Spawnpoint bei Kaplan Phyratyss
		ControlSend($client, "", "", "{x}")
		Sleep(500)

		PrepMoveTo()
		MoveTo(1, 5537 + (Random(-2, 1)), -17199 + (Random(-2, 1)))
		MoveTo(1, 5438 + (Random(-2, 1)), -17342 + (Random(-2, 1)))
		MoveTo(1, 5231 + (Random(-2, 1)), -17506 + (Random(-2, 1)))
		MoveTo(1, 4939 + (Random(-2, 1)), -17668 + (Random(-2, 1)))
		MoveTo(1, 4504 + (Random(-2, 1)), -17856 + (Random(-2, 1)))
		MoveTo(1, 4246 + (Random(-2, 1)), -17934 + (Random(-2, 1)))
		MoveTo(1, 3694 + (Random(-2, 1)), -18054 + (Random(-2, 1)))
		MoveTo(1, 3284 + (Random(-2, 1)), -18078 + (Random(-2, 1)))
		MoveTo(1, 2806 + (Random(-2, 1)), -18072 + (Random(-2, 1)))
		MoveTo(1, 2576 + (Random(-2, 1)), -18067 + (Random(-2, 1)))
		MoveTo(1, 2293 + (Random(-2, 1)), -18033 + (Random(-2, 1)))
		MoveTo(1, 1957 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
		MoveTo(1, 1481 + (Random(-2, 1)), -17852 + (Random(-2, 1)))
		MoveTo(1, 1297 + (Random(-2, 1)), -17819 + (Random(-2, 1)))
		MoveTo(1, 1020 + (Random(-2, 1)), -17814 + (Random(-2, 1)))
		MoveTo(1, 762 + (Random(-2, 1)), -17834 + (Random(-2, 1)))
		MoveTo(1, 522 + (Random(-2, 1)), -17882 + (Random(-2, 1)))
		MoveTo(1, 296 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
		MoveTo(1, 49 + (Random(-2, 1)), -18091 + (Random(-2, 1)))
		MoveTo(1, -294 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
		MoveTo(1, -538 + (Random(-2, 1)), -18497 + (Random(-2, 1)))
		MoveTo(1, -669 + (Random(-2, 1)), -18685 + (Random(-2, 1)))
		MoveTo(1, -802 + (Random(-2, 1)), -19061 + (Random(-2, 1)))
		MoveTo(1, -964, -19503)
		stopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	ElseIf CheckArea(7425, -11855) Then ;Spawnpoint irgendwo bei der truhe (weiter weg)
		PrepMoveTo()
		MoveTo(1, 7443 + (Random(-2, 1)), -11949 + (Random(-2, 1)))
		MoveTo(1, 7465 + (Random(-2, 1)), -12203 + (Random(-2, 1)))
		MoveTo(1, 7399 + (Random(-2, 1)), -12587 + (Random(-2, 1)))
		MoveTo(1, 7251 + (Random(-2, 1)), -12952 + (Random(-2, 1)))
		MoveTo(1, 7068 + (Random(-2, 1)), -13271 + (Random(-2, 1)))
		MoveTo(1, 6688 + (Random(-2, 1)), -13821 + (Random(-2, 1)))
		MoveTo(1, 6573 + (Random(-2, 1)), -14025 + (Random(-2, 1)))
		MoveTo(1, 6497 + (Random(-2, 1)), -14317 + (Random(-2, 1)))
		MoveTo(1, 6536 + (Random(-2, 1)), -14537 + (Random(-2, 1)))
		MoveTo(1, 6691 + (Random(-2, 1)), -14794 + (Random(-2, 1)))
		MoveTo(1, 6853 + (Random(-2, 1)), -15032 + (Random(-2, 1)))
		MoveTo(1, 6935 + (Random(-2, 1)), -15223 + (Random(-2, 1)))
		MoveTo(1, 6954 + (Random(-2, 1)), -15440 + (Random(-2, 1)))
		MoveTo(1, 6884 + (Random(-2, 1)), -15670 + (Random(-2, 1)))
		MoveTo(1, 6764 + (Random(-2, 1)), -15855 + (Random(-2, 1)))
		MoveTo(1, 6592 + (Random(-2, 1)), -16061 + (Random(-2, 1)))
		MoveTo(1, 6423 + (Random(-2, 1)), -16185 + (Random(-2, 1)))
		MoveTo(1, 6213 + (Random(-2, 1)), -16278 + (Random(-2, 1)))
		MoveTo(1, 5915 + (Random(-2, 1)), -16353 + (Random(-2, 1)))
		MoveTo(1, 5610 + (Random(-2, 1)), -16375 + (Random(-2, 1)))
		MoveTo(1, 5366 + (Random(-2, 1)), -16318 + (Random(-2, 1)))
		MoveTo(1, 5079 + (Random(-2, 1)), -16179 + (Random(-2, 1)))
		MoveTo(1, 4606 + (Random(-2, 1)), -15910 + (Random(-2, 1)))
		MoveTo(1, 4096 + (Random(-2, 1)), -15574 + (Random(-2, 1)))
		MoveTo(1, 3771 + (Random(-2, 1)), -15374 + (Random(-2, 1)))
		MoveTo(1, 3458 + (Random(-2, 1)), -15233 + (Random(-2, 1)))
		MoveTo(1, 3098 + (Random(-2, 1)), -15129 + (Random(-2, 1)))
		MoveTo(1, 2612 + (Random(-2, 1)), -15120 + (Random(-2, 1)))
		MoveTo(1, 2290 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
		MoveTo(1, 1861 + (Random(-2, 1)), -15324 + (Random(-2, 1)))
		MoveTo(1, 1634 + (Random(-2, 1)), -15429 + (Random(-2, 1)))
		MoveTo(1, 1361 + (Random(-2, 1)), -15674 + (Random(-2, 1)))
		MoveTo(1, 1102 + (Random(-2, 1)), -16000 + (Random(-2, 1)))
		MoveTo(1, 942 + (Random(-2, 1)), -16347 + (Random(-2, 1)))
		MoveTo(1, 782 + (Random(-2, 1)), -16883 + (Random(-2, 1)))
		MoveTo(1, 594 + (Random(-2, 1)), -17349 + (Random(-2, 1)))
		MoveTo(1, 437 + (Random(-2, 1)), -17617 + (Random(-2, 1)))
		MoveTo(1, 176 + (Random(-2, 1)), -17914 + (Random(-2, 1)))
		MoveTo(1, -219 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
		MoveTo(1, -571 + (Random(-2, 1)), -18662 + (Random(-2, 1)))
		MoveTo(1, -693 + (Random(-2, 1)), -18807 + (Random(-2, 1)))
		MoveTo(1, -811 + (Random(-2, 1)), -19045 + (Random(-2, 1)))
		MoveTo(1, -915 + (Random(-2, 1)), -19331 + (Random(-2, 1)))
		MoveTo(1, -1046 + (Random(-2, 1)), -19739 + (Random(-2, 1)))
		MoveTo(1, -1093, -19888)
		stopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	EndIf
	Sleep(1200 + Random(100, 200))
EndFunc   ;==>wayout



Func MoveToAdept()
	PrepMoveTo()
	MoveTo(1, 651, -10244)
	MoveTo(1, 1243, -10066)
	MoveTo(1, 1856, -9921)
	MoveTo(1, 2562, -9863)
	MoveTo(1, 2938, -9852)
	StopMoveTo()
	Sleep(20000)
	PrepMoveTo()
	MoveTo(1, 3487, -9838)
	MoveTo(1, 3935, -9796)
	MoveTo(1, 4402, -9725)
	MoveTo(1, 4800, -9664)
	MoveTo(1, 5178, -9606)
	MoveTo(1, 5566, -9546)
	MoveTo(1, 5926, -9477)
	MoveTo(1, 6347, -9370)
	MoveTo(1, 6675, -9265)
	MoveTo(1, 6972, -9157)
	MoveTo(1, 7076, -9124)
	StopMoveTo()
	ControlSend("Guild Wars", "", "", "{v}")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(1000)
	ControlClick("Guild Wars", "", "", "left", 1, 473, 445)

EndFunc   ;==>MoveToAdept

Func GetFactions()
	ControlSend("Guild Wars", "", "", "{w down}")
	Sleep(2000)
	ControlSend("Guild Wars", "", "", "{w up}")
	ControlSend("Guild Wars", "", "", "{v}")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(3000)
	ControlClick("Guild Wars", "", "", "left", 1, 436, 355)
	PrepMoveTo()
	MoveTo(1, 8921, -7614)
	StopMoveTo()
	Sleep(30000)
EndFunc   ;==>GetFactions



;wegstellen
Func MoveHinterAdept()
	PrepMoveTo()
	MoveTo(1, 8644, -7853)
	MoveTo(1, 8486, -7996)
	MoveTo(1, 8431, -8045)
	ControlSend("Guild Wars", "", "", "{1}")
	Sleep(50)
	ControlSend("Guild Wars", "", "", "{2}")
	MoveTo(1, 7940, -8551)
	MoveTo(1, 7617, -8796)
	MoveTo(1, 7336, -8963)
	MoveTo(1, 7156, -9048)
	MoveTo(1, 7113, -9079)
	MoveTo(3, 7122, -9081)
	;	MoveTo(3, 7117, -9081)
	StopMoveTo()
	Sleep(350)
	ControlSend("Guild Wars", "", "", "{w down}")
	Sleep(67)
	ControlSend("Guild Wars", "", "", "{w up}")
	;EndIf

	Sleep(200)
EndFunc   ;==>MoveHinterAdept

$currentpos = _MemoryRead(0xd28c54, $hprocess)

Func __WadimEnemyCheck()
	$currentpos = _MemoryRead(0xd28c54, $hprocess)
	ControlSend("Guild Wars", "", "", "c")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(100)
	If _MemoryRead(0xd28c54, $hprocess) <> $currentpos Then
		;keine gegner mehr in der nähe
		Send("w") ; sich kurz bewegen, bricht C, SPACE ab.
	EndIf
EndFunc   ;==>__WadimEnemyCheck

Func Kampfscript()
	ControlSend("Guild Wars", "", "", "{a down}")
	Sleep(1000)
	ControlSend("Guild Wars", "", "", "{a up}")

	Sleep(500)

	ControlSend("Guild Wars", "", "", "{3}")
	Sleep(2500)
	ControlSend("Guild Wars", "", "", "{4}")
	Sleep(2500)
	ControlSend("Guild Wars", "", "", "{5}")
	Sleep(750)
	;AdlibEnable("__WadimEnemyCheck", 500)
	$i = -1
	Do

		ControlSend("Guild Wars", "", "", "{2}")
		Sleep(1000)
		$i = $i + 1
	Until $i = 60
	;_MemoryRead(0xd28c54, $hprocess) <> $currentpos
EndFunc   ;==>Kampfscript


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\NBArena\Desktop\tt6_V1.3\Form1.kxf
$Form1 = GUICreate("Stygier BT - The first P/E Stygian Vail Bot", 595, 387, 193, 125)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 433, 137)
GUICtrlSetData(-1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
$Radio1 = GUICtrlCreateRadio("German (Deutsch)", 440, 0, 113, 17)
$Radio2 = GUICtrlCreateRadio("English (Englisch)", 440, 24, 113, 17)
$Label1 = GUICtrlCreateLabel("How much rounds do you want to farm? :", 8, 152, 300, 17)
$Input1 = GUICtrlCreateInput("", 8, 168, 185, 21)
$Button1 = GUICtrlCreateButton("Start Farming", 8, 200, 99, 25, 0)
$Button2 = GUICtrlCreateButton("Resize Guild Wars", 8, 232, 99, 25, 0)
$Label2 = GUICtrlCreateLabel("Which Guild Wars Client do you want to use for botting?:", 208, 152, 278, 17)
$Radio3 = GUICtrlCreateRadio("Guild Wars 1", 208, 176, 113, 17)
$Radio4 = GUICtrlCreateRadio("Guild Wars 2", 208, 200, 113, 17)
$Radio5 = GUICtrlCreateRadio("Guild Wars 3", 208, 224, 113, 17)
$Radio6 = GUICtrlCreateRadio("Guild Wars 4", 208, 248, 113, 17)
$Radio7 = GUICtrlCreateRadio("Guild Wars 5", 208, 272, 113, 17)
$Button3 = GUICtrlCreateButton("Übersetzen", 440, 48, 91, 25, 0)
$MenuItem1 = GUICtrlCreateMenu("Menu")
$MenuItem2 = GUICtrlCreateMenuItem("Update", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			$readinput = GUICtrlRead($Input1)
			$rounds = 0
			Do
				$rounds = $rounds + 1
				GUICtrlSetData($Button1, "Rounds: " & $rounds & " of " & $readinput)
				Sleep(7000 + Random(100, 200))
				wayout()
				Sleep(10000)
				MoveToAdept()
				GetFactions()
				MoveHinterAdept()
				;AdlibEnable("Deathcheck")
				Kampfscript()
				;AdlibDisable()
				CollectLoot(25)
		                Resign()
                                sleep(500)
                                Resign()
			Until $rounds = $readinput Or $nMsg = $MenuItem3 Or $nMsg = $GUI_EVENT_CLOSE
			GuiCtrlSetData($Button1, "Finished")
		Case $MenuItem3
			Exit
		Case $Button3

			$de = GUICtrlRead($Radio1)
			$eng = GUICtrlRead($Radio2)
			GUICtrlSetData($Button3, $de & " " & $eng)
			If $de = 1 Then
				GUICtrlSetData($Button3, "Translate")
				GUICtrlSetData($Edit1, StringFormat("Dieser Bot wurde für die Elitepvpers Community erstellt.\r\n\r\nRegeln:\r\n§1 Versuch nicht, diesen Bot in einer anderen Community zu verkaufen.\r\n§2 Falls du diesen Bot Public machst, sag er wurde von\r\nhttp://www.elitepvpers.com/forum/guild-wars erstellt\r\n§3 Bitte botte nicht 24/7 ."))
				GUICtrlSetData($Label1, "Wieviele Runden willst du farmen? :")
				GUICtrlSetData($Label2, "Welchen Guild Wars Client willst du farmen lassen? :")
				GUICtrlSetData($Button1, "Farmen Starten")
				GUICtrlSetData($Button2, "Anpassen")
			ElseIf $eng = 1 Then
				GUICtrlSetData($Button3, "Übersetzen")
				GUICtrlSetData($Edit1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
				GUICtrlSetData($Label1, "How much rounds do you want to farm? :")
				GUICtrlSetData($Label2, "Which Guild Wars Client do you want to use for botting? :")
				GUICtrlSetData($Button1, "Start Farming")
				GUICtrlSetData($Button2, "Resize Guild Wars")
			EndIf

	EndSwitch
WEnd
WICHTIG:
Die 5 Radio-Buttons sowie der Anpassen Button sind (noch) Dummy controls.

-------------------------------------------------------------------------------------
Hi,
This is the Beta Test for my Stygier Bot.
ATTENTION: You must put the clicks right for your acc.
I have r3 by Norn and r6 by Lightbringer.
ATTENTION:
The 5 Radio Buttons and the Resize GW button are (still) Dummy Controls.
Code is above.

Credits
PHP Code:
-__wadim
-Enders (thx man for the wayout)
-
Hokler
-tt6
and morei dont remember 
Have Fun !!

~NBA
02/28/2009 18:22 STARL1NE#2
Hey vielen dank fürs Publik stellen :D
Nur ich bin hier sozusagen neu ud hab mich mit der materie noch nicht befasst und von daher kann ich den für mich nicht anpassen :((
02/28/2009 18:45 NBA#3
Nun du nimmst das autoit window info tool und tust bei zeile 185 die coords von den quest annehmen button rein, bei zeile 196 die coords vom belohnungs button und in der tt6.ini die coords vom resign button rein. ach und den coord mode auf client umstellen...ausserdem ist der bot für P/E bzw. E/P und für meinen Freun hab ich einen für X/P gemacht :)
02/28/2009 18:58 STARL1NE#4
Ok ich versuchs mal vielen dank :D

Würd das evtl auch gehen dass du einfach deine cords vorgibst wie z.b.
interface groß quest linke ecke usw.? wäre cool
02/28/2009 19:11 NBA#5
Das ist ne Beta :D Quest kann man soweit ich weiß doch nicht verschieben oder :O ? Naja in der Fertigen Version (die ... die ich ... die ich nicht zum verkaufen anbieten werde, sonder OSS machen werde) behebe ich das dann. Dann kommt auch Ident und Sell dazu...obwohl ich grade keine Ahnung habe wie ich das anstellen soll...

Da sich Quest normalerweise nicht verschieben lässt, werde ich das mit einem
Resize lösen.

Ach und: Please post all bugs you may encounter.

Bekannt ist bereits:
-Manchmal falsche Checkarea erkennung
-Manchmal falsche Clicks

Aber alles nur bei falscher Config.

Have Fun!!
03/02/2009 13:36 MF-Rockstar#6
öhm...wie wäre das Build für X/P?
Läuft der vollständig im Hintergrund?
HM oder NM?

Ich werd mal versuchen dne zu testen, wenn ich zuhause bin.
03/02/2009 14:20 NBA#7
NM. XP hab ich prinzipiell schon...muss aber noch testen..Update kommt bald
03/02/2009 14:24 STARL1NE#8
Ich raff das nit^^ naja ich warte mal ab
03/02/2009 14:29 NBA#9
Nun ich hab mir mal die _SizeGW Func aus Rosmaries sammelung geklaut *g*

derzeitiger code:
Code:
#include "tt6.au3"

HotKeySet("{pause}", "Pause")
Func Pause()
	$beenden = GUICtrlCreateButton("Beenden", 122, 200)
	StopMoveTo()
	Do
		$nMsg = GUIGetMsg()
		Sleep(20)
	Until $nMsg = $beenden
	GUICtrlDelete($beenden)
	PrepMoveTo()
EndFunc   ;==>Pause


Func Deathcheck()
	$PID = WinGetProcess("Guild Wars")
	$hprocess = _MemoryOpen($PID)
	$ReadMemDeath = _MemoryRead(0xa056d4, $hprocess)
	If $ReadMemDeath = 1 Then
		ControlClick("Guild Wars", "", "", "left", 1, 511, 376)
		Sleep(6000)
		AdlibDisable()
		WayOut()
	EndIf
EndFunc   ;==>Deathcheck

Func _SizeGW($New_SizeX, $New_SizeY, $Guild_Wars_Nr = "")
	Opt("WinTitleMatchMode", 3)
	If $Guild_Wars_Nr = 0 Then
		$Guild_Wars_Nr = ""
	EndIf
	$GWW_name = "Guild Wars" & $Guild_Wars_Nr
	If Not WinExists($GWW_name) Then
		Return
	EndIf
	$Gw_Size = WinGetClientSize($GWW_name)
	$Gw_Pos = WinGetPos($GWW_name)
	WinMove($GWW_name, "", $Gw_Pos[0], $Gw_Pos[1], $New_SizeX, $New_SizeY)
EndFunc   ;==>_SizeGW

Func wayout()
	If CheckArea(4746, -13929) Then ;Spawenpoint bei Truhe
		PrepMoveTo()
		MoveTo(1, 4833 + (Random(-2, 1)), -13863 + (Random(-2, 1)))
		MoveTo(1, 5189 + (Random(-2, 1)), -13873 + (Random(-2, 1)))
		MoveTo(1, 5659 + (Random(-2, 1)), -13946 + (Random(-2, 1)))
		MoveTo(1, 6059 + (Random(-2, 1)), -14217 + (Random(-2, 1)))
		MoveTo(1, 6576 + (Random(-2, 1)), -14710 + (Random(-2, 1)))
		MoveTo(1, 6779 + (Random(-2, 1)), -14972 + (Random(-2, 1)))
		MoveTo(1, 6881 + (Random(-2, 1)), -15207 + (Random(-2, 1)))
		MoveTo(1, 6914 + (Random(-2, 1)), -15556 + (Random(-2, 1)))
		MoveTo(1, 6801 + (Random(-2, 1)), -15903 + (Random(-2, 1)))
		MoveTo(1, 6603 + (Random(-2, 1)), -16149 + (Random(-2, 1)))
		MoveTo(1, 6356 + (Random(-2, 1)), -16302 + (Random(-2, 1)))
		MoveTo(1, 6042 + (Random(-2, 1)), -16363 + (Random(-2, 1)))
		MoveTo(1, 5694 + (Random(-2, 1)), -16296 + (Random(-2, 1)))
		MoveTo(1, 5250 + (Random(-2, 1)), -16137 + (Random(-2, 1)))
		MoveTo(1, 4904 + (Random(-2, 1)), -15980 + (Random(-2, 1)))
		MoveTo(1, 4132 + (Random(-2, 1)), -15573 + (Random(-2, 1)))
		MoveTo(1, 3686 + (Random(-2, 1)), -15338 + (Random(-2, 1)))
		MoveTo(1, 3315 + (Random(-2, 1)), -15160 + (Random(-2, 1)))
		MoveTo(1, 3034 + (Random(-2, 1)), -15091 + (Random(-2, 1)))
		MoveTo(1, 2723 + (Random(-2, 1)), -15075 + (Random(-2, 1)))
		MoveTo(1, 2388 + (Random(-2, 1)), -15103 + (Random(-2, 1)))
		MoveTo(1, 2044 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
		MoveTo(1, 1561 + (Random(-2, 1)), -15404 + (Random(-2, 1)))
		MoveTo(1, 1257 + (Random(-2, 1)), -15636 + (Random(-2, 1)))
		MoveTo(1, 1047 + (Random(-2, 1)), -15879 + (Random(-2, 1)))
		MoveTo(1, 861 + (Random(-2, 1)), -16204 + (Random(-2, 1)))
		MoveTo(1, 762 + (Random(-2, 1)), -16482 + (Random(-2, 1)))
		MoveTo(1, 703 + (Random(-2, 1)), -16747 + (Random(-2, 1)))
		MoveTo(1, 667 + (Random(-2, 1)), -17203 + (Random(-2, 1)))
		MoveTo(1, 550 + (Random(-2, 1)), -17508 + (Random(-2, 1)))
		MoveTo(1, 267 + (Random(-2, 1)), -17850 + (Random(-2, 1)))
		MoveTo(1, -113 + (Random(-2, 1)), -18181 + (Random(-2, 1)))
		MoveTo(1, -379 + (Random(-2, 1)), -18315 + (Random(-2, 1)))
		MoveTo(1, -555 + (Random(-2, 1)), -18417 + (Random(-2, 1)))
		MoveTo(1, -691 + (Random(-2, 1)), -18564 + (Random(-2, 1)))
		MoveTo(1, -783 + (Random(-2, 1)), -18741 + (Random(-2, 1)))
		MoveTo(1, -846 + (Random(-2, 1)), -18992 + (Random(-2, 1)))
		MoveTo(1, -926 + (Random(-2, 1)), -19300 + (Random(-2, 1)))
		MoveTo(1, -1017 + (Random(-2, 1)), -19559 + (Random(-2, 1)))
		MoveTo(1, -1103 + (Random(-2, 1)), -19825 + (Random(-2, 1)))
		MoveTo(1, -1177, -20051)
		StopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	ElseIf CheckArea(5810, -16857) Then ;Spawnpoint bei Kaplan Phyratyss
		ControlSend($client, "", "", "{x}")
		Sleep(500)

		PrepMoveTo()
		MoveTo(1, 5537 + (Random(-2, 1)), -17199 + (Random(-2, 1)))
		MoveTo(1, 5438 + (Random(-2, 1)), -17342 + (Random(-2, 1)))
		MoveTo(1, 5231 + (Random(-2, 1)), -17506 + (Random(-2, 1)))
		MoveTo(1, 4939 + (Random(-2, 1)), -17668 + (Random(-2, 1)))
		MoveTo(1, 4504 + (Random(-2, 1)), -17856 + (Random(-2, 1)))
		MoveTo(1, 4246 + (Random(-2, 1)), -17934 + (Random(-2, 1)))
		MoveTo(1, 3694 + (Random(-2, 1)), -18054 + (Random(-2, 1)))
		MoveTo(1, 3284 + (Random(-2, 1)), -18078 + (Random(-2, 1)))
		MoveTo(1, 2806 + (Random(-2, 1)), -18072 + (Random(-2, 1)))
		MoveTo(1, 2576 + (Random(-2, 1)), -18067 + (Random(-2, 1)))
		MoveTo(1, 2293 + (Random(-2, 1)), -18033 + (Random(-2, 1)))
		MoveTo(1, 1957 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
		MoveTo(1, 1481 + (Random(-2, 1)), -17852 + (Random(-2, 1)))
		MoveTo(1, 1297 + (Random(-2, 1)), -17819 + (Random(-2, 1)))
		MoveTo(1, 1020 + (Random(-2, 1)), -17814 + (Random(-2, 1)))
		MoveTo(1, 762 + (Random(-2, 1)), -17834 + (Random(-2, 1)))
		MoveTo(1, 522 + (Random(-2, 1)), -17882 + (Random(-2, 1)))
		MoveTo(1, 296 + (Random(-2, 1)), -17959 + (Random(-2, 1)))
		MoveTo(1, 49 + (Random(-2, 1)), -18091 + (Random(-2, 1)))
		MoveTo(1, -294 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
		MoveTo(1, -538 + (Random(-2, 1)), -18497 + (Random(-2, 1)))
		MoveTo(1, -669 + (Random(-2, 1)), -18685 + (Random(-2, 1)))
		MoveTo(1, -802 + (Random(-2, 1)), -19061 + (Random(-2, 1)))
		MoveTo(1, -964, -19503)
		stopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	ElseIf CheckArea(7425, -11855) Then ;Spawnpoint irgendwo bei der truhe (weiter weg)
		PrepMoveTo()
		MoveTo(1, 7443 + (Random(-2, 1)), -11949 + (Random(-2, 1)))
		MoveTo(1, 7465 + (Random(-2, 1)), -12203 + (Random(-2, 1)))
		MoveTo(1, 7399 + (Random(-2, 1)), -12587 + (Random(-2, 1)))
		MoveTo(1, 7251 + (Random(-2, 1)), -12952 + (Random(-2, 1)))
		MoveTo(1, 7068 + (Random(-2, 1)), -13271 + (Random(-2, 1)))
		MoveTo(1, 6688 + (Random(-2, 1)), -13821 + (Random(-2, 1)))
		MoveTo(1, 6573 + (Random(-2, 1)), -14025 + (Random(-2, 1)))
		MoveTo(1, 6497 + (Random(-2, 1)), -14317 + (Random(-2, 1)))
		MoveTo(1, 6536 + (Random(-2, 1)), -14537 + (Random(-2, 1)))
		MoveTo(1, 6691 + (Random(-2, 1)), -14794 + (Random(-2, 1)))
		MoveTo(1, 6853 + (Random(-2, 1)), -15032 + (Random(-2, 1)))
		MoveTo(1, 6935 + (Random(-2, 1)), -15223 + (Random(-2, 1)))
		MoveTo(1, 6954 + (Random(-2, 1)), -15440 + (Random(-2, 1)))
		MoveTo(1, 6884 + (Random(-2, 1)), -15670 + (Random(-2, 1)))
		MoveTo(1, 6764 + (Random(-2, 1)), -15855 + (Random(-2, 1)))
		MoveTo(1, 6592 + (Random(-2, 1)), -16061 + (Random(-2, 1)))
		MoveTo(1, 6423 + (Random(-2, 1)), -16185 + (Random(-2, 1)))
		MoveTo(1, 6213 + (Random(-2, 1)), -16278 + (Random(-2, 1)))
		MoveTo(1, 5915 + (Random(-2, 1)), -16353 + (Random(-2, 1)))
		MoveTo(1, 5610 + (Random(-2, 1)), -16375 + (Random(-2, 1)))
		MoveTo(1, 5366 + (Random(-2, 1)), -16318 + (Random(-2, 1)))
		MoveTo(1, 5079 + (Random(-2, 1)), -16179 + (Random(-2, 1)))
		MoveTo(1, 4606 + (Random(-2, 1)), -15910 + (Random(-2, 1)))
		MoveTo(1, 4096 + (Random(-2, 1)), -15574 + (Random(-2, 1)))
		MoveTo(1, 3771 + (Random(-2, 1)), -15374 + (Random(-2, 1)))
		MoveTo(1, 3458 + (Random(-2, 1)), -15233 + (Random(-2, 1)))
		MoveTo(1, 3098 + (Random(-2, 1)), -15129 + (Random(-2, 1)))
		MoveTo(1, 2612 + (Random(-2, 1)), -15120 + (Random(-2, 1)))
		MoveTo(1, 2290 + (Random(-2, 1)), -15187 + (Random(-2, 1)))
		MoveTo(1, 1861 + (Random(-2, 1)), -15324 + (Random(-2, 1)))
		MoveTo(1, 1634 + (Random(-2, 1)), -15429 + (Random(-2, 1)))
		MoveTo(1, 1361 + (Random(-2, 1)), -15674 + (Random(-2, 1)))
		MoveTo(1, 1102 + (Random(-2, 1)), -16000 + (Random(-2, 1)))
		MoveTo(1, 942 + (Random(-2, 1)), -16347 + (Random(-2, 1)))
		MoveTo(1, 782 + (Random(-2, 1)), -16883 + (Random(-2, 1)))
		MoveTo(1, 594 + (Random(-2, 1)), -17349 + (Random(-2, 1)))
		MoveTo(1, 437 + (Random(-2, 1)), -17617 + (Random(-2, 1)))
		MoveTo(1, 176 + (Random(-2, 1)), -17914 + (Random(-2, 1)))
		MoveTo(1, -219 + (Random(-2, 1)), -18310 + (Random(-2, 1)))
		MoveTo(1, -571 + (Random(-2, 1)), -18662 + (Random(-2, 1)))
		MoveTo(1, -693 + (Random(-2, 1)), -18807 + (Random(-2, 1)))
		MoveTo(1, -811 + (Random(-2, 1)), -19045 + (Random(-2, 1)))
		MoveTo(1, -915 + (Random(-2, 1)), -19331 + (Random(-2, 1)))
		MoveTo(1, -1046 + (Random(-2, 1)), -19739 + (Random(-2, 1)))
		MoveTo(1, -1093, -19888)
		stopMoveTo()
		Sleep(200)
		ControlSend($client, "", "", "{r down}")
		Sleep(200)
		ControlSend($client, "", "", "{r up}")
		Sleep(200)
	EndIf
	Sleep(1200 + Random(100, 200))
EndFunc   ;==>wayout



Func MoveToAdept()
	PrepMoveTo()
	MoveTo(1, 651, -10244)
	MoveTo(1, 1243, -10066)
	MoveTo(1, 1856, -9921)
	MoveTo(1, 2562, -9863)
	MoveTo(1, 2938, -9852)
	StopMoveTo()
	Sleep(20000)
	PrepMoveTo()
	MoveTo(1, 3487, -9838)
	MoveTo(1, 3935, -9796)
	MoveTo(1, 4402, -9725)
	MoveTo(1, 4800, -9664)
	MoveTo(1, 5178, -9606)
	MoveTo(1, 5566, -9546)
	MoveTo(1, 5926, -9477)
	MoveTo(1, 6347, -9370)
	MoveTo(1, 6675, -9265)
	MoveTo(1, 6972, -9157)
	MoveTo(1, 7076, -9124)
	StopMoveTo()
	ControlSend("Guild Wars", "", "", "{v}")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(3000)
	ControlClick("Guild Wars", "", "", "left", 1, 268, 306)

EndFunc   ;==>MoveToAdept

Func GetFactions()
	ControlSend("Guild Wars", "", "", "{w down}")
	Sleep(2000)
	ControlSend("Guild Wars", "", "", "{w up}")
	ControlSend("Guild Wars", "", "", "{v}")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(3000)
	ControlClick("Guild Wars", "", "", "left", 1, 276, 238)
	PrepMoveTo()
	MoveTo(1, 8921, -7614)
	StopMoveTo()
	Sleep(30000)
EndFunc   ;==>GetFactions



;wegstellen
Func MoveHinterAdept()
	PrepMoveTo()
	MoveTo(1, 8644, -7853)
	MoveTo(1, 8486, -7996)
	MoveTo(1, 8431, -8045)
	ControlSend("Guild Wars", "", "", "{1}")
	Sleep(50)
	ControlSend("Guild Wars", "", "", "{2}")
	MoveTo(1, 7940, -8551)
	MoveTo(1, 7617, -8796)
	MoveTo(1, 7336, -8963)
	MoveTo(1, 7156, -9048)
	MoveTo(1, 7113, -9079)
	MoveTo(3, 7122, -9081)
	;	MoveTo(3, 7117, -9081)
	StopMoveTo()
	Sleep(500)
	ControlSend("Guild Wars", "", "", "{w down}")
	Sleep(76.5)
	ControlSend("Guild Wars", "", "", "{w up}")
	;EndIf

	Sleep(200)
EndFunc   ;==>MoveHinterAdept

$currentpos = _MemoryRead(0xd28c54, $hprocess)

Func __WadimEnemyCheck()
	$currentpos = _MemoryRead(0xd28c54, $hprocess)
	ControlSend("Guild Wars", "", "", "c")
	ControlSend("Guild Wars", "", "", "{space}")
	Sleep(100)
	If _MemoryRead(0xd28c54, $hprocess) <> $currentpos Then
		;keine gegner mehr in der nähe
		Send("w") ; sich kurz bewegen, bricht C, SPACE ab.
	EndIf
EndFunc   ;==>__WadimEnemyCheck

Func Kampfscript()
	ControlSend("Guild Wars", "", "", "{a down}")
	Sleep(1000)
	ControlSend("Guild Wars", "", "", "{a up}")

	Sleep(500)

	ControlSend("Guild Wars", "", "", "{3}")
	Sleep(2500)
	ControlSend("Guild Wars", "", "", "{4}")
	Sleep(2500)
	ControlSend("Guild Wars", "", "", "{5}")
	Sleep(750)
	;AdlibEnable("__WadimEnemyCheck", 500)
	$i = -1
	Do

		ControlSend("Guild Wars", "", "", "{2}")
		Sleep(1000)
		$i = $i + 1
	Until $i = 60
	ControlSend("Guild Wars", "", "", "{3}")
	Sleep(4000)
	;_MemoryRead(0xd28c54, $hprocess) <> $currentpos
EndFunc   ;==>Kampfscript


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\NBArena\Desktop\tt6_V1.3\Form1.kxf
$Form1 = GUICreate("Stygier BT - The first P/E Stygian Vail Bot", 595, 387, 193, 125)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 433, 137)
GUICtrlSetData(-1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
$Radio1 = GUICtrlCreateRadio("German (Deutsch)", 440, 0, 113, 17)
$Radio2 = GUICtrlCreateRadio("English (Englisch)", 440, 24, 113, 17)
$Label1 = GUICtrlCreateLabel("How much rounds do you want to farm? :", 8, 152, 300, 17)
$Input1 = GUICtrlCreateInput("", 8, 168, 185, 21)
$Button1 = GUICtrlCreateButton("Start Farming", 8, 200, 99, 25, 0)
$Button2 = GUICtrlCreateButton("Resize Guild Wars", 8, 232, 99, 25, 0)
$Label2 = GUICtrlCreateLabel("Which Guild Wars Client do you want to use for botting?:", 208, 152, 278, 17)
$Radio3 = GUICtrlCreateRadio("Guild Wars 1", 208, 176, 113, 17)
$Radio4 = GUICtrlCreateRadio("Guild Wars 2", 208, 200, 113, 17)
$Radio5 = GUICtrlCreateRadio("Guild Wars 3", 208, 224, 113, 17)
$Radio6 = GUICtrlCreateRadio("Guild Wars 4", 208, 248, 113, 17)
$Radio7 = GUICtrlCreateRadio("Guild Wars 5", 208, 272, 113, 17)
$Button3 = GUICtrlCreateButton("Übersetzen", 440, 48, 91, 25, 0)
$MenuItem1 = GUICtrlCreateMenu("Menu")
$MenuItem2 = GUICtrlCreateMenuItem("Update", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			$readinput = GUICtrlRead($Input1)
			$rounds = 0
			Do
				$rounds = $rounds + 1
				GUICtrlSetData($Button1, "Rounds: " & $rounds & " of " & $readinput)

				Sleep(7000 + Random(100, 200))
				wayout()
				Sleep(10000)
				MoveToAdept()
				GetFactions()
				MoveHinterAdept()
				;AdlibEnable("Deathcheck")
				Kampfscript()
				;AdlibDisable()
				CollectLoot(25)
				Resign()
				Sleep(500)
				Resign()


			Until $rounds = $readinput Or $nMsg = $MenuItem3 Or $nMsg = $GUI_EVENT_CLOSE
			$de = GUICtrlRead($Radio1)
			$eng = GUICtrlRead($Radio2)
			If $eng = 1 Then
				GUICtrlSetData($Button1, "Finished")
			Else
				GUICtrlSetData($Button1, "Fertig")
			EndIf

		Case $MenuItem3
			Exit
		Case $Button3

			$de = GUICtrlRead($Radio1)
			$eng = GUICtrlRead($Radio2)
			GUICtrlSetData($Button3, $de & " " & $eng)
			If $de = 1 Then
				GUICtrlSetData($Button3, "Translate")
				GUICtrlSetData($Edit1, StringFormat("Dieser Bot wurde für die Elitepvpers Community erstellt.\r\n\r\nRegeln:\r\n§1 Versuch nicht, diesen Bot in einer anderen Community zu verkaufen.\r\n§2 Falls du diesen Bot Public machst, sag er wurde von\r\nhttp://www.elitepvpers.com/forum/guild-wars erstellt\r\n§3 Bitte botte nicht 24/7 ."))
				GUICtrlSetData($Label1, "Wieviele Runden willst du farmen? :")
				GUICtrlSetData($Label2, "Welchen Guild Wars Client willst du farmen lassen? :")
				GUICtrlSetData($Button1, "Farmen Starten")
				GUICtrlSetData($Button2, "Anpassen")
			ElseIf $eng = 1 Then
				GUICtrlSetData($Button3, "Übersetzen")
				GUICtrlSetData($Edit1, StringFormat("This Bot was made for the Elitepvpers community.\r\n\r\nRules:\r\n§1 Do not try to sell this bot in a other community.\r\n§2 If you make this bot public in another community, say that is was made by\r\nhttp://www.elitepvpers.com/forum/guild-wars\r\n§3 Please do not Bot 24/7 ."))
				GUICtrlSetData($Label1, "How much rounds do you want to farm? :")
				GUICtrlSetData($Label2, "Which Guild Wars Client do you want to use for botting? :")
				GUICtrlSetData($Button1, "Start Farming")
				GUICtrlSetData($Button2, "Resize Guild Wars")
			EndIf
		Case $Button2
			_SizeGW(600, 450)
	EndSwitch
WEnd
Behobener Fehler:
Resize GW button ist nicht mehr dummy...
Resize GW button now isnt a dummy anymore
03/02/2009 20:16 Hokler#10
ich würds gern mal testen aber leider hab ich keinen para :(
naja vielleicht mach ich mir einen =) extra für den bot =D


ps: öhm ich glaub bei den credits is dir ein fehler unterlaufen. ist der wayout nicht von mir ?? ;) *zwinker* :)

/Edit: Ich find den GUI toll vorallem das mit dem übersetzen und den verschiedenen Guild Wars Clients knöpfis :) und des große fenster da in dem die regeln stehen find ich auch toll :) wie hast du des gemacht ???
03/02/2009 20:25 kknb#11
öhm ganz normal mit koda.
03/02/2009 20:27 NBA#12
Naja, das erste Wayout war von dir ;) . Enders hat ein neues mit bessern wegen und Random gemacht. Ausserdem brauchst du kein Paragon wenn du einen Ele hast. Oder einen Char mit Alkars Alchemiesäure und Rabensturzflug hast. Dann musst du nur noch auf X/P machen, cant touch this und zieht euch zurück holen, und es kann losgehen.

Der ist noch richtig beschissen der bot,
aber entschuldigt mich ich muss mein Memorandum übers botschreiben machen :D

Sach ma kknb, warum um alles in der welt kann ich dir kein thx geben?
03/02/2009 20:33 kknb#13
Quote:
Originally Posted by NBA View Post
Sach ma kknb, warum um alles in der welt kann ich dir kein thx geben?

cheat ;)
03/03/2009 16:55 STARL1NE#14
Ist eine exe geplant? weil ich bekomm das nit zum Laufen :( wird wohl noch was dauern is ich alle tuts durch habe :D
03/03/2009 17:21 Hokler#15
den script einfach in den autoit script editor kopiren und F5 drücken und schon läuft der script =)