|
You last visited: Today at 19:44
Advertisement
Sylphs/Heldengeister Bot for Free
Discussion on Sylphs/Heldengeister Bot for Free within the Browsergames forum part of the Other Online Games category.
02/16/2014, 16:58
|
#61
|
elite*gold: 0 
Join Date: Feb 2014
Posts: 1
Received Thanks: 0
|
Quote:
Originally Posted by Ol4fff
[LAST UPDATE: 20.01.2014 10:45 Uhr]
32 Bit / 64 Bit Support
Skript jetzt auch in 1024x768 und 1280x1024 hinzugefügt; ZIP beinhaltet alle Skripte/EXE
scripts now in 1024x768 and 1280x1024 available; ZIP contains all scripts/EXE
Hallöchen zusammen,
nachdem Vegeta17 ja nun einen ellenlangen Thread mit seinem Bot hat und das Ganze inzwischen doch sehr unübersichtlich ist, habe ich einen neuen Thread aufgemacht, in dem meine Skripte eingestellt sind. So kann ich immer die neuesten Veränderungen direkt auf Seite 1 reinpacken und keiner muss 20 Seiten oder mehr danach suchen.
Vielen Dank an Vegeta17 für seine Arbeit am Bot und danke, dass wir den Sourcecode nutzen dürfen.
Für Interessierte hier sein Thread: 
------------------------------------------
ENGLISH:
This is a edited script by Vegeta17 with additional functions. Thanks to Vegeta17 I could change some things for me, like other skills etc.
Vegetas Bot could be find at the link above
------------------------------------------
Und hier meine derzeitigen Skripte / And here my last scripts:
WICHTIG: CLIENT-Version, in Vollbild, Taskleiste sichtbar, soll wohl auch bei Browserversion in Vollbild funktionieren, aber ich gebe KEINE Garantie darauf
ZIP ist als Anlage beigefügt, Virustotal siehe Ende des Threads
ATTENTION: Client Version of GERMAN Demon Slayer Client, all other clients idk if it works, NO GUARANTEE but should work at browser in fullscreen to, if you are at sylph isle in level you want.
ZIP is at the end of the thread, Virustotal too
HG Bot mit Auswahlmöglichkeit 1600 x 900 und höher / Sylph Bot 1600 x 900 and higher: (20.01.2014)
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
GUICreate("Bot für die Heldengeister", 270, 240)
GUICtrlCreateLabel("Starten des Bots über Schaltfläche", 50, 10)
GUICtrlCreateLabel("Charakter bitte entweder in Himmelsburg", 40, 30)
GUICtrlCreateLabel("oder ins jeweilige Level stellen", 60, 50)
GUICtrlCreateLabel("<P> - pausiert Skript", 87, 80)
GUICtrlCreateLabel("<ESC> - beendet Skript", 80, 100)
$irisbot = GUICtrlCreateButton("Iris-Bot starten", 60, 140, 150)
$faunbot = GUICtrlCreateButton("Faun-Bot starten", 60, 160, 150)
$amazonbot = GUICtrlCreateButton("Amazonen-Bot starten", 60, 180, 150)
$goblinbot = GUICtrlCreateButton("Goblin-Bot starten", 60, 200, 150)
GUISetState(@SW_SHOW)
Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
$size_y= 900
$size_x= 1500
$abstandx = @DesktopWidth-$size_x
$abstandy = @DesktopHeight-$size_y
;~ 75 x 90
$mob_x = (200 + ($abstandx/2))
$mob_y = (140 + ($abstandy/2))
$mob_x2 = (1200 + ($abstandx/2))
$mob_y2 = (700 + ($abstandy/2))
$cccount = 0
While 1
$msg = GUIGetMsg()
Select
Case $msg = $irisbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfiris" Then
$vab = kampfiris();
Else
$vab = search_iris()
EndIf
WEnd
Case $msg = $faunbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampffaun" Then
$vab = kampffaun();
Else
$vab = search_faun()
EndIf
WEnd
Case $msg = $amazonbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfamazon" Then
$vab = kampfamazon();
Else
$vab = search_amazon()
EndIf
WEnd
Case $msg = $goblinbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfgoblin" Then
$vab = kampfgoblin();
Else
$vab = search_goblin()
EndIf
WEnd
Case $msg = $GUI_EVENT_CLOSE
MsgBox(0, "GUI Event", "Du hast auf CLOSE geklickt! Programm wird beendet...")
ExitLoop
EndSelect
WEnd
Func search_iris()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xd5f5cf )
$cccount = $cccount + 1
$tot = PixelSearch( 1370 + ($abstandx/2), 50 + ($abstandy/2), 1380 + ($abstandx/2), 60 + ($abstandy/2), 0x603C29 ) ;rechts oben Symbol Stadt
If IsArray($tot) Then ; wenn durch PvP auf Insel getötet oder Start des Bots in Himmelsburg
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
Sleep(1500)
MouseClick("left")
EndIf
Mousemove( 1032 + ($abstandx/2), 380 + ($abstandy/2), 10) ;Heldengeistinsel anklicken
Sleep(1000)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(30000) ; wartezeit bis Held in etwa am Portal ist und durchgegangen ist
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 665 + ($abstandx/2),330 + ($abstandy/2), 10 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(3000)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfiris"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(190 + ($abstandx/2), 310 + ($abstandy/2), 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
If($cccount > 33) Then
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseClick("left",Random(430 + ($abstandx/2), 760 + ($abstandx/2),1),Random(310 + ($abstandy/2),590 + ($abstandy/2),1))
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfiris()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_faun()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0x306313 ) ;sucht nach Farbe des Heldengeistes
$cccount = $cccount + 1
$tot = PixelSearch( 1370 + ($abstandx/2), 50 + ($abstandy/2), 1380 + ($abstandx/2), 60 + ($abstandy/2), 0x603C29 ) ;rechts oben Symbol Stadt
If IsArray($tot) Then ; wenn durch PvP auf Insel getötet oder Start des Bots in Himmelsburg
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
Sleep(1500)
MouseClick("left")
EndIf
Mousemove( 1032 + ($abstandx/2), 380 + ($abstandy/2), 10) ;Heldengeistinsel anklicken
Sleep(1000)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(30000) ; wartezeit bis Held in etwa am Portal ist und durchgegangen ist
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 969 + ($abstandx/2),266 + ($abstandy/2), 10 )
Mousemove( 965 + ($abstandx/2),266 + ($abstandy/2), 10 ) ; 2. Level anklicken
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zu Level 2")
Sleep(30000)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 690 + ($abstandx/2), 330 + ($abstandy/2), 10 ) ; Punkt auf Karte in Level 2 anklicken
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(3000)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampffaun"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(190 + ($abstandx/2), 310 + ($abstandy/2), 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
If($cccount > 33) Then
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseClick("left",Random(510 + ($abstandx/2), 790 + ($abstandx/2), 1),Random(310 + ($abstandy/2), 530 + ($abstandy/2), 1))
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampffaun()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_amazon()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xFFB790 )
$cccount = $cccount + 1
$tot = PixelSearch( 1370 + ($abstandx/2), 50 + ($abstandy/2), 1380 + ($abstandx/2), 60 + ($abstandy/2), 0x603C29 ) ;rechts oben Symbol Stadt
If IsArray($tot) Then ; wenn durch PvP auf Insel getötet oder Start des Bots in Himmelsburg
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
Sleep(1500)
MouseClick("left")
EndIf
Mousemove( 1032 + ($abstandx/2), 380 + ($abstandy/2), 10) ;Heldengeistinsel anklicken
Sleep(1000)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(30000) ; wartezeit bis Held in etwa am Portal ist und durchgegangen ist
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 969 + ($abstandx/2),266 + ($abstandy/2), 10 )
Mousemove( 965 + ($abstandx/2),266 + ($abstandy/2), 10 ) ; 2. Level anklicken
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zu Level 2")
Sleep(30000)
; im 2. Level angekommen
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970 + ($abstandx/2), 293 + ($abstandy/2) )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("3. Level")
sleep(30000)
;im 3. Level angekommen
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 515 + ($abstandx/2), 420 + ($abstandy/2) )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(3000)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfamazon"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(190 + ($abstandx/2), 310 + ($abstandy/2), 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
If($cccount > 33) Then
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseClick("left",Random(450 + ($abstandx/2),750 + ($abstandx/2),1),Random(330 + ($abstandy/2),610 + ($abstandy/2),1))
sleep(1500)
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
return $vab;
EndFunc
Func kampfamazon()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 500+($abstandx/2), 780+($abstandy/2), 1000+($abstandx/2), 765+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_goblin()
$varc = 0
$search = PixelSearch( $mob_x, $mob_y, $mob_x2, $mob_y2, 0xFF3D7A )
$cccount = $cccount + 1
$tot = PixelSearch( 1370 + ($abstandx/2), 50 + ($abstandy/2), 1380 + ($abstandx/2), 60 + ($abstandy/2), 0x603C29 ) ;rechts oben Symbol Stadt
If IsArray($tot) Then ; wenn durch PvP auf Insel getötet oder Start des Bots in Himmelsburg
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
Sleep(1500)
MouseClick("left")
EndIf
Mousemove( 1032 + ($abstandx/2), 380 + ($abstandy/2), 10) ;Heldengeistinsel anklicken
Sleep(1000)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(30000) ; wartezeit bis Held in etwa am Portal ist und durchgegangen ist
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 969 + ($abstandx/2),266 + ($abstandy/2), 10 )
Mousemove( 965 + ($abstandx/2),266 + ($abstandy/2), 10 ) ; 2. Level anklicken
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zu Level 2")
Sleep(30000)
; im 2. Level angekommen
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970 + ($abstandx/2), 293 + ($abstandy/2) )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("3. Level")
sleep(30000)
;im 3. Level angekommen
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 970 + ($abstandx/2), 322 + ($abstandy/2) )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("4. Level")
sleep(35000)
;4. Level
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 650 + ($abstandx/2), 560 + ($abstandy/2))
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(3000)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 556 + ($abstandx/2), 685 + ($abstandy/2), 638 + ($abstandx/2) , 728 + ($abstandy/2), 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfgoblin"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(190 + ($abstandx/2), 310 + ($abstandy/2), 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
If($cccount > 33) Then
$map = PixelSearch( 1240 + ($abstandx/2), 460 + ($abstandy/2), 1440 + ($abstandx/2), 610 + ($abstandy/2), 0xccffff ) ;Karte-Button rechts
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(500)
MouseClick("left",Random(430 + ($abstandx/2), 760 + ($abstandx/2),1),Random(310 + ($abstandy/2),590 + ($abstandy/2),1))
sleep(1500)
$kreuz = PixelSearch(1090 + ($abstandx/2), 190 + ($abstandy/2), 1140 + ($abstandx/2), 260 + ($abstandy/2), 0xE97551 )
If IsArray($kreuz) Then
MouseMove($kreuz[0], $kreuz[1], 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfgoblin()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 515+($abstandx/2), 785+($abstandy/2), 980+($abstandx/2), 845+($abstandy/2), 0x080807 )
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 113+($abstandx/2), 165-75+($abstandy/2), 362-90+($abstandx/2), 177-75+($abstandy/2), 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
Func ShowMessage()
MsgBox(4096,"","Das ist eine Nachricht.")
EndFunc
HG Bot mit Auswahlmöglichkeit 1366x768 / Sylph Bot 1366x768: (20.01.2014)
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
GUICreate("Bot für die Heldengeister", 270, 240)
GUICtrlCreateLabel("Starten des Bots über Schaltfläche", 50, 10)
GUICtrlCreateLabel("Charakter bitte entweder in Himmelsburg", 40, 30)
GUICtrlCreateLabel("oder ins jeweilige Level stellen", 60, 50)
GUICtrlCreateLabel("<P> - pausiert Skript", 87, 80)
GUICtrlCreateLabel("<ESC> - beendet Skript", 80, 100)
$irisbot = GUICtrlCreateButton("Iris-Bot starten", 60, 140, 150)
$faunbot = GUICtrlCreateButton("Faun-Bot starten", 60, 160, 150)
$amazonbot = GUICtrlCreateButton("Amazonen-Bot starten", 60, 180, 150)
$goblinbot = GUICtrlCreateButton("Goblin-Bot starten", 60, 200, 150)
GUISetState(@SW_SHOW)
Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d
$size_y= 900
$size_x= 1500
$abstandx = @DesktopWidth-$size_x
$abstandy = @DesktopHeight-$size_y
;~ 75 x 90
$mob_x = (85)
$mob_y = (150)
$mob_x2 = (1215)
$mob_y2 = (625)
$cccount = 0
While 1
$msg = GUIGetMsg()
Select
Case $msg = $irisbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfiris" Then
$vab = kampfiris();
Else
$vab = search_iris()
EndIf
WEnd
Case $msg = $faunbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampffaun" Then
$vab = kampffaun();
Else
$vab = search_faun()
EndIf
WEnd
Case $msg = $amazonbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfamazon" Then
$vab = kampfamazon();
Else
$vab = search_amazon()
EndIf
WEnd
Case $msg = $goblinbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfgoblin" Then
$vab = kampfgoblin();
Else
$vab = search_goblin()
EndIf
WEnd
Case $msg = $GUI_EVENT_CLOSE
MsgBox(0, "GUI Event", "Du hast auf CLOSE geklickt! Programm wird beendet...")
ExitLoop
EndSelect
WEnd
Func search_iris()
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0xd5f5cf )
$cccount = $cccount + 1
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 )
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(25000)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
Send("{m}")
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfiris"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 33) Then
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(385,680,1),Random(200,500,1))
sleep(1500)
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfiris()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_faun()
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0x306313 )
$cccount = $cccount + 1
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 )
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(25000)
;1. Level
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 925, 185 )
Sleep(5000)
MouseClick( "left" )
ConsoleWrite("2. Level")
Sleep(25000)
;2. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 439, 342 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(15000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampffaun"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(400,700,1),Random(220,470,1))
sleep(1500)
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampffaun()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_amazon()
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0xFFB790 )
$cccount = $cccount + 1
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 )
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(25000)
;1. Level
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 925, 185 )
Sleep(5000)
MouseClick( "left" )
ConsoleWrite("2. Level")
Sleep(25000)
;2. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 890, 213 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("3. Level")
sleep(25000)
;3. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 445, 340)
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(10000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfamazon"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(385,675,1),Random(215,520,1))
sleep(1500)
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfamazon()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_goblin()
$varc = 0
$search = PixelSearch( 295, 110, 1115, 600, 0xFF3D7A )
$cccount = $cccount + 1
$tot = PixelSearch( 1245, 45, 1250, 50, 0x603C29 )
If IsArray($tot) Then
Sleep(1500)
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 970, 297 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Geht zur Insel")
Sleep(25000)
;1. Level
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(1500)
Mousemove( 925, 185 )
Sleep(5000)
MouseClick( "left" )
ConsoleWrite("2. Level")
Sleep(35000)
;2. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 890, 213 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("3. Level")
sleep(35000)
;3. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 895, 240 )
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("4. Level")
sleep(35000)
;4. Level
Mousemove( 477, 233 )
Sleep(1500)
MouseClick( "left" )
Sleep(1500)
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
Mousemove( 600, 485)
Sleep(1500)
MouseClick( "left" )
ConsoleWrite("Suche Position")
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
Sleep(10000)
Endif
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 519, 536, 836, 581, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(5000)
$vab = "kampfgoblin"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1150, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(375,700,1),Random(200,520,1))
sleep(1500)
$kreuz = PixelSearch( 980, 125, 1100, 170, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfgoblin()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 288, 600, 710, 735, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{SPACE}")
Send("{3}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 80, 300, 100, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
Func ShowMessage()
MsgBox(4096,"","Das ist eine Nachricht.")
EndFunc
HG Bot mit Auswahlmöglichkeit 1280x1024 / Sylph Bot 1280x1024: (20.01.2014)
KEINE GARANTIE / NO GUARANTEES
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
GUICreate("Bot for all Sylphs", 270, 240)
GUICtrlCreateLabel("Starting of Bot with clicking the button", 45, 10)
GUICtrlCreateLabel("Please set the char in the level", 50, 30)
GUICtrlCreateLabel("where you want to farm selected sylph", 45, 50)
GUICtrlCreateLabel("<P> - pausing script", 87, 80)
GUICtrlCreateLabel("<ESC> - exit script", 90, 100)
$irisbot = GUICtrlCreateButton("Iris-Bot", 60, 140, 150)
$faunbot = GUICtrlCreateButton("Pan-Bot", 60, 160, 150)
$amazonbot = GUICtrlCreateButton("Amazon Queen-Bot", 60, 180, 150)
$goblinbot = GUICtrlCreateButton("Goblin Eve-Bot", 60, 200, 150)
GUISetState(@SW_SHOW)
Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d
$cccount = 0
While 1
$msg = GUIGetMsg()
Select
Case $msg = $irisbot
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfiris" Then
$vab = kampfiris();
Else
$vab = search_iris()
EndIf
WEnd
Case $msg = $faunbot
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampffaun" Then
$vab = kampffaun();
Else
$vab = search_faun()
EndIf
WEnd
Case $msg = $amazonbot
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfamazon" Then
$vab = kampfamazon();
Else
$vab = search_amazon()
EndIf
WEnd
Case $msg = $goblinbot
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfgoblin" Then
$vab = kampfgoblin();
Else
$vab = search_goblin()
EndIf
WEnd
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
Func search_iris()
$varc = 0
$search = PixelSearch( 150, 150, 1020, 705, 0xd5f5cf )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("searching Iris")
$search_loot = PixelSearch( 350, 450, 1000, 680, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('clicked sylph')
sleep(5000)
$vab = "kampfiris"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hello','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1035, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(415,675,1),Random(315,550,1))
sleep(1500)
$kreuz = PixelSearch( 900, 150, 1050, 250, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfiris()
;~ fighting function
ConsoleWrite('fighting')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 350, 750, 900, 950, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 50, 270, 80, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ not in fight
$vab = false;
$countdown = 0
ConsoleWrite('not in fight');
EndIf
Return $vab;
EndFunc
Func search_faun()
$varc = 0
$search = PixelSearch( 150, 150, 1020, 705, 0x306313 )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("searching Pan")
;~ dont fight a monster which is in fight
$search_loot = PixelSearch( 350, 450, 1000, 680, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('clicked sylph')
sleep(5000)
$vab = "kampffaun"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hello','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1035, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(415,675,1),Random(315,550,1))
sleep(1500)
$kreuz = PixelSearch( 900, 150, 1050, 250, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampffaun()
;~ fighting function
ConsoleWrite('fighting')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 350, 750, 900, 950, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 50, 270, 80, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('not in fight');
EndIf
Return $vab;
EndFunc
Func search_amazon()
$varc = 0
$search = PixelSearch( 150, 150, 1020, 705, 0xFFB790 )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("searching sylph")
;~ dont fight a monster which is in fight
$search_loot = PixelSearch( 350, 450, 1000, 680, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('clicked sylph')
sleep(5000)
$vab = "kampfamazon"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hello','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1035, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(415,675,1),Random(315,550,1))
sleep(1500)
$kreuz = PixelSearch( 900, 150, 1050, 250, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfamazon()
;~ fighting function
ConsoleWrite('fighting')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 350, 750, 900, 950, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 50, 270, 80, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('not in fight');
EndIf
Return $vab;
EndFunc
Func search_goblin()
$varc = 0
$search = PixelSearch( 150, 150, 1020, 705, 0xFF3D7A )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("searching sylph")
;~ dont fight a monster which is in fight
$search_loot = PixelSearch( 350, 450, 1000, 680, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('clicked sylph')
sleep(5000)
$vab = "kampfgoblin"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hello','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1035, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(415,675,1),Random(315,550,1))
sleep(1500)
$kreuz = PixelSearch( 900, 150, 1050, 250, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfgoblin()
;~ fightin function
ConsoleWrite('fighting')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 350, 750, 900, 950, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 50, 270, 80, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('not in fight');
EndIf
Return $vab;
EndFunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist paused',0,0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
Func ShowMessage()
MsgBox(4096,"","That's a message.")
EndFunc
HG Bot mit Auswahlmöglichkeit 1024x768 / Sylph Bot 1024x768: (20.01.2014)
KEINE GARANTIE / NO GUARANTEES
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
GUICreate("Bot für die Heldengeister", 270, 240)
GUICtrlCreateLabel("Starten des Bots über Schaltfläche", 50, 10)
GUICtrlCreateLabel("Charakter bitte entweder in Himmelsburg", 40, 30)
GUICtrlCreateLabel("oder ins jeweilige Level stellen", 60, 50)
GUICtrlCreateLabel("<P> - pausiert Skript", 87, 80)
GUICtrlCreateLabel("<ESC> - beendet Skript", 80, 100)
$irisbot = GUICtrlCreateButton("Iris-Bot starten", 60, 140, 150)
$faunbot = GUICtrlCreateButton("Faun-Bot starten", 60, 160, 150)
$amazonbot = GUICtrlCreateButton("Amazonen-Bot starten", 60, 180, 150)
$goblinbot = GUICtrlCreateButton("Goblin-Bot starten", 60, 200, 150)
GUISetState(@SW_SHOW)
Global $Paused, $vab, $countdown = 0
HotKeySet("p", "TogglePause")
HotKeySet("{ESC}", "Terminate")
$cccount = 0
While 1
$msg = GUIGetMsg()
Select
Case $msg = $irisbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfiris" Then
$vab = kampfiris();
Else
$vab = search_iris()
EndIf
WEnd
Case $msg = $faunbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampffaun" Then
$vab = kampffaun();
Else
$vab = search_faun()
EndIf
WEnd
Case $msg = $amazonbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfamazon" Then
$vab = kampfamazon();
Else
$vab = search_amazon()
EndIf
WEnd
Case $msg = $goblinbot
WinActivate("Demon_Slayer_Anmeldeclient")
Sleep(1500)
While 1
Sleep(300)
If $vab == "kampfgoblin" Then
$vab = kampfgoblin();
Else
$vab = search_goblin()
EndIf
WEnd
Case $msg = $GUI_EVENT_CLOSE
MsgBox(0, "GUI Event", "Du hast auf CLOSE geklickt! Programm wird beendet...")
ExitLoop
EndSelect
WEnd
Func search_iris()
$varc = 0
$search = PixelSearch( 115, 150, 780, 575, 0xd5f5cf )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 250, 350, 700, 550, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(6000)
$vab = "kampfiris"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 33) Then
$map = PixelSearch( 750, 350, 1000, 650, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(300, 540, 1),Random(250, 465, 1))
sleep(1500)
$kreuz = PixelSearch( 870, 120, 915, 155, 0xBF3A2B )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfiris()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 270, 650, 760, 760, 0x080807 )
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch(80, 15, 300, 90, 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_faun()
$varc = 0
$search = PixelSearch( 115, 150, 780, 575, 0x306313 )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 250, 350, 700, 550, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(6000)
$vab = "kampffaun"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 33) Then
$map = PixelSearch( 750, 350, 1000, 650, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(300, 540, 1),Random(250, 465, 1))
sleep(1500)
$kreuz = PixelSearch( 870, 120, 915, 155, 0xBF3A2B )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampffaun()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 270, 650, 760, 760, 0x080807 )
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch(80, 15, 300, 90, 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_amazon()
$varc = 0
$search = PixelSearch(115, 150, 780, 575, 0xFFB790 )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 250, 350, 700, 550, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(6000)
$vab = "kampfamazon"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 33) Then
$map = PixelSearch( 750, 350, 1000, 650, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(300, 540, 1),Random(250, 465, 1))
sleep(1500)
$kreuz = PixelSearch( 870, 120, 915, 155, 0xBF3A2B )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfamazon()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 270, 650, 760, 760, 0x080807 )
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch(80, 15, 300, 90, 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func search_goblin()
$varc = 0
$search = PixelSearch( 115, 150, 780, 575, 0xFF3D7A )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("Sucht Pixel")
;~ nicht ein monster angreifen was bereits angegriffen wird
$search_loot = PixelSearch( 250, 350, 700, 550, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('Monster angeclickt')
sleep(6000)
$vab = "kampfgoblin"
Else
if($varc == 1) Then
$sToolTip = ToolTip("BLOCK " & @CRLF & "BLOCK" & @CRLF & "BLOCK", $search[0]-20, $search[1]-20, 'Copyright by Vegeta17')
MouseMove(400, 400, 1)
WinSetOnTop('hallo','',1)
EndIf
EndIf
Else
ConsoleWrite($varc)
EndIf
if($cccount > 33) Then
$map = PixelSearch( 750, 350, 1000, 650, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(300, 540, 1),Random(250, 465, 1))
sleep(1500)
$kreuz = PixelSearch( 870, 120, 915, 155, 0xBF3A2B )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+3, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampfgoblin()
;~ Kampf funktion
ConsoleWrite('Lädt Kampf')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 270, 650, 760, 760, 0x080807 )
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch(80, 15, 300, 90, 0x800303 )
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('Nicht im kampf');
EndIf
Return $vab;
EndFunc
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
Inhalt des Bots:
Kampf gegen Heldengeister Level 1-4 möglich, über GUI
Start auch von Himmelsburg aus möglich
Falls Charakter getötet wird, automatisches Laufen zurück zur ausgewählten Ebene (1366x768 und 1600x900+)
zufällige Auswahl auf Karte, wenn kein Heldengeist gesichtet wird, verkürzte Wartezeit
------------------------------------------
ENGLISH:
Bot can do THIS:
Fighting sylphs level 1-4, you can choose at GUI when you start bot
In German client version the char goes itself to the sylph atoll, in english version idk if it works (1366x768 und 1600x900+)
if no sylph is found, the char randomly starts map and pick a new position to find new sylphs
Kurioserweise gibt es immer wieder Meldungen bei Virustotal, da es auch Trojaner etc gibt, die mit AutoIt gescriptet wurden. Die EXE Dateien sind durch AutoIt SciTE Version 3.3.7 kompiliert worden. Wem das zu gefährlich ist, die EXE zu nutzen, der kann ja den Code oben nutzen und selbst testen.
------------------------------------------
It's curios that there are Virustotal positives, but this is because there are trojans etc programmed with AutoIt and the Antivirus-progs searching for autoit code. All files are compiled by AutoIt SciTE Version 3.3.7. If you don't trust the ZIP please use the code and compile for yourself at home.
Erkennungsrate: 3 / 48; Analyse-Datum: 2014-01-20 10:08:14 UTC
|
Das Einzigste was bei mir Funktioniert ist die Pause Taste P ? 
|
|
|
|
02/16/2014, 20:20
|
#62
|
elite*gold: 0
Join Date: Nov 2013
Posts: 74
Received Thanks: 53
|
Sorry Leute, aber da ich das Spiel derzeit nicht mehr spiele (zu geldlastig finde ich) und der Spaß auf der Strecke bleibt, werde ich den Support für den Bot einstellen.
Bin zwar noch per PN erreichbar aber werde nur selten helfen können. So oft bin ich hier nicht mehr unterwegs.
Danke an alle, die mir geholfen haben den Bot weiter zu verbessern.
Gruß Ol4fff
|
|
|
|
|
03/24/2014, 08:56
|
#63
|
elite*gold: 0
Join Date: May 2013
Posts: 2
Received Thanks: 0
|
hi allso ich habe ihn getestet und finde ihn sehr gut, spricht gut die geister an und arbeitet sehr schnell, ich habe eine 1680x1050 auflösung und die HD funzt wunderbar. allerdings läuft er nicht automatisch auf die insel und hat keine random funktion wenn kein HG gesichtet wird, hast du einen tip wie ich das in den griff bekomme ?
Anonnsten sehr gute arbeit !!
Kleiner verbesserungsvorschlag: da man jetzt autofights aktivieren kann bei den geistern bau doch einfach ne pixelsearch mit ein wo den autfight button aktiviert wenn nicht aktive, dann kannste die QTE deaktivieren das sie bei 3 fach QTE´s eh nicht richtig funzt.
Quote:
Originally Posted by Marwo
hi allso ich habe ihn getestet und finde ihn sehr gut, spricht gut die geister an und arbeitet sehr schnell, ich habe eine 1680x1050 auflösung und die HD funzt wunderbar. allerdings läuft er nicht automatisch auf die insel und hat keine random funktion wenn kein HG gesichtet wird, hast du einen tip wie ich das in den griff bekomme ?
Anonnsten sehr gute arbeit !!
Kleiner verbesserungsvorschlag: da man jetzt autofights aktivieren kann bei den geistern bau doch einfach ne pixelsearch mit ein wo den autfight button aktiviert wenn nicht aktive, dann kannste die QTE deaktivieren das sie bei 3 fach QTE´s eh nicht richtig funzt.
|
das ist schade das du damit jetzt aufgehört hast, die arbeit ist wirklich sehr gut und die mithilfe war super, ich hoffe das es einen weiteren scripter gibt hier die diese arbeit fort führen, denn das script ist schon sehr gut und wäre schade wenn es einfach so aufgegeben wird.
|
|
|
|
|
04/01/2014, 06:13
|
#64
|
elite*gold: 0
Join Date: Nov 2012
Posts: 10
Received Thanks: 0
|
Hi Ol4fff, i have one question. What region should i remove if i want to remove the function with open map and move randomly, when the script cant find sylphs ? Or what should i modify to change the coordinates of that moves ? Because the script 1280x1024 stops often mostly on Amazon farm, and sylph exchange point,and is stuck there till i move him manually. Thanks.
|
|
|
|
|
04/02/2014, 00:47
|
#65
|
elite*gold: 0
Join Date: Feb 2014
Posts: 2
Received Thanks: 0
|
Quote:
Originally Posted by djsylvester
Hi Ol4fff, i have one question. What region should i remove if i want to remove the function with open map and move randomly, when the script cant find sylphs ? Or what should i modify to change the coordinates of that moves ? Because the script 1280x1024 stops often mostly on Amazon farm, and sylph exchange point,and is stuck there till i move him manually. Thanks.
|
i need know it too,and looking for remove the block tool dont working well here when tootip block window open
|
|
|
|
|
04/07/2014, 05:17
|
#66
|
elite*gold: 0
Join Date: Nov 2012
Posts: 10
Received Thanks: 0
|
Quote:
Originally Posted by nuheru27
i need know it too,and looking for remove the block tool dont working well here when tootip block window open
|
I can help with that. remove all that line with block message. That will solve ur problem.
|
|
|
|
|
04/14/2014, 08:42
|
#67
|
elite*gold: 0
Join Date: Oct 2012
Posts: 36
Received Thanks: 0
|
is there an english Interface? i can always translate the buttons.. but, the OP says theres an english version, i just dont see it in the ZIP..
|
|
|
|
|
04/15/2014, 01:07
|
#68
|
elite*gold: 0
Join Date: Apr 2014
Posts: 1
Received Thanks: 0
|
i cant download ... please advice
|
|
|
|
|
04/17/2014, 02:09
|
#69
|
elite*gold: 0
Join Date: Nov 2012
Posts: 10
Received Thanks: 0
|
jenferista, give me an email adress, in PM or here and i will send the script via email attachement.
|
|
|
|
|
04/17/2014, 17:26
|
#70
|
elite*gold: 0
Join Date: Mar 2014
Posts: 1,397
Received Thanks: 54
|
was ist das fürn bot geht der noch?
|
|
|
|
|
04/20/2014, 23:43
|
#71
|
elite*gold: 0
Join Date: Feb 2014
Posts: 1
Received Thanks: 0
|
wondering if this still works, it use to work for me but i switched servers and now im 50 again and it doesnt stay on 1 sylph, it will click, and then it will click a new one, and when it manages to get into a fight it just auto attacks, doesnt use any skills or anything, if there is a update would greatly appreciate it, thanks
|
|
|
|
|
06/14/2014, 04:51
|
#72
|
elite*gold: 0
Join Date: Jun 2014
Posts: 3
Received Thanks: 0
|
as anyone got better managogs for erandal i cant seem to get ti to work its searching and detecting but no battle
has anyone got better managogs for erandal i cant seem to get ti to work its searching and detecting but no battle
|
|
|
|
|
08/06/2014, 01:57
|
#73
|
elite*gold: 0
Join Date: Aug 2014
Posts: 1
Received Thanks: 0
|
Will this ever be updated in the future? Say is newer sylphs were added?
Anybody?
|
|
|
|
|
08/10/2014, 01:48
|
#74
|
elite*gold: 0
Join Date: Dec 2008
Posts: 191
Received Thanks: 7
|
Działa on? Blokuje bo ma wirusy.
|
|
|
|
|
08/10/2014, 10:30
|
#75
|
elite*gold: 0
Join Date: Jun 2010
Posts: 247
Received Thanks: 72
|
is not virus make your own exe take the code from first page put it in a new autoit v3 file and run it with autoit3 or make it exe with aut2exe
edit: Need Some Help !
i have the code for pans from first page and i want to remove some lines but i don't know wich one cuz i delete some of the lines and i get some error with " if "
Can some one help me to make it not use skills cuz i use afk mode and he jump from 1 to another even if the sylph is not taken , need to attack it even if its taken
PHP Code:
Func search_faun()
$varc = 0
$search = PixelSearch( 150, 150, 1020, 705, 0x306313 )
$cccount = $cccount + 1
If IsArray($search) Then
$cccount = 0
ToolTip("")
MouseMove($search[0], $search[1], 1)
MouseClick("left")
sleep(2500)
$varc=1
ConsoleWrite("searching Pan")
;~ dont fight a monster which is in fight
$search_loot = PixelSearch( 350, 450, 1000, 680, 0x030303 )
If IsArray($search_loot) Then
ConsoleWrite('clicked sylph')
sleep(5000)
$vab = "kampffaun"
Else
if($varc == 1) Then
$sToolTip = ToolTip("")
MouseMove(400, 400, 1)
WinSetOnTop('hello','',1)
EndIf
EndIf
Else
;~ Portal()
;~ sleep(1000)
ConsoleWrite($varc)
EndIf
if($cccount > 50) Then
$map = PixelSearch( 1035, 400, 1250, 600, 0xccffff )
If IsArray($map) Then
MouseMove($map[0]+5, $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(1500)
MouseClick("left",Random(415,675,1),Random(315,550,1))
sleep(1500)
$kreuz = PixelSearch( 900, 150, 1050, 250, 0xFF2014 )
If IsArray($kreuz) Then
MouseMove($map[0], $map[1]+2, 1)
MouseClick("left")
EndIf
sleep(5000)
$cccount=0
Endif
Return $vab;
EndFunc
Func kampffaun()
;~ fighting function
ConsoleWrite('fighting')
$countdown = $countdown + 1
$search_kampf = PixelSearch( 350, 750, 900, 950, 0x080807 )
;(755,875,1220,935)
If IsArray($search_kampf) Then
Send("{3}")
Send("{SPACE}")
Send("{2}")
Send("{1}")
Send("{up}")
Send("{down}")
Send("{left}")
Send("{right}")
$end_kampf = PixelSearch( 100, 50, 270, 80, 0x800303 )
;(353,180,512,192)
If IsArray($end_kampf) Then
$vab = false
$countdown = 0
Endif
Elseif $countdown > 6 Then
;~ nicht kampf
$vab = false;
$countdown = 0
ConsoleWrite('not in fight');
EndIf
Return $vab;
EndFunc
|
|
|
|
 |
|
Similar Threads
|
Heldengeister BOT *KOSTENLOS
08/23/2014 - Browsergames - 322 Replies
VIRUS TOTAL
https://www.virustotal.com/de/file/c5a918351737f6 f379012ceea49c5f75b37a5685a72f89a68c02b5a465bd7fe8 /analysis/1388784634/
Faun_bot 64bit
32bit
Antivirus Ergebnis Aktualisierung
Agnitum 20131123
AhnLab-V3 20131123
AntiVir 20131123
|
*New*Demonslayer Bot Für Heldengeister
03/03/2014 - Browsergames - 56 Replies
Hallo Zusammen,
|
Heldengeister Bot!!!
12/02/2013 - Browsergames - 0 Replies
Hier ist der Link zum neuen und bisher besten Bot für Demon Slayer
http://www.elitepvpers.com/forum/browsergames-tra ding/2990525-demon-slayer-farmbot-deluxe.html#post 26135670
|
Suche Demon Slayer bot für die Heldengeister
11/17/2013 - Browsergames - 24 Replies
Hey zusammen,
ich suche einen bot zum farmen der Heldengeister.
Der bot sollte die heldengeister nur auswählen und angreifen. die Verwendung der Skills ist nicht unbedingt notwendig.
Also eine Art Autoklick bot.
Wäre super wenn mir da vll jemand weiterhelfen könnte.
mfg michel
|
Heldengeister BOT
11/05/2013 - Browsergames - 0 Replies
CLOSED
veröffentliche nix
|
All times are GMT +1. The time now is 19:46.
|
|
