|
You last visited: Today at 01:56
Advertisement
[Tutorial] GWCA
Discussion on [Tutorial] GWCA within the GW Bots forum part of the Guild Wars category.
12/28/2009, 19:43
|
#16
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Aber GetCurrentTarget geht doch dann nur, wenn ich den bereits anvisiert habe. Und wie mache ich dass, wenn ich den nicht anvisiert habe?
|
|
|
12/28/2009, 19:51
|
#17
|
elite*gold: 100
Join Date: Oct 2007
Posts: 738
Received Thanks: 485
|
First look at this:
And this:
Code:
Cmd(CA_GetNearestNpcToCoords,$xcoord,$ycoord)
Coords über:
Code:
$npccoords = CmdCB(CA_GetCoords,-1)
$xcoord = $npccoords[0]
$ycoord = $npccoords[1]
rausfinden
dann dein script
Code:
$NPC = CmdCB(CA_GetNearestNpcToCoords,$xcoord,$ycoord)
Cmd($CA_GoNpc, $NPC[0])
|
|
|
01/03/2010, 08:51
|
#18
|
elite*gold: 0
Join Date: Dec 2009
Posts: 3
Received Thanks: 0
|
was ist mein script?
|
|
|
01/03/2010, 21:07
|
#19
|
elite*gold: 0
Join Date: Apr 2008
Posts: 362
Received Thanks: 353
|
@guildwars1337: Dein Skript ist dem guildwars1337 sein Skript.
|
|
|
01/06/2010, 01:12
|
#20
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Warum funktioniert das nicht?
Code:
Cmd($CA_SwitchMode,1)
$NPC = Cmd($CA_GetNearestNpcToCoords,-23884,13954)
Cmd($CA_GoNpc, $NPC)
Cmd($CA_Dialog, 8618497)
Cmd($CA_GoNpc, $NPC)
Cmd($CA_Dialog, 131)
Es geht nur, wenn ich Koris anvisiert habe und Quest nimmt er gar nicht an.
MfG
|
|
|
01/06/2010, 14:01
|
#21
|
elite*gold: 0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
|
Code:
Cmd($CA_SwitchMode,1)
$NPC = CmdCb($CA_GetNearestNpcToCoords,-23884,13954)
Cmd($CA_GoNpc, $NPC[0])
Cmd($CA_Dialog, 8618497)
Cmd($CA_Dialog, 131)
HF
|
|
|
01/09/2010, 00:47
|
#22
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Kann mir wer über ICQ vllt mit mienem Bot helfen, ich bin ratlos....
MfG
|
|
|
01/09/2010, 20:03
|
#23
|
elite*gold: 0
Join Date: Apr 2008
Posts: 362
Received Thanks: 353
|
Quote:
Originally Posted by pinguin94
Kann mir wer über ICQ vllt mit mienem Bot helfen, ich bin ratlos....
MfG
|
Stell deine Frage(n) dich einfach in einem passenden Thread. Die Chance, dass dir jemand im "Vorbeigehen" hilft, ist größer als dass sich jemand jetzt ne halbe Stunde dir widmet, denk ich mal
Davor solltest du aber bitte versuchen, nach manchen Problemen im Forum zu suchen. Die meisten Fragen wurden nämlich schon mindestens einmal beantwortet
|
|
|
01/09/2010, 22:26
|
#24
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Hier mein Script:
Code:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#include <tt6.au3>
#include <misc.au3>
#include "GWCAConstants.au3"
#include "InjectDLL.au3" ;Hab ich um DLL zu injecten.
Global $Paused
Global $UmbralID = 639
Global $QGeberID = 16
Global $BountyID = 224
Global $InsideID = 701
Global $GetQ_ID = 8618497
Global $GetInside_ID = 131
Global $Town_Out =
Global $HF_X = -14948.181640625
Global $HF_Y = 11403.0166015625
$Name = InputBox("Fenster Name", "Gib den Guild Wars Win Namen ein.", "Guild Wars")
Global $Hwnd = WinGetHandle($Name)
If IsHwnd($Hwnd) = False Then
MsgBox(0, "Error", "Das GW Fenster wurde nicht gefunden. Eingegebener Win Name war """ & $Name & """")
Exit
EndIf
Global $PID = WinGetProcess($Hwnd)
Global $hprocess = _MemoryOpen($PID)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Zwergenpunkte Farmbot", 509, 430, 411, 185)
GUISetBkColor(0xFFFFE1)
$Button1 = GUICtrlCreateButton("Start", 312, 152, 121, 41, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Arial")
GUICtrlSetCursor (-1, 0)
$Button2 = GUICtrlCreateButton("Script pausieren", 312, 232, 121, 41, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Arial")
GUICtrlSetCursor (-1, 0)
$Button3 = GUICtrlCreateButton("Exit", 368, 344, 121, 41, 0)
GUICtrlSetFont(-1, 18, 400, 0, "Arial")
GUICtrlSetCursor (-1, 0)
$Label1 = GUICtrlCreateLabel("Zwergenpunkte Farmbot", 24, 24, 378, 36)
GUICtrlSetFont(-1, 20, 400, 0, "Arial")
$Label2 = GUICtrlCreateLabel("Script pausieren", 50, 243, 121, 41, 0); Hier kommt ein Fertigkeitencode hin
GUICtrlSetFont(-1, 12, 400, 0, "Arial")
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###
GUIRegisterMsg(0x500, "WndCallback")
#cs
_INJECTDLL($Hwnd, @ScriptDir & "\Wazza.dll"); Wazza = fiktiver Name
If @error Then
MsgBox(64,"Error","Couldn't inject DLL, pls restart GW and Bot!")
EndIf
#ce
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Do
If _TownIDRead = $UmbralID
WalkNPC()
If _TownIDRead() = $InsideID Then
getBounty()
_flag()
RandomSleep(20000,30000)
_resign()
EndIf
Else
Cmd($CA_ZONEMAP, $UmbralID)
EndIf
Until $GUI_EVENT_CLOSE
Case $Button2
Pause()
Case $Button3
Exit
EndSwitch
WEnd
func WalkNPC()
Cmd($CA_SwitchMode,1)
$NPC = CmdCB($CA_GetNearestNpcToCoords,-23884,13954)
Cmd($CA_GoNpc, $NPC[0])
Cmd($CA_Dialog, 8618497)
Cmd($CA_Dialog, 131)
EndFunc ;==>WalkNPC
Func getBounty()
$NPC = Cmd($CA_GetNearestNpcToCoords,-14078,15449)
Cmd($CA_GoNpc, $NPC)
Cmd($CA_Dialog, 131)
EndFunc
Func _flag()
$cbType = "int"
Cmd($CA_CommandAll, $HF_X, $HF_Y)
EndFunc ;==> Flag
Func _resign()
Cmd($CA_Resign)
EndFunc
Func Pause()
GUICtrlSetData($Button2, "Script fortsetzen")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button2
ExitLoop
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
Sleep(50)
WEnd
GUICtrlSetData($Button2, "Script pausieren")
EndFunc ;==>Pause
Func RandomSleep($min, $max)
$time = Random($min, $max)
Sleep($time)
Endfunc ;==>RandomSleep
Func _TownIDRead()
Return _MemoryRead($Town_Out, $hprocess)
EndFunc
Warum kann ich nicht zum NPC laufen?
Allgemein funktioniert der nicht ganz.
Woher bekomm ich die $TownOut ID?
MfG
PS: Einige Dinge hab ich auch verschiedenen Bots, nicht meckern, ich kann jetzt nicht sagen woher ich das alles hab :S
|
|
|
01/15/2010, 22:29
|
#25
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Keiner eine Idee?
|
|
|
01/16/2010, 00:01
|
#26
|
elite*gold: 0
Join Date: Jul 2009
Posts: 75
Received Thanks: 84
|
Ich hab mal ne kleine Frage:
Wenn ich alles was ich brauch, um mit GWCA zu kommunizieren, gemacht hab
(#include "GWCAConstants.au3" ; $cGUI = GUICreate("") ; GUIRegisterMsg(0x500, "WndCallback")
Meine Frage: Kann ich nun meinen restlichen Bot komplett in AutoIt schreiben? Oder muss ich etwas beachten?
|
|
|
01/16/2010, 13:50
|
#27
|
elite*gold: 0
Join Date: Apr 2008
Posts: 362
Received Thanks: 353
|
Ja kannst du. Gut...für manche Funktionen braucht man noch andere Includes oder .ini-files, aber ansonsten...programmier mal drauf los
|
|
|
01/18/2010, 13:33
|
#28
|
elite*gold: 0
Join Date: Jul 2009
Posts: 75
Received Thanks: 84
|
@Garry goes Sheep
Kannst du mir mal erklären wieso das nicht funktioniert?
Quote:
;################################# Includes
#include <GWCAConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;################################# Hotkeys
HotKeySet ("{F1}", "End") ;Exit Bot
GUIRegisterMsg(0x500, "WndCallback"
#Region ### START Koda GUI section ### Form=
Global $cGUI= GUICreate("Tuturial Bot", 449, 332, 193, 246)
$Button1 = GUICtrlCreateButton("Get Skillcode", 16, 24, 185, 73, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Credits & Anleitung", 232, 24, 193, 73, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Start", 16, 216, 209, 73, $WS_GROUP)
$Group1 = GUICtrlCreateGroup("Runs:", 256, 128, 177, 169)
$Radio1 = GUICtrlCreateRadio("10 Runs", 272, 168, 145, 17)
$Radio2 = GUICtrlCreateRadio("50 Runs", 272, 208, 129, 17)
$Radio3 = GUICtrlCreateRadio("250 Runs", 272, 248, 113, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUIRegisterMsg(1050x750, "WndCallback")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Skillcode()
Case $Button2
Case $Button3
Main()
EndSwitch
WEnd
Func Skillcode()
GUICtrlCreateInput("Will Follow", 16, 128, 217, 21)
EndFunc
Func Main()
Global $Runs = 1
WinActivate ("Guild Wars")
WinMove ("Guild Wars", "", 0,0, 1050, 750)
If $Radio1 = True Then
While Global $Runs < 10
GoOut()
WEnd
ElseIf $Radio2 = True Then
While Global $Runs < 50
GoOut()
WEnd
ElseIf $Radio3 = True Then
While Global $Runs < 250
GoOut()
WEnd
EndIf
EndFunc
Func End()
Exit
EndFunc
Func GoOut()
MoveWithoutSkills(-12230,-6261)
MoveWithoutSkills(-11939,-6233)
MoveWithoutSkills(-11886,-6233)
MoveWithoutSkills(-11763,-6232)
MoveWithoutSkills(-11725,-6232)
MoveWithoutSkills(-11675,-6232)
MoveWithoutSkills(-11543,-6231)
MoveWithoutSkills(-11465,-6230)
EndFunc
|
|
|
|
01/18/2010, 20:53
|
#29
|
elite*gold: 0
Join Date: Apr 2009
Posts: 442
Received Thanks: 189
|
bin zwar nich Garry goes Sheep, allerdings sieht das:
Code:
GUIRegisterMsg(0x500, "WndCallback"
schonma schlecht aus, so ohne klammer am schluss
und die zeile:
Code:
$cGUI = GUICreate("GWCA")
hab ich beim überfliegen auch nicht entdeckt
|
|
|
01/18/2010, 21:21
|
#30
|
elite*gold: 0
Join Date: Apr 2008
Posts: 362
Received Thanks: 353
|
Ist wohl auch besser, wenn andere Leute mit einbezogen werden, weil ich selbst alles andere als ein erfahrener Programmierer bin
|
|
|
|
|
Similar Threads
|
Tutorial-Farben-Bot [GWCA]
04/12/2012 - GW Exploits, Hacks, Bots, Tools & Macros - 69 Replies
Nun ja, was gibt es noch groß dazu zu sagen. Er farmt die Banditen vor dem Aschfurt-Abtei.
!!! Version 3.0 - EndProdukt !!!!
Was ihr müsst:
- Die Quest Banditenüberfall von Baron Egan aktiv haben
Was der Bot macht:
- DLL wird automatisch injectet
- Wie gesagt, tötet er die Banditen (4-6 pro Run)
|
[GWCA] Tutorial-Level-Bot
05/20/2010 - GW Exploits, Hacks, Bots, Tools & Macros - 23 Replies
Nun ja, es ist ein Bot welcher die Quest Charr vor dem Tor fast kommplett durchführt. Es werden KEINE Skills gebraucht.
1 Run ca 1min
Was ihr müsst:
- DLL injecten
- min Stufe 2 sein (sonst kann man Quests nicht annehmen)
- Die Quest aktiv haben
Was der Bot macht:
|
[GWCA] - Tutorial Bot Package
05/16/2010 - GW Exploits, Hacks, Bots, Tools & Macros - 73 Replies
Soo, alles nochmal überarbeitet und funktioniert nun auch mit der neuen Rev.
http://s5.directupload.net/images/100419/temp/eth q5avo.jpg
:
Stadt: Aschfurt Abtei
Klasse: E/Mö bzw. Mö/E
Stufe: mind. 4
Benötigte Quests: Banditenüberfall und Schutzgebete
Skills: 1. Feuersturm ; 2. Schützende Hände ; 3. Symbol des Zorns
|
GWCA help?
02/20/2010 - GW Bots - 3 Replies
I'm trying to find place numbers for the maps etc.
Like Rata Sum is 640...
I need to know what I would set my ToPK value to.
It's for this...
Global $MAP_TOPK = ???
|
All times are GMT +2. The time now is 01:56.
|
|