Botsammelung 1.0 Unfinished

NBA · 12/15/2008, 14:19

Also Funktion ist einfach:

Botten einigermaßen komfortabel zu machen...naja, ist das gui den dann auch verlinkt(Reicht z.B. schon wenn die Methode drinsteht, will nicht in mein armes gehirn, damit ich nciht immer in dem Helpfile nachgucken muss xD )

Nunja die Bots werden evtl. auch nachläufig geändert, um den bot schön "schlank" zu halten...das sollte miteinberechnet werden. (Wenn z.B. Hfff noch am laufen wäre, zerstört werden würde, wird der entsprechende bot rausgelöscht/angepasst)

Also die Bots die Jetzt kommen sollen sind folgende:

Quote:

-Thermalquellen Bot
-K/R Ungeziefer farmer (fürs erste reicht die erste grp + evtl kisten)
-Permasin Ungeziefer (siehe oben)
-Jadebruderschaft
-Flachland von Jarin

Und Blauwiggle mit 5 min arbeit hab ich den Elonabot gemeint

Danke der Hilfbereitschaft!

iDesign · 12/15/2008, 14:38

Die Nephila in Flachland farmen ist kein Problem, nur beim Hassain wirds schwerer, da vor ihm immer Random Ibogas sind.

NBA · 12/15/2008, 14:50

Ja, das weiß ich

die nerven, aber mit Heilender Hauch ist das kein Problem...(sie sterben vor hassain...)

Probleme derzeit:

Permasin Assa Bot (ungeziefer)/ K/R Ungeziefer: Laufweg.
Elonaspitzenbot: Das gleiche
Thermalquellenbot: Noch nicht vorhanden

Flachland bot: Iboga's bei Hassain
Jadebruderschafts-Ritter Bot: wird grad gemacht...
Bot(Allgemein): Hat keinen Namen

(vllt. OSBOT?)

Und immer schön im startpost schauen, den aktuallisiserese... ich immer

exit_Z · 12/15/2008, 15:10

ich setz mich ma eben hinter und bau ne schöne gui zusammen lasse mir dazu nen namen einfallen wenn es recht ist, würde mich zu dem mit dem thermalquellen bot auseinander setzten da ich finde das man das ganze gebiet auch farmen kann statt immer nur die erste gruppe...

*edit

Achso, soll der user dann auch einstellungen ändern können per Bot Interface? Dann würde ich da einfach TAB einbauen so das man mehr auswahl möglichkeiten hat..

NBA · 12/15/2008, 15:33

If you want...Feel free

exit_Z · 12/15/2008, 16:17

So naja habe ma fix was zusammengeschraubt.. wird auf jedenfall noch viel verändert will nur ma von dir wissen ob es so recht wäre bzw. was noch dazu kommen sollte oder weg gelassen werden kann...

NBA · 12/15/2008, 19:34

Dann test ich mal deinen Keylogger, Trojaner oder was auch immer

DAS GUI IST GEEEIIIEEEEIIIEEELLLL!!!!

exit_Z · 12/15/2008, 20:07

Quote:

Originally Posted by NBA

Dann test ich mal deinen Keylogger, Trojaner oder was auch immer

DAS GUI IST GEEEIIIEEEEIIIEEELLLL!!!!

Isn Trojaner keine angst^^

Ok wenn des gui so schonmal in ordnung ist dann arbeite ich es jetzt komplett aus... melde mich wenn es fertig ist.

NBA · 12/16/2008, 14:37

Derzeitiger Code:

Code:

#cs ----------------------------------------------------------------------------
	
	AutoIt Version: 3.2.12.1
	Bot Version: 1.0
	Author:         NBA and the Elit*pvpers community
	
	Script Function:
	Eine Sammelung (und Anpassung) der Bots
	Man könnte auch standartisierung der Bots sagen ;-)
	
	Have fun!!!
#ce ----------------------------------------------------------------------------

; Includes
#include <GuiConstants.au3>



;Das GUI
#cs
	#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\Paul\Desktop\Botsammelung.kxf
	$Form1 = GUICreate("Botsammelung by NBA and elitepvpers.com", 633, 447, 193, 125)
	$Label1 = GUICtrlCreateLabel("Gib hier an, wo du Farmen willst :", 8, 8, 159, 17)
	$Radio1 = GUICtrlCreateRadio("Elonaspitze", 8, 40, 161, 25)
	$Radio2 = GUICtrlCreateRadio("Thermalquellen", 8, 64, 129, 25)
	$Input1 = GUICtrlCreateInput("", 8, 128, 161, 21)
	$Label2 = GUICtrlCreateLabel("Gib hier an, wie oft du farmen willst : ", 8, 96, 176, 17)
	$Button1 = GUICtrlCreateButton("Start", 152, 232, 273, 113, 0)
	GUISetState(@SW_SHOW)
	#EndRegion ### END Koda GUI section ###
	
	While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
	Case $GUI_EVENT_CLOSE
	Exit
	
	EndSwitch
	WEnd
	
	
	If $Radio1 = $Gui_Checked and GUIGetMsg($Button1) Then
	WinActivate("GUild Wars")
	WinWaitActive("Guild Wars")
	Elonaspitze()
	EndIf
#ce

;-------------Zufallsvar
$Zufalls250 = Random(300, 350, 1) ; Zufall für Fertigkeiten mit Aktv. Zeit 1/4
$Zufalls1000 = Random(1700, 1800, 1) ; Zufall für Fertigkeiten mit Aktv. Zeit 1 sek.
$Zufalls2000 = Random(2500, 2700, 1) ; Zufall für Fertigkeiten mit Aktv. Zeit 2 sek.
;-------------


;Hotkeys



;----------
;----------
;----------
;Die Fertigkeiten als Funktionen(Damit man nicht ewig langen Code braucht):
Func Schutzgeist()
	Send("1")
	Sleep($Zufalls250)
EndFunc   ;==>Schutzgeist

Func Hand()
	;Schützende Hände
	Send("2")
	Sleep($Zufalls250)
EndFunc   ;==>Hand

Func SdA()
	; Schild Der Absorbtion
	Send("3")
	Sleep($Zufalls1000)
EndFunc   ;==>SdA

Func SS()
	; Bosthafter Geist
	Send("4")
	Sleep($Zufalls2000)
EndFunc   ;==>SS

Func GA()
	;Gesegnete Aura
	Send("6")
	Sleep($Zufalls2000)
EndFunc   ;==>GA

Func Essenzbindung()
	;Essenzbindung
	Send("7")
	Sleep($Zufalls2000)
EndFunc   ;==>Essenzbindung

Func BG()
	;Baltharsars Geist
	Send("8")
	Sleep($Zufalls2000)
EndFunc   ;==>BG

Func GdS()
	;Glyphe der Schnelligkeit
	Send("1")
	Sleep($Zufalls1000)
EndFunc   ;==>GdS

Func TP()
	;Tödliches Paradoxon
	Send("2")
EndFunc   ;==>TP

Func SF()
	;Schattenform
	Send("3")
	Sleep($Zufalls1000)
EndFunc   ;==>SF

Func SR()
	;Splitterrüstung
	Send("4")
	Sleep($Zufalls1000)
EndFunc   ;==>SR

;Wiederholende Kampfszenen als Func(Ist mir leider erst beim Perma eingefallen):

Func SfKampf()
	GdS()
	TP()
	sleep(1500)
	SF()
	SR()
	Sleep(17000)
EndFunc   ;==>SfKampf

;---------------
;---------------
;---------------

Func Elonaspitze()
	#cs
		Skills: OwQTc4HDnpesSur5BAAARfIPAA
	#ce
	
	;Mission Betreten
	MouseClick("left", 896, 424, 1, 800)
	
	;Meldung mit "JA" Beantworten
	MouseClick("left", 521, 434, 1, 800)
	
	;Warten bis man in der Missi ist
	Sleep(10000)
	
	;In Spieler Reinzoomen(Damit der Richtige weg gegeangen wird)
	MouseWheel("up", 300)
	;Verz Aktiv.
	
	BG()
	GA()
	Essenzbindung()
	;Geist Anwesieren
	Send("v")
	Send("{space}")
	Sleep(9000)
	;Scherbe Fallenlassen
	MouseClick("left", 501, 634, 1, 800)
	;sich selbst anwählen
	Send("f")
	;Zu den Feinden Laufen
	Send("{w down}")
	Sleep(3000)
	Send("{w up}")
	
	Send("{d down}")
	Sleep(800)
	Send("{d up}")
	
	Send("{w down}")
	Sleep(1000)
	Send("{w up}")
	
	Send("{a down}")
	Sleep(550)
	Send("{a up}")
	
	Send("{w down}")
	Sleep(9000)
	Send("{w up}")
	
	Send("{a down}")
	Sleep(550)
	Send("{a up}")
	
	Schutzgeist()
	Hand()
	Sleep(500)
	Send("{w down}")
	Sleep(6500)
	Send("{w up}")
	SdA()
	SS()
	Sleep(5000)
	Hand()
	Schutzgeist()
	Sleep(4000)
	SS()
	Sleep(5000)
	SdA()
	Sleep(6000)
	Hand()
	Sleep(1000)
	;Zeugs aufnehmen
	Send("ö")
	Send("{space}")
	Sleep(100)
	Send("ö")
	Send("{space}")
	Sleep(100)
	Send("ö")
	Send("{space}")
	Sleep(100)
	Send("ö")
	Send("{space}")
	Send("ö")
	Send("{space}")
	;Aufgeben
	Send("{enter}/resign{Enter}")
	
EndFunc   ;==>Elonaspitze


Func PermasinSenji()
	#cs
		Skills: OwZS41PPSfekOjHCAAAAAAA
		{
		1.Glyphe der Schnelligkeit
		2.Tödliches Paradoxon
		3.Schattenform
		4.Splitterrüstung
		}
		
		Man muss eine Hohe Rune der Schattenkünste in der Rüstung haben, außerdem 42 Energie!(42 Mana+14Schattenkünste)
		
		
		
		Waffe: Stab mit standart +10 energie, Mod +5 Energie(Ich habe die Kraft, glaub ich) und einen Verz. Verl. um 20 Mod.
	#ce
	MouseWheel("up", 300) ;Damit der Laufweg zZ. Nicht beeinträchtigt wird.
	
	
	Send("{w down}")
	Sleep(4000)
	Send("{w up}")
	
	Send("{a down}")
	Sleep(500)
	Send("{a up}")
	
	Send("{w down}")
	Sleep(1500)
	Send("{w up}")
	
	Send("{d down}")
	Sleep(500)
	Send("{d up}")
	
	Send("{w down}")
	Sleep(7000)
	Send("{w up}")
	
	Send("{a down}")
	Sleep(300)
	Send("{a up}")
	
	Send("{w down}")
	Sleep(4000)
	Send("{w up}")
	
	Send("{d down}")
	Sleep(600)
	Send("{d up}")
	
	Send("{w down}")
	Sleep(3500)
	Send("{w up}")
	
	Send("{a down}")
	Sleep(500)
	Send("{a up}")
	
	Send("{w down}")
	Sleep(12000)
	Send("{w up}")
	
	SfKampf()
	SfKampf()
	SfKampf()
	
	send("{ö}")
	sleep(250)
	send("{ö}")
	sleep(250)
	send("{ö}")
	sleep(250)
	send("{ö}")
	sleep(250)
	
	
EndFunc   ;==>PermasinSenji

Nen bischen wass zu testzwecken auskommentiert, hab aber eh ne frage

Also die Frage des Tages*dadamdadam*:
Wie sorge ich dafür, das die Kamera immer wieder in die Gleiche Position zurückschwenkt??

Thx im vorraus

NBA

€dit: Ich hasse Namengeben^^

Gabba2 · 12/16/2008, 14:43

den Course Wert in den Wert ändern den die Kamera eben haben soll (mit memwrite oder zum probieren mit Cheat Engine). Oder meinst du einen Freeze der Kamera? Dann müsstest du ständig den Wert in einer Schleife überschreiben.

NBA · 12/16/2008, 15:07

Eigentlich nur das sie immer zurückspringt, wenn ich eine farmrunde beginnge...

darkangel1000 · 12/16/2008, 18:00

nur n kleiner Tipp.
Wenn du immer bei den Skripts iwo des Datum hinschreibst kann man sehn ob des der aktuelle is!

BSP:
#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.12.1
Bot Version: 1.0
Author: NBA and the Elit*pvpers community

Script Function:
Eine Sammelung (und Anpassung) der Bots
Man könnte auch standartisierung der Bots sagen ;-)
Stand16.12.08
Have fun!!!
#ce ----------------------------------------------------------------------------

NBA · 12/16/2008, 18:08

ReWrite94 · 12/17/2008, 19:21

Kann wir wer sagen, wie ichs benutze? wenn ich auf run script geh und dann auf die datei, macht er nix...

NBA · 12/17/2008, 20:17

Bitte...bis jetzt ist es noch nicht fertig...ich versuche zwar die bots anzupassen, aber das GUI muss noch kommen

Solage geht NICHTS