Zaishen Bot V1

Page 1 of 2 1 2
07/09/2008 21:53 i4mSoH34Vy#1
:) Zaishen Bot nun fertig :D
er ist für die normalen zaishen gedacht !!

[Only registered and activated users can see links. Click Here To Register...]
07/09/2008 21:57 NANAAA#2
danköö =)

ich werd mal den source anschauen etc und probier dann mal nen öhnlichen bot zu machen xD =) XD

mfg
07/09/2008 22:02 Jacob_G#3
benutzt doch mouseclick("left",$x_coord,$y_coord,$clicks,$speed ) ;D
07/09/2008 22:03 _revo#4
hättest btw auch sehr sehr verkürzen können ;)
in deinem fall mit den 8 runs:

Code:
Global $count = 0
while $count <= 8
	$count = $count + 1

;-start zaishen
(......)
;-ende zaishen start
wend
07/09/2008 22:04 kknb#5
habs jetzt nicht getestet, aber würde an deiner stelle den vorgang in einer schleife laufen lassen um das alles übersichtlicher zu machen.
übrigens war die zaishen arena der erste ort für den ich nen macro gemacht habe, das war noch mit ac tool als ele solo, wer das ding noch haben will soll mir bescheid geben^^



edit: da war ich wohl zu spät^^
07/09/2008 22:06 i4mSoH34Vy#6
danke für die guten tipps und ach ja der scan^^
[Only registered and activated users can see links. Click Here To Register...]
07/09/2008 22:10 kknb#7
mal nen bisl verkürzt.


Quote:
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")

;- START HOTKEY mit PAUSE Taste könnt ihr den bot Pausieren lassen
HotKeySet("{PAUSE}", "TogglePause")

Global $Paused


Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc
;- ENDE HOTKEY mit PAUSE Taste könnt ihr den bot Pausieren lassen

;- START HOTKEY mit F8 beendet ihr das Script
hotkeyset("{F8}", "end")

func end()
Exit
EndFunc
;- ENDE HOTKEY mit F8 beendet ihr das Script

;-Start Functionen RandomSleep
func RandomSleep($min, $max)
$time = Random($min, $max)
Sleep($time)
endfunc
;-Ende Functionen RandomSleep

;-start wait if Window is open
RandomSleep(4000, 4200)
;-end wait if Window is open

func fight()
for $i = 1 to 9 step -1
MouseMove(849, 214)
MouseDown("left")
MouseUp("left")
RandomSleep(2000, 2400)
MouseMove(914, 205)
MouseDown("left")
RandomSleep(2000, 2400)
MouseMove(915, 381)
MouseUp("left")
RandomSleep(2000, 2400)
MouseMove(693, 493)
MouseDown("left")
RandomSleep(2000, 2400)
MouseMove(666, 547)
MouseUp("left")
RandomSleep(2000, 2400)
MouseMove(745, 358)
MouseDown("left")
MouseUp("left")
RandomSleep(2000, 2400)
MouseMove(709, 670)
MouseDown("left")
MouseUp("left")
RandomSleep(8000, 8800)
;-ende zaishen start
Next
endfunc
07/09/2008 22:10 _revo#8
Quote:
Originally Posted by xninja View Post
benutzt doch mouseclick("left",,,,) ;D
blackWorkx prägt die leute hier mit seinem alten bot ^^
07/09/2008 22:12 i4mSoH34Vy#9
Ja ich werde es versuchen in meinen nächsten bot es anders zu machen :D
07/09/2008 22:40 blackWorkx#10
Quote:
blackWorkx prägt die leute hier mit seinem alten bot ^^
arf leute nehmt nicht meinen Bot als beispiel^^ nehmt den HFFF Bot der hat nen ordentlichen Func aufbau meiner is nur runter geschrieben...^^

ich sollte echt mal nen neuen posten im puplic

Edit: Hier nochmal etwas verkürzter!

Code:
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","", 4) ; wartet 4 sec bis win aktiv ist!

;- START HOTKEY mit PAUSE Taste könnt ihr den bot Pausieren lassen
HotKeySet("{PAUSE}", "TogglePause"); Pausieren des Scripts
hotkeyset("{F8}", "end") ; Beenden des Scripts
Dim $i
Global $Paused

Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc

func end()
Exit
EndFunc

func RandomSleep($min, $max) ;RandomSleep Funktion Start
$time = Random($min, $max)
Sleep($time)
endfunc ; RandomSleepFunktion Ende

func fight() ;Zaishen Start
    For $i = 1 to 9
MouseCLick("left",849, 214, 1)
RandomSleep(2000, 2400)
MouseCLick("left",914, 205,1)
RandomSleep(2000, 2400)
MouseCLick("left",915, 381,1)
RandomSleep(2000, 2400)
MouseCLick("left",693, 493, 1)
RandomSleep(2000, 2400)
MouseCLick("left",666, 547, 1)
RandomSleep(2000, 2400)
MouseCLick("left",745, 358, 1)
RandomSleep(2000, 2400)
MouseCLick("left",709, 670, 1)
RandomSleep(8000, 8800)
    Next
endfunc ;Zaishen Start Ende
07/09/2008 23:06 kknb#11
Quote:
Originally Posted by g i p s y View Post
blackWorkx prägt die leute hier mit seinem alten bot ^^

das liegt wohl weniger an blackWorkx als an den scite script editor der das so ausspuckt, und solange man da noch durchsieht isses doch latte^^
07/10/2008 09:18 NANAAA#12
also ich orientiere mich an blackWorkx ' s bot ..

denn iwie muss man ja das lernen und hfff is ja noch mit texmode etc .. das is zurzeit schon zu hoch für mich xD
07/10/2008 10:46 blackWorkx#13
Quote:
denn iwie muss man ja das lernen und hfff is ja noch mit texmode etc .. das is zurzeit schon zu hoch für mich xD
TexMod hat er doch nur für die Pixel abfrage. Also würd ich sagen das für dich halt das Problem noch bei PixelSearch PixelGetColor und co liegt.
07/10/2008 10:57 NANAAA#14
ja schon ...

hab zwar in meinem bot die funktion eingebaut dass goldene sachen in truhe gelegt werden aber auch nur mit hilfe .. XD
07/15/2008 20:49 i4mSoH34Vy#15
Könnte mir mal jemand sagen wie man hier eine zweite datei noch mit reinstellt der bot ist nun fertig :D
Page 1 of 2 1 2